[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
epstk and octave plotting similar to matlab's subplot?
From: |
petersk |
Subject: |
epstk and octave plotting similar to matlab's subplot? |
Date: |
Sat, 16 May 2009 18:13:32 -0700 (PDT) |
I am now trying to multiple plots on a page, but cannot get epstk to produce
multiple graphs. It puts the data on the same graph. Anyone have any
suggestions with the code below?
eopen('polarplot.eps')
eglobpar;
eWinGridVisible=0;
esavpar; % save default parameter
%title
eWinHeight
hsize=eWinHeight/10
etext(strcat('Pizza
Plots',num2str(eWinHeight),'x',num2str(eWinWidth)),50,eWinHeight-15,8,0,1)
ePlotAreaPos=[20 eWinHeight/5];
ePlotAreaHeight=hsize;
ePlotAreaWidth=40;
pizzaPat = [7.5, 7, 5.5, 4, 2.5, 0, -2, -3.5, -5, -8, -11.5, -13.5, -12, -8,
-5, -2, 1, 3, 4]
tmp=fliplr(pizzaPat);
pizzaPat =[pizzaPat tmp(2:length(pizzaPat))];
angle=[0:10:360].*pi/180;
ePolarAxisRadScale=[-30 10 10];
ePolarAxisAngValueFormat='%d deg';
ePlotTitleDistance=15;
ePlotTitleText='Pizza Alone';
ePolarPlotAreaAngStart=90;
ePolarPlotAreaAngEnd=450;
epolar(angle,pizzaPat);
%compute a few patterns
lambda = 0.1
distance = [0.25 0.5 1 2];
phasedif = 0; %pi/2;
fields = [1, 1*exp(-1i*phasedif)];
for ii = 1:4
erespar; % set default parameter
ePlotAreaPos=[20 eWinHeight/5 +ii*hsize];
ePlotAreaHeight=hsize;
ePlotAreaWidth=40;
resu=efield(fields(1),fields(2),psi(lambda, distance(ii),angle));
ePlotTitleDistance=15;
ePlotTitleText=strcat('Pizza ',num2str(distance(ii)),'m Apart');
ePolarPlotAreaAngStart=90;
ePolarPlotAreaAngEnd=450;
epolar(angle,resu.*pizzaPat);
epolar;
endfor
eclose
eview
--
View this message in context:
http://www.nabble.com/polar-plot-help---can%27t-make-it-work-tp23577806p23579336.html
Sent from the Octave - General mailing list archive at Nabble.com.