现代统计图形 - 科学网—博客

42 第四章 元素
1 > xx = c(1912, 1912:1971, 1971)
2 > yy = c(min(nhtemp), nhtemp, min(nhtemp))
3 > plot(xx, yy, type = "n", xlab = "Year", ylab = "Temperatures")
4 > for (i in seq(255, 0, -3)) {
5 + yy = c(45, nhtemp - (nhtemp - min(nhtemp)) *
6 + (1 - i/255), 45)
7 + # rgb()中的绿色成分逐渐变小
8 + polygon(xx, yy, col = rgb(1, i/255, 0), border = NA)
9 + # Sys.sleep(0.05)
10 + # 为了看清作图过程,可以让每步循环延迟0.05秒
11 + }
12 > box()
Temperatures
48 49 50 51 52 53 54
1910 1920 1930 1940 1950 1960 1970
Year
图 4.2: New Haven地区的年均气温(1912~1971年):统计图形的应用应
该根据数据和事实的环境灵活选取图形的样式。 本图的数据为1912年
至1971年New Haven地区的年均气温。数据来源:datasets包中的nhtemp。