Question

---
title: "Untitled"
output: html_document
---

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

```{r,message=FALSE}
library(mirt)
set.seed(12345)
a <- matrix(abs(rnorm(15,1,.3)), ncol=1)
d <- matrix(rnorm(15,0,.7),ncol=1)
itemtype <- rep('2PL', nrow(a))
N <- 1000
dataset1 <- simdata(a, d, N, itemtype)
dataset2 <- simdata(a, d, N, itemtype, mu = .1, sigma = matrix(1.5))
dat <- rbind(dataset1, dataset2)
group <- c(rep('D1', N), rep('D2', N))
models <- 'F1 = 1-15'

mod_configural <- multipleGroup(dat, models, group = group)

coef(mod_configural )
```

在Rmd脚本和knit to HTML上运行，我将得到计算结果输出为：

## $D1
## $Item_1
##        a1     d g u
## par 1.071 0.524 0 1
## 
## $Item_2
##        a1      d g u
## par 1.217 -0.699 0 1

问题是计算过程也以HTML输出，例如：

## 
Iteration: 1, Log-Lik: -18088.494, Max-Change: 0.37763
Iteration: 2, Log-Lik: -17943.205, Max-Change: 0.18868

然后我的HTML将变得很长，很难阅读。我尝试使用message=FALSE，但不起作用。
如何隐藏或折叠HTML中的这些信息？

Answer 1

该解决方案非常简单，与RMD无关。

mod_configural <- multipleGroup(dat, models, group = group, verbose = FALSE)

当您查看软件包的manual（第95页）时，verbose选项是解决方案。

如何抑制计算过程信息并仅将计算结果保留在R markdown HTML中？

1 个答案: