Tenho o seguinte data frame (df):
Subject Period Treatment Time Concentration
1 1 1 A -1.000 0.000
2 1 1 A -0.500 0.000
3 1 1 A -0.250 0.000
4 1 1 A 0.000 0.000
5 1 1 A 0.167 1.147
6 1 1 A 0.333 4.993
7 1 1 A 0.500 4.324
8 1 1 A 0.667 6.623
9 1 1 A 0.833 4.945
10 1 1 A 1.000 3.446
11 1 1 A 1.250 2.280
12 1 1 A 1.500 2.796
13 1 1 A 1.750 1.666
14 1 1 A 2.000 1.105
15 1 2 B -1.000 0.000
16 1 2 B -0.500 0.000
17 1 2 B -0.250 0.000
18 1 2 B 0.000 0.000
19 1 2 B 0.167 2.378
20 1 2 B 0.333 24.137
21 1 2 B 0.500 22.876
22 1 2 B 0.667 25.779
23 1 2 B 0.833 27.178
24 1 2 B 1.000 19.609
25 1 2 B 1.250 13.392
26 1 2 B 1.500 10.431
27 1 2 B 1.750 7.402
28 1 2 B 2.000 6.793
29 2 1 B -1.000 0.000
30 2 1 B -0.500 0.000
31 2 1 B -0.250 0.000
32 2 1 B 0.000 0.000
33 2 1 B 0.167 0.097
Este data frame poderá conter N sujeitos com M curvas de concentração por sujeito (que dependerá do número de tratamentos).
Para gerar os gráficos de concentração plasmática de cada sujeito estou utlilizando o seguinte código:
p<- ggplot(Data, aes(x=Time, y=Concentration, group=Subject:Treatment:Period, shape=Treatment:Period, color=Treatment)) +
geom_line() + geom_point(size=3) + facet_wrap(~ Subject,ncol = 2)+ scale_shape_manual(values=c(7,7,1,1)) + scale_colour_manual(values=c("red","darkblue"))+ xlab("Time (hr)")+
ylab("Concentration (ng/mL)") + ggtitle("Individual Plasma Concentration - Drug X")
Meu problema é que quando o número de sujeitos é grande fica praticamente inviável ter uma boa visualização de todos os gráficos na mesma página (o tamanho reduz bastante). Logo, preciso da ajuda dos usuários "mais experientes" para aprimorar o código no sentido de controlar o número de gráficos que são impressos por página. Por exemplo, se tivermos 10 sujeitos e se desejarmos imprimir dois gráficos por página então teremos um total de 5 páginas com 2 gráficos por páginas. Já vi muita coisa no stackoverflow em inglês mas reconheço que não achei nenhum tão trivial. Será que isto é possível ser feito de uma forma elegante com poucas linhas de comando?
Muito obrigado e toda ajuda será muito bem vinda.
dput
. Isto vai facilitar muito a vida de quem quiser te ajudar a resolver este problema.