如何加宽文本的输出窗口?

时间:2018-05-08 18:28:28

标签: r r-markdown knitr

我想打印线性混合模型的输出并且文本换行。 有解决这个问题的选择吗?

我已尝试option(width=1000)tidy=TRUEtidy.opts=list(width.cutoff=600)无济于事。

编辑: 这是一个可重复的最小例子。

---
title: "Untitled"
author: "NickHayden"
date: "5/8/2018"
output: html_document
---

```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = TRUE)
library(ggplot2)
library(lmerTest)
library(lme4)
library(tidyverse)
```

## R Markdown

This is an R Markdown document. Markdown is a simple formatting syntax for authoring HTML, PDF, and MS Word documents. For more details on using R Markdown see <http://rmarkdown.rstudio.com>.

When you click the **Knit** button a document will be generated that includes both content as well as the output of any embedded R code chunks within the document. You can embed an R code chunk like this:

```{r cars}
df <- sample_n(diamonds, size = 100)
df <- df %>% mutate(randoms = rep(c("A","B", "C"), length.out = 100))
mod <- lmer(price ~  factor(color) * factor(clarity) * factor(cut) + (1|randoms), data = df)
print(summary(mod))
```

这里的文字应该环绕窗口,行也可以包裹在下面。

1 个答案:

答案 0 :(得分:1)

另一种方法是将输出导出到文本文件。以下链接显示了如何实现此目的。

Export R output to a file

示例:

test <- c("asb", "asb", "asb", "abc")
out <- capture.output(summary(test))
cat("My title", out, file="example_output.txt", sep="\n", append=TRUE)