Contents of file 'sgfilter/fig4.mp':
1 input graph; beginfig(1); draw begingraph(120mm,50mm); setrange(0.0,-7.0,2.5,7.0); pickup pencircle scaled .5pt; gdraw "example-1.0.dat" withcolor .6[black,white]; pickup pencircle scaled .8pt; gdraw "example-0.0.dat" dashed evenly withcolor black; gdraw "example-1.0-f-10.dat" withcolor blue; gdraw "example-1.0-f-60.dat" withcolor red; gdraw (0.1,-3.2)--(0.3,-3.2) dashed evenly withcolor black; glabel.rt(btex Underlying function $ g(x)$ etex,(0.3,-3.2)); gdraw (0.1,-4.2)--(0.3,-4.2) withcolor .6[black,white]; glabel.rt(btex $ g(x)$ with added Gaussian noise of variance $ {
m var}(u(x))=1.0$ etex,(0.3,-4.2)); gdraw (0.1,-5.2)--(0.3,-5.2) withcolor blue; glabel.rt(btex Filtered with $ m=4$ and $ {\it nl}={\it nr}=10$ etex,(0.3,-5.2)); gdraw (0.1,-6.2)--(0.3,-6.2) withcolor red; glabel.rt(btex Filtered with $ m=4$ and $ {\it nl}={\it nr}=60$ etex,(0.3,-6.2)); pickup pencircle scaled .25pt; autogrid(itick bot,itick lft); glabel.bot(btex $ x$ etex,OUT); glabel.lft(btex $ y$ etex,OUT); endgraph; endfig; end
2
Generated by ::viewsrc::