Bar Chart
mm.counts <- c(12,6,8,10,6,7) names(mm.counts) <- c("blue","brown", "green", "orange", "red", "yellow") mm.colors <- c("blue", "brown", "green", "orange","red", "yellow") barplot(mm.counts, col=mm.colors)