% Script to create a table like the one on page D-25

disp(sprintf('\n\n'))
str2=[sprintf('\t\t'),' Error Analysis']; disp(str2)
str2=[sprintf('\t\t'),' Data Reduction  ']; disp(str2)
x=' ';
E_H_vector=error(1)*ones(size(Hi));
E_V_vector=error(2)*ones(size(Hi));
E_W_vector=error(3)*ones(size(Hi));
str=[sprintf('%d',1),sprintf('\t'),'Error in Hi(ft) ',sprintf('\t%4.1f\t',E_H_vector)]; disp(str)% line 1 of output table
str=[sprintf('%d',2),sprintf('\t'),'Error in Vi(kts)',sprintf('\t%4.1f\t',E_V_vector)]; disp(str)% line 2 of output table
str=[sprintf('%d',3),sprintf('\t'),'Error in Wt(lbf)',sprintf('\t%4.1f\t',E_W_vector)]; disp(str)% line 3 of output table
str=[sprintf('%d',4),sprintf('\t'),'Abs Err in CLmax',sprintf('\t%4.2f\t',abs_error)]; disp(str)% line 4 of output table
str=[sprintf('%d',5),sprintf('\t'),'Rss Err in CLmax',sprintf('\t%4.2f\t',rss_error)]; disp(str)% line 5 of output table
disp(sprintf('\n\n'))
