Keith,
You did not describe what your problem is but the following which follows
the Plot Classes help closely may be what you want.
It provides separately labelled plots. If you want the function executed in
a locale specified by the
left argument that is quite different.
load 'plot'
Myplot=: 0 : 0
pc closeok;
xywh 225 13 150 150;cc g1 isigraph ws_border rightscale bottommove;
pas 2 0;pcenter;
rem form end;
)
WDplot=: 3 : 0
:
a=. conew 'jzplot'
Myplot__a =. Myplot
Myplot__a =. (3 {.Myplot__a),x,2}. Myplot__a
wd Myplot__a
PFormhwnd__a=. wd 'qhwndp'
PId__a=. 'g1'
plot__a y
)
'g0' WDplot 1 2 3 ; 2 0 2
'g1' WDplot 2 3 4 ;0 2 0
'g2' WDplot 1 2 5 8 9 ;1 2 3 2 1
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
