翻译一段 matlab语句到Mathematica

RT

t=s;

for i=length(s)-1:-1:1

t=[t s(i)]; %将23级面积全部合并为一数组

end

nn=squre/7; %平均分割时的面积

ss=0;

w=30000; %误差设置的初始值

sss=[];

while length(sss)~=7

w=w-1000;

for i=1:23

ss=ss+t(i);

if nn-w<=ss<=nn+w

sss=union(sss,ss);

ss=0;

end

end

end

sss %油道分割的各级面积

逆转录
吨=秒;
对于i =长度（拧）-1：-1:1
吨= [日ts（一）];％将23级面积全部合并为一数组
末端
神经网络= squre / 7;％，平均分割时的面积
ß = 0;
瓦特= 30000;％误差设置的初始值
安全局= [];
而长度（SSS）的〜= 7
瓦特=瓦特- 1000;
对于i = 1时23分
ß = ß +吨（1）;
如果辽瓦特“= ß”= nn的+瓦特
安全局=联盟（安全局，社会保障）;
ß = 0;
末端
末端
末端
安全局％油道分割的各级面积

呵呵，他拿英译汉软件直接翻译的！