#先读取这两个sheet，发现顺序没问题

Treatments<- read.xlsx(file="data.xlsx",sheetName="Treatments",colClasses=NA)
Intake<- read.xlsx(file="data.xlsx",sheetName="Intake",colClasses=NA)
head(Treatments)
head(Intake)
#原本的编号都是从81开始，如下：
PubID TrtID TrtName N
1 81 404 HI+NM 8
2 81 405 HI+MS 8
3 81 406 LO+NM 8
4 81 407 LO+MS 8
5 82 408 Gam+low 8
6 82 409 Gam+high 8

再将Treatments 和Intake合并到Data中，序号就错了，不知道为什么？之前都没问题的，突然就出错了救命

Data<-merge(Treatments,Intake,by=c("PubID","TrtID"))
head(Data)
#一模一样的指令，PubID和TrtID本应该也是从81、404开始的，之前也都是对的，结果从昨天晚上起就突然变成了100开始？
PubID TrtID TrtName N DMI OMI NI SolNI ADFI NDFI StarchI
1 100 489 Control 2 6.59 6.382 152.4 NA NA 1.044 3.879
2 100 490 5%NMDGS 2 6.13 5.938 147.1 NA NA 0.938 3.556
3 100 491 10%NMDGS 2 6.26 6.042 146.4 NA NA 1.059 3.510
4 100 492 15%NMDGS 2 6.38 6.093 140.4 NA NA 1.169 3.311
5 100 493 10%CDGS 2 6.03 5.808 133.8 NA NA 1.009 3.299
6 101 494 13%cp basis diet 1 9.46 9.030 199.0 NA NA 1.990 5.030

#我目前尝试过关掉R和重启电脑，都没用，求问这到底是哪里出问题了怎么解决呀？感谢！

我是个傻子，才知道合并后排序可能会混乱，需要用order命令来重新排序，用Data<-Data[order(Data$PubID,Data$TrtID),]序号就正常了