我有两个图表,分别显示不同类型的数据(疫苗和疾病),我想提取这些图表的部分以生成每个主题的图表,该图表具有疫苗和疾病,并且根据原始图表上的颜色进行着色。
vac
subject age vaccine
1 E11 1.0 DTaP-IPV
2 E11 3.0 DTaP-IPV
3 E22 1.0 DTaP-IPV
4 E22 2.0 Rota
5 E22 3.0 DTaP-IPV
6 E22 3.3 Rota
ill
subject age illness
1 E11 0.5 ear infection
2 E11 2.0 ear infection
3 E22 0.8 fever
4 E22 1.2 fever
5 E22 3.0 ear infection
ggplot(vac,aes(x=age,y=subject,color=vaccine))+geom_point(size=5) +
scale_color_brewer(palette="Set1",drop = FALSE)+facet_grid(subject~.)
ggplot(ill,aes(x=age,y=subject,color=illness))+geom_point(size=5) +
scale_color_brewer(palette="Set3",drop = FALSE)+facet_grid(subject~.)
现在,我想要一个E11的图表,其中包含一行疫苗(用Set1颜色标识),和一行疾病(用Set3颜色标识),对于E22也是同样的。由于我有许多数据类型和大约40个主题,所以当然希望自动完成这个过程,而不是通过illustrator等手动完成。
我认为gtable是可行的方法,但不确定如何提取一个facet。
非常感谢!