错误代码：
t=colSums(AML)
t<-as.matrix(t)
t<-t(t)
AML<-rbind(t,AML[1:80,])
t<-as.data.frame(t)
AML<-round(AML)
AML<-t(AML)
AML<-as.data.frame(AML)
#t<-t(t)
AML_fit<-rbind(t,fit_AML$power_fit)
Error in match.names(clabs, names(xi)) : 名字同原来已有的名字不相对
解决方法：
将 t<-as.data.frame(t) 移动到?AML_fit<-rbind(t,fit_AML$power_fit)?后面就好了