在R中绘制多行

Question

我有数据：

Basal <- c(211,  365,  275,  383,  207, 1566,  385,  540,  366,  251, 
      112,  370,  245,  168,  486,  228,  231,  686,  240,  347)
Min5 <- c(25,  91,  94,  98,  46, 205, 136,  94,  95,  69,  32, 132,  49, 
     119, 154,  79,  89, 163, 218,  49)
Min10 <- c(19,  73,  60,  77,  38, 159, 125,  76,  88,  62,  21,  97,  47, 
     102, 149,  47,  62, 137, 180,  47)
Min15 <- c(17,  58,  42,  70,  33, 131,  NA,  66,  89,  58,  NA,  62,  45, 
     55, 150,  37,  55, 123, 114,  51)

Cure <- c(rep("Cure",4), rep("Pers",16))
Df <- data.frame(Basal,Min5,Min10,Min15)

你能帮助我绘制数据，以便每行中的所有变量都用线连接（Cure - green，Pers - red）

类似的东西，但我希望有20行（在这种情况下）而不是2行。

Answer 1

这提供了所要求的内容虽然我认为一次尝试阅读20行很困难：

matplot( t(Df), type="l")

matplot函数通常适用于列，但转置会使分组成行。

关于颜色，我认为在我的视觉系统中很难解决红色和绿色的对比，所以选择了绿色和橙色：

matplot(t(Df), type="l", col=c( "orange", "darkgreen")[1+(Cure=="Cure")] )

如果你使非绿色略微透明，那么绿线就不会变得模糊不清。看起来也不那么华丽了。

matplot(t(Df), type="l", col=c( "#88440060", "darkgreen")[1+(Cure=="Cure")] )

透明度方面由R颜色系统中的最后两个十六进制数字控制，其中前6位是＆＃34;＃RRGGBB＆＃34;最后两个可选数字是alpha透明度。请参阅?rgb和?colors以及从那里链接的其他页面和包。