Práctica 3
Abomontage
13/12/2019
#Practica 3
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)
#Practica 3
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)