How to reduce this code to one line.

Christopher

2013 7 20

0 个回答

29 次查看（30 天）

0 个投票

Hello, I am trying to reduce the number of lines in my code and was wondering if there is an easy way to do this. Given below are my inputs and my actual code. I don't need to reduce any of the inputs, just the actual code itself. Ideally, I would like to reduce S1 and E1 to one line each. Thank you

%%%%Inputs %%%%
npan1=25;   % number of panels patch 1
A=[0 -5 0];
B=[0 0 0];
npan2=25; % number of panels patch 1
A1=[0 0 0];
B1=[0 5 0];
%%%%Code %%%%
nlatall=npan1+npan2;
ss1=bsxfun(@times,B+(A-B),[1:npan1]'/npan1);
ss2=bsxfun(@times,A1+(B1-A1),[0:npan2-1]'/npan2);
e1=flipud(ss2);
S1=flipud([e1;ss1]);                  
ee1=bsxfun(@times,B+(A-B),[0:npan1-1]'/npan1);
ee2=bsxfun(@times,A1+(B1-A1),[1:npan2]'/npan2);
gg=flipud(ee2);
E1=flipud([gg;ee1]);