以下R代码给出了Type为Small的汽车.但是长度函数返回6而不是13.为什么呢?
> fuel.frame[fuel.frame$Type=="Small",]
row.names Weight Disp. Mileage Fuel Type
1 Eagle.Summit.4 30 0.97 33 3.030303 Small
2 Ford.Escort.4 28 114.00 33 3.030303 Small
3 Ford.Festiva.4 23 0.81 37 2.702703 Small
4 Honda.Civic.4 27 0.91 32 3.125000 Small
5 Mazda.Protege.4 29 113.00 32 3.125000 Small
6 Mercury.Tracer.4 27 0.97 26 3.846154 Small
7 Nissan.Sentra.4 27 0.97 33 3.030303 Small
8 Pontiac.LeMans.4 28 0.98 28 3.571429 Small
9 Subaru.Loyale.4 27 109.00 25 4.000000 Small
10 Subaru.Justy.3 24 0.73 34 2.941176 Small
11 …Run Code Online (Sandbox Code Playgroud) 我想在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)
Run Code Online (Sandbox Code Playgroud)
到目前为止还可以,但下一步是什么?我怎样才能找到auc分数?
谢谢..