气泡图中隐藏在较大气泡后面的几个气泡答案

【问题标题】：Few bubbles hidden behind a larger bubble in a bubble chart气泡图中隐藏在较大气泡后面的几个气泡
【发布时间】：2014-03-25 11:45:20
【问题描述】：

我正在使用气泡图直观地呈现我的数据。我面临的问题是面积较小的气泡隐藏在 R 中气泡图中较大的气泡后面。

V1  V2                          V3     V4
fl  unfair business practices   14      Y
fl  Corrections                  1      Y
fl  Product differs              1      Y
fl  refund not paid              0      Y
fl  Single premium               0      Y
fl  unfair business practices    52     N
fl  Corrections                  63     N
fl  Product differs              9      N
fl  refund not paid              2      N
fl  Single premium               2      N
mc  unfair business practices    19     Y
mc  Corrections                  0      Y
mc  Single premium               0      Y
mc  unfair business practices    36     N
mc  Corrections                  2      N
mc  Single premium               2      N

symbols(dat1$V2, dat1$V1, circles=dat1$V3)
radius <- sqrt( dat1$V3/ pi )
symbols(dat1$V2, dat1$V1, circles=radius, inches = 0.35, fg = "dark blue", bg = "red", xlab = "CASE REASON", ylab = "WORDS")

我的问题是（比如说）V1 = "fl" 和 V2 = "unfair business practice" 在我的数据中出现了两次，我正在绘制 2 个气泡，但较小的一个隐藏在较大的气泡后面。我希望较小的在我的情节中可见

我也想用 V4 列来表示气泡的颜色。例如：如果 V4 = "Y"，我希望气泡为红色，否则我希望它为绿色。

任何帮助将不胜感激。谢谢

【问题讨论】：

标签： r ggplot2 bubble-chart rcharts

【解决方案1】：

如果您对数据进行排序，使较小的圆圈位于 data.frame 的末尾：

dat1 <- dat1[order(dat1$V3, decreasing=TRUE),]

（并确保您在新的 dat1 上计算半径 - 或将 circles=radius 替换为 circles = dat1$V3/pi）然后它应该会有所帮助（尽管如果现在一组小圆圈完全掩盖了一个更大的圆圈，那么您永远不会能够看到所有的数据！）

您可以在符号调用中更改 fg 和 bg 常量，例如bg=ifelse(dat$V4=="Y", "red", "green")

【讨论】：