如何规范R中的圆大小

我有一个如下的数据集，正在使用符号创建一个气泡图，Z列用作气泡大小：

 X       Y      Z       TITLE
151.2  31.5    51023     xyz
160.2  51.8    4912      xyz
191.7  2.1     874201    abc

radius <- sqrt(data$z/pi)
symbols(data$x,data$y,circles=radius,inches=0.35,
cex.axis=1.5,cex.lab=1.5,xlab="xlab", ylab="ylab")

xyz标题
151.2 31.5 51023 xyz
160.2 51.8 4912 xyz
191.7 2.1 874201 abc
半径试试类似的方法

data$radius <- sqrt(data$Z/pi)/50
with(data[data$TITLE != "abc",],
     symbols(x = X, y = Y, circles = radius,
             inches = FALSE, asp = 1,
             xlim = c(140, 240), ylim = c(-10, 60)))

如果指定
inches=0.35
，则将缩放圆以使最大圆尺寸为0.35英寸。阅读
？符号

with(data,
     symbols(x = X, y = Y, circles = radius,
             inches = FALSE, asp = 1,
             xlim = c(140, 240), ylim = c(-10, 60)))