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
