R_Language 板


LINE

[问题类型]: 程式谘询(我想用R 做某件事情,但是我不知道要怎麽用R 写出来) [软体熟悉度]: 新手(没写过程式,R 是我的第一次) [问题叙述]: 我想用train这个指令进行模型选择 可是跑出一大堆警告 并且所有出来的结果都是遗失值 [程式范例]: library(neuralnet) library(nnet) library(lattice) library(ggplot2) library(caret) setwd("D:\\") Stock<-read.csv("real.csv",header=T) N<-nrow(Stock) set.seed(123) ind1<-sample(N,round(N*0.7)) Train<-Stock[ind1,-1] Test<-Stock[-ind1,-1] st.net<-stock~usd.z+coffee.z+rice.z+oil.z+wheat.z+djopen.z+cu.z+corn.z model <- train(formula =st.net,data = Train,method="neuralnet", tuneGrid =data.frame(layer1=2:4,layer2=0, layer3=0),learningrate = 0.1, threshold = 0.1,stepmax =10000) https://imgur.com/rm3gifL [关键字]: 选择性,也许未来有用 --



※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 49.217.180.37
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/R_Language/M.1506673183.A.BC4.html
1F:→ andrew43: 当下先开 warnings ()看警告细节。 09/29 16:25
2F:推 andrew43: 要练习看懂警告讯息。 09/29 16:27
而後出现以下警告标语 所有组合都是@@ 不大清楚要怎修改 model fit failed for Resample01: layer1=4, layer2=4, layer3=3 Error in varify.variables(data, formula, startweights, learningrate.limit, : 'pairlist' object cannot be coerced to type 'integer' ※ 编辑: asdfrtg (49.217.180.37), 09/29/2017 17:28:51
3F:→ andrew43: 我觉得你在单次训练都不会过。有成功使用过neuralnet吗 09/29 19:09
4F:→ andrew43: 猜stock是multinomial资料。你可以先了解这资料怎麽跑 09/29 19:10
andrew43: 一次neuralnet()。 09/29 19:10 我试过用neuralent()是可以跑 stock是数值型资料 andew43大大 想请问是在哪里出了问题
5F:→ f496328mm: 直接用 nnet 就好了 09/29 22:01
6F:→ f496328mm: https://goo.gl/KABRHL 09/29 22:02
那跟neuralnet哪一种方法较好@@ ※ 编辑: asdfrtg (49.217.180.37), 09/29/2017 23:44:05
7F:→ andrew43: 把st.net直接写在train()里头看看。 09/30 00:21
8F:→ andrew43: 用train()大概是要抓神经元层量或个数吧 09/30 00:36
※ 编辑: asdfrtg (101.8.247.163), 09/30/2017 21:56:31 试过用把st.net的内容打在formula後面结果仍出现一样的警告讯息 请问是资料型态错了吗@@? ※ 编辑: asdfrtg (101.8.247.163), 09/30/2017 22:06:17
9F:推 KKbiger: 感觉你原始资料有问题吧 检查一下 也许里面有坏掉的值 09/30 23:56
10F:→ KKbiger: 不然就是先拿个前10笔丢下去看能不能成功 09/30 23:56
11F:→ andrew43: 真的要帮忙,也要你先提供可重覆问题的资料 10/01 01:04
12F:→ andrew43: 你也都猜到可能资料有问题了... 10/01 01:05
※ 编辑: asdfrtg (101.8.247.163), 10/01/2017 12:25:39 https://drive.google.com/open?id=0B8WYq5Sw-r-XNHNub3FyeUJWYWc 变数後面.z是标准化之後 我用标准化之後的资料下去跑仍会显示警告 ※ 编辑: asdfrtg (101.8.247.163), 10/01/2017 13:50:27
13F:推 KKbiger: 把你的st.net as.formula()函数包一下 10/01 22:46
14F:→ KKbiger: 我用你的资料是可以正常执行的 10/01 22:46







like.gif 您可能会有兴趣的文章
icon.png[问题/行为] 猫晚上进房间会不会有憋尿问题
icon.pngRe: [闲聊] 选了错误的女孩成为魔法少女 XDDDDDDDDDD
icon.png[正妹] 瑞典 一张
icon.png[心得] EMS高领长版毛衣.墨小楼MC1002
icon.png[分享] 丹龙隔热纸GE55+33+22
icon.png[问题] 清洗洗衣机
icon.png[寻物] 窗台下的空间
icon.png[闲聊] 双极の女神1 木魔爵
icon.png[售车] 新竹 1997 march 1297cc 白色 四门
icon.png[讨论] 能从照片感受到摄影者心情吗
icon.png[狂贺] 贺贺贺贺 贺!岛村卯月!总选举NO.1
icon.png[难过] 羡慕白皮肤的女生
icon.png阅读文章
icon.png[黑特]
icon.png[问题] SBK S1安装於安全帽位置
icon.png[分享] 旧woo100绝版开箱!!
icon.pngRe: [无言] 关於小包卫生纸
icon.png[开箱] E5-2683V3 RX480Strix 快睿C1 简单测试
icon.png[心得] 苍の海贼龙 地狱 执行者16PT
icon.png[售车] 1999年Virage iO 1.8EXi
icon.png[心得] 挑战33 LV10 狮子座pt solo
icon.png[闲聊] 手把手教你不被桶之新手主购教学
icon.png[分享] Civic Type R 量产版官方照无预警流出
icon.png[售车] Golf 4 2.0 银色 自排
icon.png[出售] Graco提篮汽座(有底座)2000元诚可议
icon.png[问题] 请问补牙材质掉了还能再补吗?(台中半年内
icon.png[问题] 44th 单曲 生写竟然都给重复的啊啊!
icon.png[心得] 华南红卡/icash 核卡
icon.png[问题] 拔牙矫正这样正常吗
icon.png[赠送] 老莫高业 初业 102年版
icon.png[情报] 三大行动支付 本季掀战火
icon.png[宝宝] 博客来Amos水蜡笔5/1特价五折
icon.pngRe: [心得] 新鲜人一些面试分享
icon.png[心得] 苍の海贼龙 地狱 麒麟25PT
icon.pngRe: [闲聊] (君の名は。雷慎入) 君名二创漫画翻译
icon.pngRe: [闲聊] OGN中场影片:失踪人口局 (英文字幕)
icon.png[问题] 台湾大哥大4G讯号差
icon.png[出售] [全国]全新千寻侘草LED灯, 水草

请输入看板名称,例如:Boy-Girl站内搜寻

TOP