###数据管理//数据合并
a<-read.table("G:\\r练习\\基于R的统计分析与数据挖掘\\《基于R的统计分析与数据挖掘》数据和代码.rar\\ReportCard2.txt",header = TRUE)
b<-read.table("G:\\r练习\\基于R的统计分析与数据挖掘\\《基于R的统计分析与数据挖掘》数据和代码.rar\\ReportCard1.txt",header = TRUE)
c<-merge(a,b,by="xh") #以关键字合并数据
fix(c)
View(c)
###数据排序
plana<-order(c$math,na.last = TRUE,decreasing = TRUE) #plana是位置向量,按照成绩高低把位置排序
plana
c
names(c)
fix(c)
mathorder<-c[plana,]
fix(mathorder)