这里新的降价......可能遗漏了一些简单的......我正在尝试创建一个带有for循环中生成的图的降价文档,但是想要阻止包裹图==即保留一列。
这与此处显示的内容类似:Knitr how to prevent text wrapping in output。我不能让这个用于绘图。
理想情况下,每个之间可能存在换行符。我找到了this,但我对pandoc并不熟悉,而且它正在为我想要保持简单的内容添加另一层。如果它是最好的解决方案,我会打赌这条路线,但我敢打赌,有一些更简单的东西。将情节放在桌子上?还没想出来......
示例代码(自首发后编辑):
```{r}
value <- rnorm(100)
index <- c(rep(1,20),rep(2,20),rep(3,20),rep(4,20),rep(5,20))
group1 <- 1:5
group2 <- 1:2
df <- as.data.frame(cbind(value,index,group1,group2))
for (i in unique(df$group1)){
par(mfrow=c(1,2))
plot(value~index,data=subset(df,group1==i & group2==1),type="l",pch=16,main=unique(paste("plot",i,"group=",group1)))
plot(value~index,data=subset(df,group1==i & group2==2),type="l",pch=16,main=unique(paste("plot",i,"group=",group2)))
box("outer")
}
```
答案 0 :(得分:10)
您可以调整plot
挂钩以附加新行
编辑 - 2013年7月25日
Yihui更简单的建议是在情节包含线之前强制换行
即。添加一个定义
的块```{r setup, echo = FALSE}
hook_plot = knit_hooks$get('plot')
knit_hooks$set(plot = function(x, options) paste('\n', hook_plot(x, options), sep = ''))
```