如何在 plot R 中更改特定条件下的模式
How do I change the pattern with a certain condition in plot R
> VAR Estimate ymax ymin t.value SIDE
> TM1 0.45207287 0.55211315 0.3520326 4.5189087 EAST
> TM400 0.24634616 0.294695776 0.19799654 5.0951003 EAST
> TM800 0.22187081 0.270010311 0.17373131 4.6089138 EAST
> TM1 0.03150572 0.115834177 -0.05282274 0.3736072 WEST
> TM400 -0.04242677 -0.006421522 -0.07843202 -1.1783496 WEST
> TM800 0.06834191 0.097380534 0.03930329 2.3534835 WEST
我有上面的数据集,我使用 ggplot2
制作了这个图
我想调整图表这条指令:
如果 t.value < 3
,条形图不是实心的,斜线 (//) 类型来填充图形。
同色下,只想把pattern solid改成hash(////).
如何添加代码?这是我的原始代码。
ggplot(FOR_PLOT_SALE, aes(x=factor(VAR), y=Estimate)) +
scale_fill_grey() + facet_grid(. ~ SIDE) +
geom_bar(stat="identity",aes(fill=VAR)) +
geom_errorbar(aes(ymin=ymin, ymax= ymax),
width=.2,
position="identity")+ geom_hline(yintercept=0)+ theme_classic()
很遗憾,您没有提供可用的 data.frame 作为示例。
如果您尝试以下方法来更改填充的 alpha 值会怎么样:
geom_bar(stat = "identity", alpha = ifelse(temp$Max_WS > 10, 1, 0.3))
或者填充颜色本身:
geom_bar(stat = "identity", fill = ifelse(temp$Max_WS > 10, "black", "grey"))
我对你的情节的偏好是不使用 "fill = VAR"(因为没有必要),而是使用灰色阴影来可视化 "is significant/or is not"。
> VAR Estimate ymax ymin t.value SIDE
> TM1 0.45207287 0.55211315 0.3520326 4.5189087 EAST
> TM400 0.24634616 0.294695776 0.19799654 5.0951003 EAST
> TM800 0.22187081 0.270010311 0.17373131 4.6089138 EAST
> TM1 0.03150572 0.115834177 -0.05282274 0.3736072 WEST
> TM400 -0.04242677 -0.006421522 -0.07843202 -1.1783496 WEST
> TM800 0.06834191 0.097380534 0.03930329 2.3534835 WEST
我有上面的数据集,我使用 ggplot2
我想调整图表这条指令:
如果 t.value < 3
,条形图不是实心的,斜线 (//) 类型来填充图形。
同色下,只想把pattern solid改成hash(////).
如何添加代码?这是我的原始代码。
ggplot(FOR_PLOT_SALE, aes(x=factor(VAR), y=Estimate)) +
scale_fill_grey() + facet_grid(. ~ SIDE) +
geom_bar(stat="identity",aes(fill=VAR)) +
geom_errorbar(aes(ymin=ymin, ymax= ymax),
width=.2,
position="identity")+ geom_hline(yintercept=0)+ theme_classic()
很遗憾,您没有提供可用的 data.frame 作为示例。
如果您尝试以下方法来更改填充的 alpha 值会怎么样:
geom_bar(stat = "identity", alpha = ifelse(temp$Max_WS > 10, 1, 0.3))
或者填充颜色本身:
geom_bar(stat = "identity", fill = ifelse(temp$Max_WS > 10, "black", "grey"))
我对你的情节的偏好是不使用 "fill = VAR"(因为没有必要),而是使用灰色阴影来可视化 "is significant/or is not"。