小编yin*_*lon的帖子

我有一个R markdown文件,我想从脚本本身输出rmarkdown.例如,我在Rmd文件中有以下简单代码.

---
title: "test"
author: "johndoe"
date: "September 5, 2015"
output: html_document
---

```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = TRUE)
```

```{r cars}
paste("## This is a Heading in Code")
summary(cars)
```

我希望"这是代码中的标题"在rmarkdown中呈现.根据http://rmarkdown.rstudio.com/r_notebook_format.html,R脚本中有一个解决方案可以生成markdown .但我试图找出如何在Rmarkdown文件中执行此操作.任何帮助赞赏.谢谢.

我已经定义了以下功能:

plot_test <- function(data) {
  columns <- names(data)
  for (column in columns) {
    p <- ggplot(data, aes(x=get(column), y=cluster))
    p <- p + geom_jitter(position = position_jitter(height = .1, width=0.1))
    show(p)
  }
}

带输入数据框:

a <- data.frame(id=c(1,2), cluster=c(3,4))

当我跑:

plot_test(a)

我收到以下错误消息:

Error in get(column) : object 'column' not found

我没有适当地在for循环中确定列变量.任何帮助,将不胜感激.谢谢.