摘要: data 0, 1, 0)#第二种方法,把预测结果转成概率值library('boot')inv.logit(predict(regularized.fit, newx = x, s = 0.001))#看效果set.seed(1)performance 0, 1, 0) error.rat... 阅读全文
posted @ 2015-10-25 15:42 地表最强队队员 阅读(324) 评论(0) 推荐(0) 编辑
摘要: 线性回归函数model<-lm(Weight~Height,data=?)coef(model):得到回归直线的截距predict(model):预测residuals(model):残差cor:相关性MSE:均方误差RMSE:均方误差的平方根,为0最好。缺点是可以取无限的值,这很难知识模型效果是否... 阅读全文
posted @ 2015-10-25 13:24 地表最强队队员 阅读(273) 评论(0) 推荐(0) 编辑
摘要: 1.计算缺失值比例perNA=8)Data2[NAIDX]=minSize,]) 阅读全文
posted @ 2015-10-25 09:51 地表最强队队员 阅读(453) 评论(0) 推荐(0) 编辑
摘要: 串行APPLY<- function(m){ mTemp <- apply(m, 2, mysort) return(mTemp)}snowfall包的并行SNOWFALL<-function(m,ncl){ library(snowfall) sfInit(parallel = TRUE,... 阅读全文
posted @ 2015-10-25 09:44 地表最强队队员 阅读(745) 评论(0) 推荐(0) 编辑