R中的神经网络输出调用

Question

我一直在使用 R 中的神经网络来帮助生成状态分类结果的预测。
两天前，我设法生成了一种不同类型的输出，看起来像这样（见附图）。 然后我的硬盘崩溃了，我丢失了那行代码。 有人可以帮我复制这个功能吗？？ 谢谢。 R 中的神经网络输出截图调用的最终输出是：具有 13 个权重选项的 2-3-1 网络是 -decay=0.1 b->h1 i1->h1 i2->h1 0.02 -0.03 0.04 b->h2 i1 ->h2 i2->h2 0.05 0.01 -0.03 b->h3 i1->h3 i2->h3 -0.05 -0.02 0.01 b->o h1->o h2->o h3->o -1.07 0.00 -1.08 - 0.08

任何帮助表示赞赏！