Dwie fabuły obok siebie r
par(mfrow=c(1,2)) # set the plotting area into a 1*2 array
barplot(max.temp, main="Barplot")
pie(max.temp, main="Piechart", radius=1)
par(mfrow=c(1,1))
Tense Turtle