r - 散点图在 ggplot 上显示为线条
问题描述
我有这样的数据
year month Avdischarge IndustrialCompound Pharmaceutical Pesticide TotalOvershootings
37 2018 1 740.5200 0.0000000 1.0000000 0.0000000 0.1578947
38 2018 2 376.8050 0.0000000 1.0000000 0.0000000 0.1428571
39 2018 3 269.2800 0.4285714 0.5714286 0.0000000 0.2800000
40 2018 4 195.8825 0.0000000 1.0000000 0.0000000 0.2105263
41 2018 5 100.9800 0.2500000 0.5833333 0.1666667 0.3243243
42 2018 6 99.5775 0.0000000 1.0000000 0.0000000 0.2105263
我首先绘制了放电图
q<- ggplot(data,aes(month, Avdischarge, group=1))+
geom_line(color='royalblue1', size=1.5, alpha=0.9))
现在我想scatterpie
在放电图上添加一个图
所以我做了这个
pieper<-q +
scatterpie::geom_scatterpie(aes(x=month, y=2, group=type, r = TotalOvershootings/0.5),
cols= c("IndustrialCompound", "Pharmaceutical", "Pesticide"),alpha= 0.7, color=NA,data= data)
但我明白了
我已经把它改成了r
每一个可能的数字,但是我没有正确地得到馅饼(如图所示)。当我更改 r 时,馅饼会变大,但总是作为一条线,或者消失。
我可以添加什么,以便获得正确比例的饼图?
解决方案
我认为这是一个缩放问题。如果你只是情节
q<- ggplot(data,aes(month, Avdischarge, group=1))+
scatterpie::geom_scatterpie(aes(x=month, y=2, group=type, r = TotalOvershootings/0.5),
cols= c("IndustrialCompound", "Pharmaceutical", "Pesticide"),alpha= 0.7, color=NA,data= data)
它将所有内容打印为圆圈。你看到图表底部的颜色了吗?这些是圆圈。查看 y 轴,然后您会看到圆圈有另一个刻度。
推荐阅读
- javascript - 在 p5.js 的处理中,如何使圆的半径在更大和更小的半径之间交替?
- node.js - 类型错误:defineCall 不是函数
- python - 将更改的文本按钮状态保存回字典值列表索引 0
- flutter - 文字溢出动画
- reactjs - 边框半径在本机反应中不圆角
- python - Python使用多个术语来查找
- mysql - SQL“INSERT WHERE NOT EXISTS”语法错误
- zsh - iTerm2 启动命令被用户输入覆盖,有没有更好的方法来获取 ~/.zschrc
- c++ - xxx“未在此范围内声明”-代码在 Arduino IDE 中有效,但在 Atom/PlatformIO 中无效
- ssl - 如何使用 sed 或 awk 在两个模式之间获取最后一组文本