谁能画这个程序曲线？
function fcht
h0=figure('toolbar','none',...
'position',[198 56 350 300],...
'name','平衡压力与温度的关系');
H0=-75.847;
S0=-118.5252;
R=8.314;
T=0:700;

log(peq)=abs(H0/R./T-S0/R);
plot(T,log(peq),'r-')
xlabel('温度');
ylabel('log(peq)');
title('平衡压力与温度的关系');
grid on ;

怎么没有人回答问题啊？

function fcht
h0=figure('toolbar','none',...
'position',[198 56 350 300],...
'name','平衡压力与温度的关系');
H0=-75.847;
S0=-118.5252;
R=8.314;
T=0:700;

peq=abs(H0/R./T-S0/R);
plot(T,log(peq),'r-')
xlabel('温度');
ylabel('log(peq)');
title('平衡压力与温度的关系');
grid on ;
这样应该就可以拉!!