MATLAB: Run this code for every certain columns of tables in a cell and saving the result in new cell

cell arraysfor loopMATLABtable

Hi all,
I have a cell named C. In the C I have 71 tables. Each table has a column named rrr24. I want to run this code below for each rrr24 in the tables and save the results in another cell named C_new.
Here this code which in the first line just uses the first table in the C.
I want the name of each table at the new cell (C_new) to be the name of each table highlighted in the station_name column of each table. Or copy station_name column from each table and paste it as a first column of the same table in the C_new.
I attached C.
Thank you
td = C{1, 1}.rrr24; % example for C{1, 1}
n=length(td);
sc_set= [3,6,12,24]; 
SI=zeros(n,length(sc_set)); 
for q = 1:length(sc_set)
  sc = sc_set(k);
  if length(td(td>=0))/length(td)~=1
      SI(n,q)=nan;
  else
      SI(1:sc-1,q)=nan;
      A1=[];
      for i=1:sc,
          A1=[A1,td(i:length(td)-sc+i)];
      end
      Y=sum(A1,2);
      nn=length(Y);
      SI1=zeros(nn,1);
      for k=1:12
          d=Y(k:12:nn);
          nnn=length(d);
          bp=zeros(nnn,1);
          for i=1:nnn
              bp(i,1)=sum(d(:,1)<=d(i,1));
          end
          y=(bp-0.44)./(nnn+0.12);
          SI1(k:12:nn,1)=y;
      end
      SI1(:,1)=norminv(SI1(:,1));
      %output
      SI(sc:end,q)=SI1;
  end
end

Best Answer

Hello, I have taken a look at your workspace variable ("C"), and i think you should consider writing that program as a function file, so that you can use it for all tables in the cell array. You can use the code below and save it as your function file in the working (current) folder. 
function SI = myfunction(Cn,rnum,colnum,tcol) % save this as a functionfile with filename: "myfunction.m"
%Summary of "myfunction"
% SI = output
% Cn = Cell array storing all tables
% rnum = row index of table in cell array
% colnum = column index of table in cell array
% tcol = column number of table variable ("rrr24") on which you are doing the computations
td = table2array(Cn{rnum, colnum}(:,tcol)); % example for C{1, 1}
n=numel(td);
sc_set= [3,6,12,24]; 
SI=zeros(n,length(sc_set)); 
for q = 1:length(sc_set)
  sc = sc_set(q); % I have replaced "k" with "q" on this line
  if numel(td(td>=0))/numel(td)~=1
      SI(n,q)=nan;
  else
      SI(1:sc-1,q)=nan;
      A1=[];
      for i=1:sc
          A1=[A1,td(i:numel(td)-sc+i)]; %#ok<AGROW>
      end
      Y=sum(A1,2);
      nn=numel(Y);
      SI1=zeros(nn,1);
      for k=1:12
          d=Y(k:12:nn);
          nnn=numel(d);
          bp=zeros(nnn,1);
          for i=1:nnn
              bp(i,1)=sum(d(:,1)<=d(i,1));
          end
          y=(bp-0.44)./(nnn+0.12);
          SI1(k:12:nn,1)=y;
      end
      SI1(:,1)=norminv(SI1(:,1));
      %output
      SI(sc:end,q)=SI1;
  end
end
end
After that, consider using the code below. It should do nicely:
Cnew=cell(1,size(C,2)); % pre-allocating your new array
for r=1:size(C,1)
    for m=1:size(C,2)
        SI{r,m}= myfunction(C,r,m,11);% On this line, "11" is the column index of "rrr24" (your table variable)
        Cnew{r,m}=cell2table(C{r,m}.station_name); % input names under the "station_name" variable of your old tables into the new cell array based on their indexed locations
        Cnew{r,m}.Output=SI{r,m}; % Add column variable, "Output" holding computed values to each table in the new cell array based on their indexed positions
        Cnew{r,m}.Properties.VariableNames{1}='Station Name'; % variable name for first column of each table
    end
end
Related Question