有大神能帮我用matlab中的for循环来编写一下这个程序吗？跪求！！！

Data=xlsread('NWP01.xlsx');
Data1 = Data(1:1271,1);
Data01=reshape(Data1,41,31);
Data001=mean(Data01,1);
Data0001=Data001';
Data2 = Data(1:1271,2);
Data02=reshape(Data1,41,31);
Data002=mean(Data02,1);
Data0002=Data002';
Data3 = Data(1:1271,3);
Data03=reshape(Data3,41,31);
Data003=mean(Data03,1);
Data0003=Data003';
Data4=Data(1:1271,4);
Data04=reshape(Data4,41,31);
Data004=Data04';
Data5=[Data0001 Data0002 Data0003 Data004];