# Data input
> x<-c(28,27,30,32,29,32,33,27,23,22,26,20)
# Data output
> x
[1] 28 27 30 32 29 32 33 27 23 22 26 20
# Boxplot
> boxplot(x)
# Data input
> y<-c(29,37,34,37,29,28,33,36,33,32,26,31)
# Data output
> x
[1] 28 27 30 32 29 32 33 27 23 22 26 20
> y
[1] 29 37 34 37 29 28 33 36 33 32 26 31
# Boxplot
> boxplot(x,y)
# Put name & change Y axis
> boxplot(x,y, names=c("Osaka", "Tokyo"), ylim=c(0,40))
# Read "lattice" package
> library(lattice)
# Dotplot
> dotplot(x)