practica3

#Visualizar las ventas por Mes

#Crear una variable meses que contenga: “Ene”, “Feb”, “Mar”…. “Oct”, “Nov” y “Dic”. 12 elementos en la variable
#Meses <- c(“Ene”, “Feb”, “Mar”….. “Oct”, “Nov”, “Dic” )
#Crear una variable llamada ventas con valores aleatorios entre 80000 y 150000
#Graficar las ventas por meses
#barplot(meses, ventas)
#Generar Rpubs
cat("\014")

meses=c("ene","feb","mar","abr","may","jun","jul","ago","sep","oct","nov","dic")
ventas=sample(80000:150000,size=12)
barplot(ventas,main="ventas", horiz=FALSE, names.arg=meses)