library("ggplot2")
data(airquality$Ozone)
head(airquality$Ozone)
#Ozone concentration in air
barplot(airquality$Ozone,
        main='Ozone concentration in air',
         xlab='ozone levels',horiz=FALSE)
barplot(airquality$Ozone,
        main='Ozone concentration in air',
         xlab='ozone levels',horiz=TRUE)

Embed on website

To embed this program on your website, copy the following code and paste it into your website's HTML: