r - 带有用户输入的 knitr

Question

我正在使用 R markdown 和 Knitr 使用 Rstudio。

我有以下 R Markdown 文件:

---
title: "Untitled"
author: ""
date: ""
output: html_document
---

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

```{r}
#Load libraries
library(knitr)
library(ggplot2)
library(reshape2)
library(chron)
library(gridExtra)

#Get current directory
directory = getwd()
setwd(directory)

readname = function()#prompt user for the name and number of the site
{ 
  n <- readline(prompt="Site name and number: ")
  return(n)
}
prjName=readname()
print(prjName)
prjName2="TEST NAME"
prjName2

该代码要求用户输入站点名称和编号。我可以在 R markdown 中运行块并通过控制台获取用户输入并打印它就好了。它也作为字符串存储在全局环境中。然而，当我编织文档时，我得到以下结果:



似乎在编织文档时我无法打印用户输入字符串......

对此的任何帮助将不胜感激。

Answer 1

正如内森在评论中所说，你不能使用 readline在 knitr 中获取输入文档，因为它不是交互式的。但是您可以使用“参数化报告”获取用户输入(请参阅 http://rmarkdown.rstudio.com/developer_parameterized_reports.html )。例如，

---
title: "Untitled"
author: ""
date: ""
output: html_document
params: 
  prjName: "The project name"
---

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

```{r}
readname = function()# Get the project name
{ 
  params$prjName
}
prjName=readname()
prjName

如果你只是编织这个文件，它会将 prjName 设置为“项目名称”。如果您单击“使用参数编织”(或在对 params = "ask" 的调用中设置 rmarkdown::render)，系统将提示您输入该值，并将该值作为默认值。