透明的三维球体气泡图R.

Question

我想创建一个三维泡沫图，比较8个不同行业的市场规模（市场），百万美元，市场份额（份额），增长率（增长率），竞争对手数量（竞争对手）。气泡（球体）的大小代表市场份额。市场份额的百分比显示了球体的填充水平。球体的颜色表示三种颜色的变量障碍。 x和y变量是竞争对手和增长。 我希望每个球体的总大小代表总市场规模，并用市场份额的百分比填充。 我想标记它旁边的每个球体和表示球体大小的图例。 我感谢任何帮助。下面是假数据。

data <- data.frame(Sectors=c("A","B","C","D","E","F","H","I"),
Market=sample(1:100, 8, replace=T),
Share=c(0.10, 0.55, 0.30, 0.80, 0.15, 0.40, 0.30, 0.05),
Growth=c(0.9, 0.05, 0.03, 0.02, 0.02, 0.04, 0.07, 0.2),
competitors=sample(1:50, 8, replace=T) )#fake data

Answer 1

Promise.all()