Question

我是使用Rmarkdown的新手。我有一个循环，我从中为每次迭代提取一组结果。这可以。但是，我无法将文本打印为粗体。以下是一些示例代码：

```{r echo=FALSE}
x <- data.frame(var1 = c(1,0.99,0.98,0.97,0.95), 
            var2 = c(1,0.995,0.99,0.98,0.97),
            var3 = c(1,0.98,0.96,0.94,0.90)
            )

year <- 1980:2010


# Do stuff across the loop:
for(j in 1:nrow(x)){
  temp_var1 <- constant1 * var1[j] * var2[j] * var3[j]
  temp_var2 <- constant2 * var1[j] * var2[j] * var3[j]


  q025 <- round(sapply(temp_var1[, ], quantile, probs=0.025))
  q975 <- round(sapply(temp_var2[, ], quantile, probs=0.975))
  proj <- as.data.frame(cbind(year, q025, q975))
  row.names(proj) <- NULL

  # Print stuff:
  **print(x[j,])**
  print(proj)
  cat('\n\n\n\n')   
} # close j loop
```

感谢您的帮助。

Answer 1

我不确定您想要使用for-loop代码做什么，但是您可以将这个简短的Rmarkdown代码段复制到您自己的新Rmarkdown文档中，以便在其中呈现粗体文本代码块：

## Display some bold text from inside a chunk

```{r results='asis'}
cat("I am a normal statement")
cat("**some bold text**")
```

## Bold text with a for loop

```{r results='asis'}
for(i in 1:5){
  cat("Number: **", i, "**\n\n", sep = "")
}
```

在Rmarkdown中为Word文档循环使用粗体文本

1 个答案: