Download - Wolfram Research

3.9 Graphics Functions 351
Do an AC analysis from
Hz to MHz.
Display the trace of
V$2[f].
In[9]:= acsweep = ACAnalysis[eqsrlcf, {f, 10, 10^6}]
Out[9]=
V$1 InterpolatingFunction10., 1. 10 6 , ,
V$2 InterpolatingFunction10., 1. 10 6 , ,
V$3 InterpolatingFunction10., 1. 10 6 , ,
I$V1 InterpolatingFunction10., 1. 10 6 ,
In[10]:= NyquistPlot[acsweep, {V$2[f]}, {f, 10, 10^6}]
0.5 Im
0.4
0.3
0.2
0.1
0.2 0.4 0.6 0.8
-0.1
-0.2
V$2[f]
Re
Out[10]= Graphics
Display several
expressions in a Nyquist
plot.
In[11]:= NyquistPlot[acsweep, {V$2[f]−0.5, 0.5−V$2[f]},
{f, 10, 10^6}, Frame −> True, ShowLegend −> False]
Im
0.4
0.2
0
Re
-0.2
-0.4
-0.4-0.2 0 0.2 0.4
Out[11]= Graphics