| 所在主题: | |
| 文件名: 新建 Microsoft Office Word 97 - 2003 文档.doc | |
| 资料下载链接地址: https://bbs.pinggu.org/a-1327992.html | |
| 附件大小: | |
|
library(gam) data <- read.csv("C:\\Users\\user\\Desktop\\1.csv", header=TRUE) f <- 0;ok <- TRUE while (ok) { for (i in 1:3) { ep <- y - rowSums(f[, -i]) b <- smooth.spline(x[, i], ep, df = edf) f[, i] <- predict(b, x[, i])$y } rss <- sum((y - rowSums(f))^2) if (abs(rss - rss0) < 1e-6*rss) ok <- FALSE; rss0 <- rss }就是这一段程序,运行的时候总是很多错误,请高手们帮帮忙看看哪有问题,先谢过啦! |
|
熟悉论坛请点击新手指南
|
|
| 下载说明 | |
|
1、论坛支持迅雷和网际快车等p2p多线程软件下载,请在上面选择下载通道单击右健下载即可。 2、论坛会定期自动批量更新下载地址,所以请不要浪费时间盗链论坛资源,盗链地址会很快失效。 3、本站为非盈利性质的学术交流网站,鼓励和保护原创作品,拒绝未经版权人许可的上传行为。本站如接到版权人发出的合格侵权通知,将积极的采取必要措施;同时,本站也将在技术手段和能力范围内,履行版权保护的注意义务。 (如有侵权,欢迎举报) |
|
京ICP备16021002号-2 京B2-20170662号
京公网安备 11010802022788号
论坛法律顾问:王进律师
知识产权保护声明
免责及隐私声明