一个ggplot上有多行

Question

我的数据是一个导入的Excel文件，其中第一列是采样时间，是＆＃39; x轴＆＃39;其余列是测量值。它们是相同的测量值，但来自不同的主题。

数据外观的快照如下：

我可以使用：

手动将它们堆叠在ggplot上

ggplot(P2ROKI, aes(x=P2ROKI$Time))+
  geom_point(aes(y=P2ROKI$P1, colour="P1"))+
  geom_point(aes(y=P2ROKI$P6, colour="P6")) + 
  geom_smooth(aes(y=P2ROKI$P1, colour="P1")) + 
  geom_smooth(aes(y=P2ROKI$P6, colour="P6"))

但是我想知道是否有一种更简单的方法可以一次性完成它？