2016-03-07 50 views
0

我想實現的功能使用單一功能繪製兩個時間序列圖使用單一功能的兩個圖表,但只返回這裏是代碼有什麼不對的地方返回r中

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)) 

它僅繪製第二個。我嘗試通過在第一個函數中調用第二個函數來實現,但結果相同。

+0

如果要返回多個對象,返回列表 –

+0

#1,請提供一個可重複的例子,包括虛擬數據和所需要的庫,準備複製粘貼運行。 #2可能會封堵第一和第二,但第二個將取代第一。如果您使用的是RStudio,則可以使用查看器窗格中的後退按鈕。 – lukeA

回答

0

你需要兩個對象在list一起返回:

list(plot(x), plot(y)) 
+0

Severin Pappadeu Thanxs它的工作我的錯誤是我使用返回,它是返回矢量矩陣。 –