R降价：不同行的因子水平

Question

我根据我们从评估员那里收集的调查数据，使用R markdown创建学生反馈表。 输入有10个问题，以* .csv格式导入。 示例数据：

question <- as.factor(c(NA, NA, "response 1.", "response 2.", NA, "response 3."))

目前我在我的*.rmd文件中运行r levels(question)[-1] ，它给出了我的输出（带“，”作为分隔符）：

response 1., response 2., response 3.

请注意，总有一些NA，因此[-1]只是为了删除因子的NA级别。

我想要的是在新行上创建每个响应的输出：

response 1. 

response 2.

response 3. 

我可以通过指定每个级别上的级别来在单个表单上执行此操作

r levels(question)[2]

r levels(question)[3]

r levels(question)[4]

然而，对于每个问题，存在可变数量的非NA响应（1到4），因此我需要一个没有明确知道将会有多少的解决方案。 即相同的代码将为q1和q2提供所需的格式：

q1 <- as.factor(c(NA, NA, "response 1.", NA, NA, "response 2.")

q2 <- as.factor(c(NA, NA, "response 1.", "response 2.", "response 3.", "response 4.")

通常我会用for循环解决这个问题，但Markdown不会像R控制台一样读取代码。 尝试过as.character而不是as.factor但似乎没有帮助; 调用levels(question[-1])似乎是删除NA的最直接的方法。

谢谢！

Answer 1

您可以使用新行标记操作符" \\n"将每个响应放在文档中的新行上。

```{r}
question <- as.factor(c(NA, NA, "response 1", "response 2", NA, "response 3"))
```

`r paste0(levels(question), "  \n", collapse="")`

我在这里遇到了类似的问题

请注意，我在评论中使用了cat ，因此您可以在控制台中看到它。 在降价文档中，渲染得到了处理，因此您不需要cat