小编spa*_*row的帖子

我知道这是一个相当古老的问题,之前已经讨论过,但我无法按预期工作.

我有一个降价的文件,我想用knitr和pander生产用两位小数,如0.12,3.60,14.00,或163.21与一致的数字格式的.docx报告都内嵌和块输出.我已阅读此主题如何避免在每个\ Sexpr {}中使用round()？建议pander可以自动执行此操作.但是,它似乎对我不起作用.请让我知道我在这里缺少什么.

剧本:

```{r, echo=FALSE}
library(knitr)
opts_chunk$set(echo = FALSE, message = FALSE, results = 'asis')
```

```{r}
require(pander)
panderOptions('digits' , 2) #this should do the trick, right?
```

Test
=====

Let's produce some test stats:


```{r}
model1 = lm(weight~feed, chickwts)
anova.m1 = anova(model1)
pander(anova.m1)
pander(coef(summary(model1)))
```

In-line R codes: "Type of food affects body mass of the chicks
(F~`r anova.m1$Df[1]`,`r anova.m1$Df[2]`~ = `r anova.m1$F[1]`, p =  `r anova.m1$Pr[1]`)." …

这似乎是一个简单的问题,但我找不到答案.我有一个包含调用参数名称的字符向量.在一个函数中,我想发出警告,如果其中一些是错误的,并引用名称.

bad = c("a", "b", "c")
warning(paste("Variables", paste(bad, collapse = ", "), "are wrong"))

这使:

Warning message:
Variables a, b, c are wrong 

但是我需要:

Warning message:
Variables 'a', 'b', 'c' are wrong 

我想在不使用外部包的情况下实现这一目标.