我正在尝试实现一个函数,可以使用单个函数绘制两个时间序列图,但它只返回一个图。以下是代码,请问出了什么问题。
它只绘制第二个。我尝试通过在第一个函数中调用第二个函数来实现,但结果相同。
我正在尝试实现一个函数,用于绘制两个时间序列图,但该函数只能返回一个图。请查看以下代码,看看有何问题。
visualize <- function(x) {
x<-data.frame(x)
x1 <- x[x$chr == 1, ]
x2 <- x[x$chr != 1, ]
t1<-data.frame("range"=1:nrow(x1))
t2<-data.frame("range"=1:nrow(x2))
t1$testsample_first<-exp(x1$testSample1)
t1$testsample_second<-exp(x1$testSample2)
t2$testsample_first<-exp(x2$testSample1)
t2$testsample_second<-exp(x2$testSample2)
dygraph(t1);dygraph(t2)
}
(visualize(scon))
它只绘制第二个。我尝试通过在第一个函数中调用第二个函数来实现,但结果相同。