Question

我正在使用气泡图测试R项目。为此，我有以下csv文件：

我这样做了：

> mydata<-read.csv("~/Desktop/result.csv", header=TRUE)
> mydata

  month     sale    comm maxcomm savings
  1 23415960  706164  998457  292293
  2 21303842  870591  928084   57493
  3 22128502  644698  897262  252564
  4 23872123  800024 1047968  247944
  5 25880653  900984 1006359  105375
  6 26359929 1186594 1601646  415052

对于下面的命令，我得到了红色气泡

符号（mydata $ sale，mydata $ comm，circles = mydata $ savings，bg =“red”）

并且对于下面的命令，我得到了蓝色气泡

符号（mydata $ sale，mydata $ comm，circles = mydata $ maxcomm，bg =“blue”）

我的目标是将它们整合在一起（在一个图表中），这样红色将在蓝色的顶部。（如果有可能让蓝色透明 - 甚至更好！）

enter image description here

Answer 1

设置add=TRUE：

symbols(mydata$sale, mydata$comm, circles=mydata$maxcomm, bg="blue")
symbols(mydata$sale, mydata$comm, circles=mydata$savings, bg="red", add=TRUE)

请查看rgb()或ggplot功能，了解透明色（由alpha引用。

Answer 2

有几种方法可以做到这一点，但保留在基本图形包中，您可以使用par()命令并在彼此之上添加绘图。另外，要控制透明度，可以将颜色转换为十六进制值（红色为＃FF0000，蓝色为＃0000FF），并在末尾添加两个数字代表alpha透明度层

symbols(mydata$sale, mydata$comm, circles=mydata$savings, bg="#FF0000")
par(new=TRUE)
symbols(mydata$sale, mydata$comm, circles=mydata$maxcomm, bg="#0000FF50")

这会将第二个符号图表的透明度设置为50％ 1

另请参阅此相关问题以获取更多详细信息：2

使用R - 如何在一个图中集成2个气泡图

2 个答案: