meses <- c("ene","feb","mar","abr","may","jun","jul","ago","sep","oct","nov","dic")
ventas <- c(sample(80000:150000, size=12))

class(ventas)

## [1] "integer"

class(meses)

## [1] "character"

ventas

##  [1] 102194 104808 127396 118232 101944 131825 122062 117088 103732  80710
## [11] 142635 115591

meses <- factor(meses, levels = meses)
datos <- data.frame(meses,ventas)

datos

##    meses ventas
## 1    ene 102194
## 2    feb 104808
## 3    mar 127396
## 4    abr 118232
## 5    may 101944
## 6    jun 131825
## 7    jul 122062
## 8    ago 117088
## 9    sep 103732
## 10   oct  80710
## 11   nov 142635
## 12   dic 115591

plot(datos)

barplot(ventas~meses,datos)