lyladuan N=2500 m=20 data_t=rt(N*m,8) M_t=array(0,N) for(i in 1:N){ M_t=max(data_t[seq(1+(i-1)*m,i*m,by=1)]) }
suckbunny 回复 第1楼 的 lyladuan:你是不是想这样: <br /> N=2500<br /> m=20<br /> data_t <- matrix(rt(N*m,8),N,m)<br /> M_t <- apply(data_t,1,max)<br /> </p>