E can also be plotted directly using 3d plots 'contour;aspect 1'plot E
'density;aspect 1'plot E 'surface;aspect 1'plot E On Sep 3, 2017 1:37 AM, "Raul Miller" <rauldmil...@gmail.com> wrote: Do you mean like this? load 'plot' E=:(%:3) (] <:/ [ - (* |)) _,~_,i:20 'point;aspect 1;pensize 10' plot <"1|.|:($, $ #: I.@,)E Thanks, -- Raul On Sat, Sep 2, 2017 at 1:00 PM, Linda Alvord <lindaalv...@verizon.net> wrote: > > > It has rounded vertices and lumpy sides and uses too much paint. > > Experiment with S and pensize. > > > > load 'plot' > ]xx=:i:s=:20 > ]yy=:(%:3)+(-%:3)*|xx > ]D=:|.xx<:/yy > ]E=:|.0,.(0,D,0),.0 > ]t=:0{$E > ]x=:t#i.t > ]y=:(*:t)$i.t > ]A=: x;y > ]B=:|:>AI=:($E),"2(,E)#B > ]J=:|.<"1 |:I > 'point;aspect 1;pensize 10' plot J > > Please share ways to of ways to simplify this. Thanks. > Linda > > > Linda > > > Experiment with S and pensize. > > > > load 'plot' > > ]xx=:i:s=:20 > > ]yy=:(%:3)+(-%:3)*|xx > > ]D=:|.xx<:/yy > > ]E=:|.0,.(0,D,0),.0 > > ]t=:0{$E > > ]x=:t#i.t > > ]y=:(*:t)$i.t > > ]A=: x;y > > ]B=:|:>A > > I=:($E),"2(,E)#B > > ]J=:|.<"1 |:I > > $J > > 'point;aspect 1;pensize 10' plot J > > Let me know of ways to simplify this. Thanks. > > > > Linda > > > > Sent from AOL Mobile Mail > ---------------------------------------------------------------------- > For information about J forums see http://www.jsoftware.com/forums.htm ---------------------------------------------------------------------- For information about J forums see http://www.jsoftware.com/forums.htm ---------------------------------------------------------------------- For information about J forums see http://www.jsoftware.com/forums.htm