R如何使用plotrix包在2-y轴图中分别为两组点添加回归线

Question

我创建了一个双y轴图，使用plotrix包显示两组点，下一步是分别为两组点添加回归线。但我不知道如何处理这种情况。有什么建议？提前谢谢！

创建双y轴图的示例代码：

library(plotrix)

xval1 <- seq.Date(as.Date("2017-01-02"),
                  as.Date("2017-01-10"), by="day")
xval2 <- seq.Date(as.Date("2017-01-01"),
                  as.Date("2017-01-15"), by="day")
going_up <- seq(3,7,by=0.5)+rnorm(9)
going_down <- rev(60:74)+rnorm(15)
twoord.plot(2:10, going_up,1:15, going_down, xlab="Sequence", type = 'p',
            ylab = "Ascending values",rylab="Descending values",lcol=4)