# We need this line of code to show graphs in our compiler bitmap(file="out.png") x <- c("A", "B", "C", "D") y <- c(2, 4, 6, 8) barplot(y, names.arg = x, width = c(1,2,3,4))