- 博客(4)
- 收藏
- 关注
RSS订阅原创 大数据第四次作业
mydata<-read.table(file.choose()) mydata head(mydata) mydist<-dist(mydata,method="euclidean") mymodel<-hclust(mydist) plot(mymodel,labels=mydata$V8) myresult<-cutree(mymodel,3) for(...
2018-12-08 20:44:23
194
原创 大数据第三次作业
mydata /显示文件 head(mydata) 显示文件的开头 mydata.train=mydata[2*(1:53)-1,] 生成训练集（奇数行） mydata.test=mydata[2*(1:53),] 生成测试集（偶数行） mymodel=rpart(Class~I0+PA500+HFS+DA+Area+A/DA+Max IP+...
2018-12-08 20:01:18
521
原创 大数据第二次作业
作业要求：1.读取forclass.csv文件2.几行几列3.读取出所有的列名给所有的行加编号c1-clastnumber，放在最左边5.把所有的数值变为字符，然后连接到一起，形成新的一列，放到最右边。 mydata&lt;-read.csv(file.choose())/读取该文件 mydata head(mydata) /求文件开头 ncol(mydata) /求行数 nrow(myd...
2018-11-21 22:43:35
288
原创 大数据第一次作业
作业要求：1读取该文件2对所有评价指标进行描述性分析，描述性分析包括：求最大值、最小值、中位数、众数等等，还有求表的行列数等。总之尽量把课堂讲的知识点都用到。 我的代码： mydata&lt;-read.csv(file.choose()) mydata head(mydata) /求标题 ncol(mydata) /求列数 nrow(mydata) /求行数 mydata1&l...
2018-11-21 22:30:29
307
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人