بچه ها خودم به جواب رسیدم
کد:
clear;
clc;
x= [12 43 34;75 54 64]
r=.2
[p,m]=size( x)
y=(mean(x'))'
z_0= y;
for t=1:m
if (t==1)
z(1:p,t)=r*x(1:p,t)+(1-r)*z_0;
else
z(1:p,t)=r*x(1:p,t)+(1-r)*z(t- 1);
end
end;
z