绘制气泡图主要使用函数symbols(x,y,circle=r).当中x、y是坐标轴，r是每一个点的半径。

x<-rnorm(10)y<-rnorm(10)r<-abs(rnorm(10))symbols(x,y,circle = r,        bg=rainbow(10))

此外，我们还能够给每一个气泡加上文字。

attach(mtcars)r<-sqrt(disp/pi)symbols(wt,mpg,circle=r,        inches=0.3,        bg="lightblue")text(wt,mpg,row.names(mtcars),     cex=0.5)

參考：R语言实战

转载请注明出处：