R nnet模型作為等式，可在其他編程語言中使用

Question

我已經使用nnet在RStudio中成功創建了模型。
但是現在我需要用Java編寫代碼。 我想我可以權重（wts）並建立激活函數所需的方程，但是我希望有人已經編寫了一個函數來執行此操作。

人們通常如何采用他們的R模型並用C，Java等實現它們？

str(mynn) gives:

List of 18
$ n            : num [1:3] 1 2 1
    $ nunits       : int 5
$ nconn        : num [1:6] 0 0 0 2 4 7
    $ conn         : num [1:7] 0 1 0 1 0 2 3
$ nsunits      : num 4
    $ decay        : num 0.02
$ entropy      : logi FALSE
    $ softmax      : logi FALSE
$ censored     : logi FALSE
    $ value        : num 26466497
$ wts          : num [1:7] 6.422 -0.433 -11.771 2.086 -12001.039 ...
    $ convergence  : int 0

等等...

也許以前有人問過這個問題，但是經過數小時的Google搜索並沒有找到答案。

謝謝您的幫助。 我非常感謝。

Answer 1

一種方法是使用PMML 。 CRAN軟件包pmml支持導出nnet模型：

library(caret)
library(nnet)
library(pmml)

model <- train(
  Sepal.Length~., iris, 
  method='nnet', trace=FALSE, 
  trControl=trainControl(verboseIter=TRUE))
pmml(model$finalModel)