绘制气泡图主要使用函数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语言实战

转载请注明出处：http://blog.csdn.net/zhyoulun/article/details/46434197