2015-05-28 34 views
8

dygraph上有一些奇怪的行为。For循环结束dygraph在R中不起作用

当使用for循环为dygraph我没有得到任何结果。

library(dygraphs) 
lungDeaths <- cbind(mdeaths, fdeaths) 

for(i in 1:2){ 
    dygraph(lungDeaths[, i]) 
} 

在另一方面,当我使用lapply我得到预期的结果

lapply(1:2, function(i) dygraph(lungDeaths[, i])) 

其实我是想用我自己的数据集在R Markdownfor环和遍历不同的列,但即使当我使用lapply“解决方法”,它不积dygraphs

[R降价代码

--- 
title: "Untitled" 
author: "dimitris_ps" 
date: "28 May 2015" 
output: html_document 
--- 

```{r} 
library(dygraphs) 
lungDeaths <- cbind(mdeaths, fdeaths) 
lapply(1:2, function(i) dygraph(lungDeaths[, i])) 
``` 

而当我被列运行列它的工作原理

--- 
title: "Untitled" 
author: "dimitris_ps" 
date: "28 May 2015" 
output: html_document 
--- 

```{r echo=FALSE} 
library(dygraphs) 
lungDeaths <- cbind(mdeaths, fdeaths) 
``` 

```{r} 
dygraph(lungDeaths[, 1]) 
dygraph(lungDeaths[, 2]) 
``` 

任何帮助将不胜感激。

会话信息

R version 3.2.0 (2015-04-16) 
Platform: x86_64-w64-mingw32/x64 (64-bit) 
Running under: Windows 7 x64 (build 7601) Service Pack 1 

locale: 
[1] LC_COLLATE=English_United Kingdom.1252 LC_CTYPE=English_United Kingdom.1252 
[3] LC_MONETARY=English_United Kingdom.1252 LC_NUMERIC=C       
[5] LC_TIME=English_United Kingdom.1252  

attached base packages: 
[1] stats  graphics grDevices utils  datasets methods base  

other attached packages: 
[1] dygraphs_0.4.3 devtools_1.7.0 

loaded via a namespace (and not attached): 
[1] htmltools_0.2.6 tools_3.2.0  yaml_2.1.13  rmarkdown_0.6.1 digest_0.6.8 
+0

'lapply'在'markdown'中为我工作。至于'for循环',你可以通过使用'show(dygraph(lungDeaths [,i]))' – user227710

+0

感谢您研究这个问题来解决问题(低效的方式)。不幸的是我对这两件事都没有工作我会更新我的问题,我的'sessionInfo()' –

+0

我使用相同的R版本加'0.4.3'dygraphs版本。 – user227710

回答

6

只是包装从lapply()输出列表中htmltools::tagList(),例如

```{r} 
library(dygraphs) 
lungDeaths <- cbind(mdeaths, fdeaths) 
res <- lapply(1:2, function(i) dygraph(lungDeaths[, i])) 
htmltools::tagList(res) 
``` 
+0

谢谢,你的上师。 –