如何在geom_step()中指定线条颜色?

时间:2020-05-04 23:51:29

标签: r ggplot2

使用geom_step()在ggplot中指定线条颜色的命令是什么?

默认颜色很好用,我只想将它们更改为我喜欢的颜色。

我有两个小组,我的ggplot代码开始:

ggplot(WomenAgeComparison, aes(x=IntegerAge, y=CumAgePercent, colour=DataSource)) +
geom_step()

两组都很好。除了更改线条颜色之外,一切都正常。

我尝试过:

scale_color_manual(values=c("mediumorchid2",'blue'))

出现错误

Scale for 'colour' is already present. Adding another scale for 'colour', which will replace the existing scale.

并且没有覆盖现有的颜色。

我也尝试过

scale_color_continuous(values=c("mediumorchid2",'blue'))

出现错误

Error in continuous_scale(aesthetics, "gradient", seq_gradient_pal(low,  : 
unused argument (values = c("mediumorchid2", "blue"))

两种颜色spec的示例使用了两条单独的geom_step()行。当然有更简单的方法吗?

要使用什么命令?是否有scale_color命令要使用,还是应该在美学括号中指定?如果是后者,我该怎么办?

已更新以显示完整的ggplot代码:

ggplot(WomenAgeComparison, aes(x=IntegerAge, y=CumAgePercent, colour=DataSource)) +
geom_step() +
scale_color_manual(values=c("mediumorchid2",'blue')) +
xlab("Age (years)") + ylab("Cumulative proportion") + 
scale_x_continuous(limits = c(0, 100), breaks = seq(0, 100, by = 20), expand = c(0, 0)) +
scale_y_continuous(limits = c(0,1), breaks = seq(0, 1, by = .2), expand = c(0, 0)) +
scale_color_discrete(name = "Data source", labels = c("Synthetic data\nestimates", "Timaru Data\nrandom rounded\ncounts")) +
theme(legend.title = element_text(size = 15),
    legend.text = element_text(size = 10),
    legend.key.height=unit(1.5, "cm"),
    axis.text = element_text(size = 10),
    axis.title = element_text(size = 15))

我只有scale_color_discrete可以将我想要的文本放入图例标题和文本中。我尝试使用主题element_text选项代替它,但无法正常工作。

0 个答案:

没有答案