我有一个数据帧到目前为止:
N Method1-Simulation Method1-Analytical Method2-Simulation Method3-Analytical
1 2 0.094 0.1831891 0.158 0.2789826
2 3 0.236 0.2856285 0.434 0.4670031
3 4 0.349 0.3740548 0.568 0.6097311
4 5 0.450 0.4525999 0.682 0.7174169
5 6 0.506 0.5228121 0.781 0.7976934
6 7 0.585 0.5854665 0.851 0.8566850
它将增长以容纳更多的方法。我想制作一个ggplot,其中每个方法都有自己的颜色,分析方法是实线,而模拟方法是一条虚线。
除了以下几行之外我还有其他所有内容:
longPowerCurve <- melt(powerCurve, id = "N")
colnames(longPowerCurve)[2] <- "Method"
ggplot(data=longPowerCurve,aes(x=N, y=value, colour=Method)) + geom_line() +ylab("Power") +ggtitle("Power levels for various N and distributions")+
theme(legend.text = element_text(size = 12))
有没有办法让我自动化这个,这样如果我有5,6,7,8等等方法,它仍然有效?
答案 0 :(得分:4)
您可能想要拆分method.type列。这样,您可以分别为绘图使用这两个因子。要使用虚线,您可以使用linetype
参数。
groups <- data.frame(do.call('rbind', strsplit(as.character(longPowerCurve$Method),'.',fixed=TRUE)))
colnames(groups) <- c("Method", "Type")
longPowerCurve$Method <- groups$Method
longPowerCurve$Type <- groups$Type
ggplot(data=longPowerCurve,aes(x=N, y=value, colour=Method, linetype=Type)) +
geom_line() +
ylab("Power") +
ggtitle("Power levels for various N and distributions")+
theme(legend.text = element_text(size = 12))