g@[&0
Henry Rich
On 9/20/2013 6:49 AM, Bo Jacoby wrote:
Thanks to Ric, Don, Kip, and Boss! I myself didn't manage to do it in finite
time. Bo.
________________________________
Fra: Ric Sherlock <[email protected]>
Til: Programming JForum <[email protected]>
Sendt: 2:41 fredag den 20. september 2013
Emne: Re: [Jprogramming] 13 : '(g^:x)y'
or:
f3=: g@]^:[
On Fri, Sep 20, 2013 at 10:56 AM, Don Guinn <[email protected]> wrote:
Don't know why it didn't, but it took me forever to write it tacit myself.
f2=.([:g])^:[
f2
+--------+--+-+
|+--+-+-+|^:|[|
||[:|g|]|| | |
|+--+-+-+| | |
+--------+--+-+
45 f 27
4616
On Thu, Sep 19, 2013 at 3:16 PM, Bo Jacoby <[email protected]> wrote:
g=.-:&(+ (2&|*>:&+:)) NB. (g y)= 2%~1+3*y if y is odd, (g y)=2%~y if y
is even.
f=.13 : '(g^:x)y'
f
>
4 : '(g^:x)y'
I wonder why f is not translated into tacit code.
It works nevertheless:
45 f 27
4616
----------------------------------------------------------------------
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
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
