我正在尝试制作一个直方图,展示所有观测点中的一个子集。为了使其有意义,我需要给每个点上不同的颜色,并在图表上放置一个图例。但是我的问题是,我似乎无法在图表上显示比例尺。以下是我尝试过的示例。
subset <-1:8
results = data.frame(x_data = rnorm(5000),TestID=1:5000)
m <- ggplot(results,aes(x=x_data))
m+stat_bin(aes(y=..density..))+
stat_density(colour="blue", fill=NA)+
geom_point(data = results[results$TestID %in% subset,],
aes(x = x_data, y = 0),
colour = as.factor(results$TestID[results$TestID %in% subset]),
size = 5)+
scale_colour_brewer(type="seq", palette=3)
理想情况下,我希望点可以定位在密度线上(但我真的不确定如何实现,所以我将它们放置在 y = 0 上)。最紧急需要的是图例,它指示了子集中每个点对应的 TestID。
非常感谢能帮忙的任何人。