- 博客(4)
- 收藏
- 关注
原创 大数据第四次作业
mydata<-read.table(file.choose())mydatahead(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
139
原创 大数据第三次作业
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
368
原创 大数据第二次作业
作业要求:1.读取forclass.csv文件2.几行几列3.读取出所有的列名给所有的行加编号c1-clastnumber,放在最左边5.把所有的数值变为字符,然后连接到一起,形成新的一列,放到最右边。mydata&lt;-read.csv(file.choose())/读取该文件mydatahead(mydata) /求文件开头ncol(mydata) /求行数nrow(myd...
2018-11-21 22:43:35
191
原创 大数据第一次作业
作业要求:1读取该文件2对所有评价指标进行描述性分析,描述性分析包括:求最大值、最小值、中位数、众数等等,还有求表的行列数等。总之尽量把课堂讲的知识点都用到。我的代码:mydata&lt;-read.csv(file.choose())mydatahead(mydata) /求标题ncol(mydata) /求列数nrow(mydata) /求行数mydata1&l...
2018-11-21 22:30:29
209
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人