1 > c<-c(1,2,3,4,5,6,1,3) 2 > barplot(c)
1 > c<-c(1,2,3,4,5,6,1,3) 2 > plot(c)
1 > c<-c(1,2,3,4,5,6,1,3) 2 > barplot(c,horiz = TRUE)
1 > c<-c(1,2,3,4,5,6,1,3) 2 > barplot(c,xlab="Index",ylab = "Improvement", horiz = FALSE)