File:  [Local Repository] / imach096d / doc / mypar.plt
Revision 1.1: download - view: text, annotated - select for diffs
Fri Mar 8 17:11:53 2002 UTC (22 years, 8 months ago) by lievre
Branches: MAIN
CVS tags: Version-0-8a-jackson-revised, Version-0-8a, HEAD
jkhfskj

cd "D:/cygwin/home/agnes/imach/imachcvs/imach-0.71/mytry/" 
set xlabel "Age" 
set ylabel "Probability" 
set ter gif small size 400,300
plot [70:100] "vplrmypar.txt" every :::0::0 u 1:2 "%lf %lf (%lf) %*lf (%*lf)" t"Stationary prevalence" w l 0,"vplrmypar.txt" every :::0::0 u 1:($2+2*$3) "%lf %lf (%lf) %*lf (%*lf)" t"95% CI" w l 1,"vplrmypar.txt" every :::0::0 u 1:($2-2*$3) "%lf %lf (%lf) %*lf (%*lf)" t"" w l 1,"prmypar.txt" every :::0::0 u 1:($2) t"Observed prevalence " w l 2
set out "vmypar11.gif" 
replot

set xlabel "Age" 
set ylabel "Probability" 
set ter gif small size 400,300
plot [70:100] "vplrmypar.txt" every :::0::0 u 1:2 "%lf %*lf (%*lf) %lf (%lf)" t"Stationary prevalence" w l 0,"vplrmypar.txt" every :::0::0 u 1:($2+2*$3) "%lf %*lf (%*lf) %lf (%lf)" t"95% CI" w l 1,"vplrmypar.txt" every :::0::0 u 1:($2-2*$3) "%lf %*lf (%*lf) %lf (%lf)" t"" w l 1,"prmypar.txt" every :::0::0 u 1:($6) t"Observed prevalence " w l 2
set out "vmypar21.gif" 
replot

set ylabel "Years" 
set ter gif small size 400,300
plot [70:100] "trmypar.txt" every :::0::0 u 1:2 "%lf %lf (%lf) %*lf (%*lf) %*lf (%*lf)" t"TLE" w l ,"trmypar.txt" every :::0::0 u 1:($2-$3*2) "%lf %lf (%lf) %*lf (%*lf) %*lf (%*lf)" t"" w l 0,"trmypar.txt" every :::0::0 u 1:($2+$3*2) "%lf %lf (%lf) %*lf (%*lf) %*lf (%*lf)" t"" w l 0,"trmypar.txt" every :::0::0 u 1:2 "%lf %*lf (%*lf) %lf (%lf) %*lf (%*lf)" t"LE in state (1)" w l ,"trmypar.txt" every :::0::0 u 1:($2-$3*2) "%lf %*lf (%*lf) %lf (%lf) %*lf (%*lf)" t"" w l 0,"trmypar.txt" every :::0::0 u 1:($2+$3*2) "%lf %*lf (%*lf) %lf (%lf) %*lf (%*lf)" t"" w l 0,"trmypar.txt" every :::0::0 u 1:2 "%lf %*lf (%*lf) %*lf (%*lf) %lf (%lf)" t"LE in state (2)" w l ,"trmypar.txt" every :::0::0 u 1:($2-$3*2) "%lf %*lf (%*lf) %*lf (%*lf) %lf (%lf)" t"" w l 0,"trmypar.txt" every :::0::0 u 1:($2+$3*2) "%lf %*lf (%*lf) %*lf (%*lf) %lf (%lf)" t"" w l 0
set out "emypar1.gif" 
replot

set ter gif small size 400,300
plot [70:100] "ermypar.txt" every :::0::0 u 1:2 t "e11" w l,"ermypar.txt" every :::0::0 u 1:3 t "e12" w l
set out "expmypar11.gif" 
replot

set ter gif small size 400,300
plot [70:100] "ermypar.txt" every :::0::0 u 1:4 t "e21" w l,"ermypar.txt" every :::0::0 u 1:5 t "e22" w l
set out "expmypar21.gif" 
replot

set xlabel "Age" 
set ylabel "Probability" 
set ter gif small size 400,300
plot [70:100] "pijrmypar.txt" u ($1==1 ? ($3):1/0):($5/($4+$5)) t"prev(1,2)" w l,"pijrmypar.txt" u ($1==1 ? ($3):1/0):($8/($7+$8)) t"prev(2,2)" w l
set out "pmypar11.gif" 
replot

p1=-12.965571 
p2=0.135127 
p3=-7.482528 
p4=0.068843 
p5=-0.381775 
p6=-0.010177 
p7=-4.796242 
p8=0.048192 

set ter gif small size 400,300
set log y
plot  [70:100]  exp(p1+p2*x)/(1+exp(p1+p2*x)+exp(p3+p4*x)) t "p12" , exp(p3+p4*x)/(1+exp(p1+p2*x)+exp(p3+p4*x)) t "p13" , exp(p5+p6*x)/(1+exp(p5+p6*x)+exp(p7+p8*x)) t "p21" , exp(p7+p8*x)/(1+exp(p5+p6*x)+exp(p7+p8*x)) t "p23" 
set out "pemypar1.gif" 
replot


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>