\usemodule

[gnuplot] 

\setupGNUPLOTterminal

[context]

[width=5in,height=2.5in,fontscale=0.9] 

\setupGNUPLOTterminal

[tikz][width=5in,height=2.5in,fontscale=0.9] 

\starttext

\startGNUPLOTinclusions

set samples 400

set key left Left reverse

\stopGNUPLOTinclusion

\startGNUPLOTscript[myfunction]

set zeroaxis

set format y "%.1f"

plot [-4:2][0:2] 1 t '' lt 0, exp(x) t '$e^x$' lt 1 lw 3

plot cos(atan(x))*sin(x) t '$\cos(\arctan(x))\sin(x)$' lw 3 lc 3 

\stopGNUPLOTscript

\placefigure{none}{\useGNUPLOTgraphic[myfunction][2]} 

\setupGNUPLOT

[terminal=tikz] 

\placefigure{none}{\useGNUPLOTgraphic[myfunction][1]} 

\stoptext