我正在使用神经网络包来训练神经网络。我使用的是 rmarkdown html 格式，但在打印时未显示绘图。
---
title: "neuralnet"
author: "RED"
date: "`r Sys.Date()`"
output:
html_document:
toc: yes
---
```{r}
library(neuralnet)
data(infert, package="datasets")
net.infert <- neuralnet(case~parity+induced+spontaneous, infert,
err.fct="ce", linear.output=FALSE, likelihood=TRUE)
```
```{r}
plot(net.infert)
```
知道如何解决这个问题。
最佳答案
添加 rep="best"到 plot命令。如果没有，plot.nn不断地绘制每个训练时期 opening new graphics devices .
---
title: "neuralnet"
author: "RED"
date: "`r Sys.Date()`"
output:
html_document:
toc: yes
---
```{r}
library(neuralnet)
data(infert, package="datasets")
net.infert <- neuralnet(case~parity+induced+spontaneous, infert,
err.fct="ce", linear.output=FALSE, likelihood=TRUE)
```
```{r}
plot(net.infert, rep="best")
```
关于r - 在 rmarkdown 中绘制神经网络，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/52485934/