Code covered by the BSD License  

Highlights from
Optimal Impulsive Orbital Transfer

Optimal Impulsive Orbital Transfer

by

 

27 Nov 2012 (Updated )

MATLAB script for the solution of the one and two impulse orbit transfer between two Earth orbits.

pgraphics(soln, x1, y1, y2)
function pgraphics(soln, x1, y1, y2)

% create disk file of primer graphics

% Orbital Mechanics with MATLAB

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

global fname

% create disk filename

pfilename1 = horzcat(fname, '_primer', num2str(soln), '.eps');

% clear graphics

clf;

% create primer graphics

subplot(2,1,1);

plot(x1 / 60.0, y1, '-r', 'LineWidth', 1.5);

title('Primer Vector Analysis', 'FontSize', 16);

ylabel('primer vector magnitude', 'FontSize', 12);

grid;

% create disk file

print('-depsc', pfilename1);

% plot behavior of magnitude of primer derivative

subplot(2,1,2);

plot(x1 / 60.0, y2, '-r', 'LineWidth', 1.5);

xlabel('time since first impulse (minutes)', 'FontSize', 12);

ylabel('primer derivative magnitude', 'FontSize', 12);

grid;

% create disk file

print('-depsc', pfilename1);

Contact us