我想创建多个散点图,其中的行连接每个 hospital
组中的所有点。
> head(dt.gg)
pred base hospital
1 -1.4273910 -2.596 1
2 -0.7296839 -1.595 1
3 -0.6606799 -1.496 1
4 -0.5993430 -1.408 1
5 -0.5380061 -1.320 1
6 -0.4766692 -1.232 1
到目前为止,我的尝试是:
require(ggplot2)
dt.gg <- read.csv("http://goo.gl/5yjEZ")
ggplot(dt.gg, aes(x=base, y=pred, color=hospital)) + geom_point(shape=1) +
theme(legend.position="none")
但我无法加入每组的点数。 geom_line()
似乎不起作用 - 它加入了所有的观点,而不是单独加入每个医院组中的点(并且与每个组的点的颜色相同)
答案 0 :(得分:3)
您应该将参数group=hospital
添加到函数ggplot()
以加入点。
ggplot(dt.gg, aes(x=base, y=pred, color=hospital,group=hospital)) + geom_point(shape=1) +
geom_line()+ theme(legend.position="none")