我对此感到疯狂,我知道我只是做了一些简单的错误。
我想做的就是让这个简单的图并排评估配对数据。position = "闪避不起作用
require(tidyverse)
mine = tibble(
x = seq(1,36,1)
y = rnorm(36),
z = rexp(36)
)
ggplot(data = mine,aes(x,y)) +
geom_col(colour = "red") +
geom_col(aes(x,z),colour="white")
Run Code Online (Sandbox Code Playgroud)
我要么把它放在错误的地方,要么我的数据设置不正确,但这应该很简单!
您需要以整齐的方式准备数据。然后你可以使用 fill 来分隔变量:
require(tidyr)
dp <- gather(mine, Var,Value,-x)
ggplot(data = dp,aes(x,Value, fill=Var)) +
geom_col( position="dodge") +
scale_fill_manual(values=c("red","white"))
Run Code Online (Sandbox Code Playgroud)
| 归档时间: |
|
| 查看次数: |
4814 次 |
| 最近记录: |