Question

分别为白色和绿色分数密度

library(ggplot2)

set.seed(1234)
dat <- data.frame(cond = factor(rep(c("White","Green"), each=1000000)), 
                  Score = c(rnorm(1000000),rnorm(1000000, mean=0)))
dat$Score <- ifelse(dat$cond == "Green", dat$Score - 1, dat$Score)
by(dat$Score, dat$cond,  mean) 

# Density plots with semi-transparent fill
ggplot(dat, aes(x=Score, fill=cond)) + geom_density(alpha=.3)

代码运行时没有语法错误。我对代码有两个问题：

我无法确定如何更改颜色。白色条件显示为绿色，绿色条件显示为橙色。我希望白色条件是白色，绿色条件是绿色的。
X轴在-6，-3,0和3处有刻度线。我想在-6，-5，-4，-3，-2，-1,0处刻度线，1,2,3。

Answer 1

ggplot(dat, aes(x=Score, fill=cond)) + geom_density(alpha=.3) +
scale_fill_manual(values = c("Green" = "green", "White" = "white")) +
scale_x_continuous(breaks = seq(-6, 3))

Answer 2

ggplot(dat, aes(x=Score)) + 
  geom_density(aes(fill=cond), alpha=.3) +
  scale_fill_manual(values = c("Green" = "darkseagreen", 
                               "White" = "antiquewhite1")) +
  scale_x_continuous(breaks = -6:3)

你可以使用＆＃34; Colorpicker＆＃34; R Studio Addin找到漂亮的R颜色（install.packages("colourpicker")，然后是Tools > Addins...）

颜色填充手册和x轴

2 个答案: