R에서 MLP (다중 레이어 퍼셉트론) 사용 방법?

Question

R에서 다중 퍼셉트론을 사용하여 데이터를 학습하고 'auc score'와 같은 평가 결과를 확인하고 싶습니다. R에 "monmlp"라는 패키지가 있지만 올바르게 사용하는 방법을 모르겠습니다.

는 다음 코드

> mlp.model = monmlp.fit(x, y, hidden1=3, n.ensemble=15, monotone=1, bag=T) 
** Ensemble 1 
** Bagging on 
1 0.9206784 
** 0.9206784 

** Ensemble 2 
** Bagging on 
1 0.8200886 
** 0.8200886 

** Ensemble 3 
** Bagging on 
1 0.8278868 
** 0.8278868 
. 
. 
. 
** Ensemble 15 
** Bagging on 
1 0.8186057 
** 0.8186057 

mlp.pred <- monmlp.predict(x = x, weights = mlp.model) 

지금까지하지만, 다음에 무엇 괜찮 썼다? 예를 들어 auc 점수를 찾으려면 어떻게해야합니까?

감사 있습니다 .. Machine learning task view에 의해 제안

Answer 1

, 당신은 ROCR 패키지를 사용할 수 있습니다.

# Sample data 
library(monmlp) 
n <- 1000 
k <- 7 
x <- matrix(rnorm(k*n), nr=n) 
w <- rnorm(k) 
y <- ifelse(logistic(x %*% w) + rnorm(n, sd = 0.2) > 1, 0, 1) 

# Fit the model and compute the predictions 
r <- monmlp.fit(x, y, hidden1=3, n.ensemble=15, monotone=1, bag=TRUE) 
z <- monmlp.predict(x = x, weights = r) 

# Compute the AUC 
library(ROCR) 
plot(performance(prediction(z, y), "tpr","fpr")) 
performance(prediction(z, y), "auc")@y.values[[1]]