Question

我在stackoverflow中读了一个具有相同标题的案例，但它没有解决我的问题。我有一个这样的数据框：

ID T1 T2 T3 T4....T10
1  40 50 50 70....40
2  30 60 29 50....NA
3  59 80 NA NA....NA
4  80 90 90 NA....NA

我想只有一个图表将T1，T2，T3 ... T10放在x轴上，并将T1，T2 ... T10的得分放在y轴上。每个id与分数的变化形成一条线。我为每一个使用了 add = TRUE ，但它仍然很麻烦，因为我有超过300个ID。如何在情节甚至ggplot中快速完成？

谢谢！

Answer 1

d <- data.frame(id=1:5,t1=1:5,t2=2:6,t3=3:7)
d[3,4]=NA
d
plot(1:(length(d)-1),ylim=range(d,na.rm=TRUE),type="n",xaxt="n",xlab="",ylab="")
for(i in 1:nrow(d)) points(unlist(d[i,])[-1],col=i,type="o")
axis(1,at=1:(length(d)-1),labels=names(d)[-1])

简单的函数来绘制r中的多行

1 个答案: