%exm07811_1.m
clf,shg
syms t tao;
y=2/3*exp(-t/2)*cos(sqrt(3)/2*t);	%定義符號函數
s=subs(int(y,t,0,tao),tao,t);			%獲得積分函數
subplot(1,2,1),ezplot(y,[0,4*pi]);grid
subplot(1,2,2),ezplot(s,[0,4*pi]);grid
title('s = \inty(t)dt')					%重寫右子圖圖名