fig508.m

这是一个matlab应用的论文和源代码

% [Na+](mol/l) contrast, NaCl-HCl-H2O sys at 29C
% fig508

% [Na+]  (mol/l) in ORIGINAL sol, NaCl-HCl-H2O sys at 29C
z1=[0 0 0.01 0 0.01 0.02 0 0.02 0.04 0];
z2=[0.01 0.02 0.04 0.06 0 0.02 0.04 0.06 0.08 0];
z3=[0 0.01 0.02 0.04 0.06 0.08 0.1];
z=[z1 z2 z3];

fh=figure('Color','w','position',[200 100 500 350]);
h1=axes('position',[0 0 1 1],'visible','off');
h2=axes('position',[0.07 0.12 0.32 0.8]);

draw27linear(z,'[Na^{+}](mol/l), Ini sol')


% [Na+]  (mol/l) in BALANCED sol, NaCl-HCl-H2O sys at 29C
z1=[0.0000412 0.0000467 0.01 0.0000577 0.01 0.02 0.0000714 0.02 0.04 0.0000879];
z2=[0.01 0.02 0.04 0.06 0.0000934 0.02 0.04 0.06 0.08 0.0000989];
z3=[0.0001071 0.01 0.02 0.04 0.06 0.08 0.1];
z=[z1 z2 z3];

h3=axes('position',[0.55 0.12 0.32 0.8]);

draw27linear(z,'[Na^{+}](mol/l), Equ sol')

str={'图5.8 吸附前后溶液中Na^{+ }的浓度变化'}; %the note of this picture! 
   set(gcf,'currentAxes',h1)
   text(0.5,0.03,str,'Fontsize',12,'horizontalAlignment','center')

 [X,map]=capture(fh);
 imwrite(X,map,'fig508.jpeg') % succeed in 2000.10.01
% n=-45 gedree best