Hi Dave,
Two @;@'s down. One to go.
fe=: 13 :'\:~_".;({~ [:perm#)L:_1 }.comb y'
(fe '135')-:f '135'
1
f
[: \:~ _ ". [: ; [: ({~ perm@#)L:_1 }.@comb
fe
[: \:~ _ ". [: ; [: ({~ ([: perm #))L:_1 [: }. comb
My native language is explicit.
Linda
-----Original Message-----
From: Programming <[email protected]> On Behalf Of Linda
Alvord
Sent: Tuesday, March 5, 2019 9:22 AM
To: [email protected]
Subject: Re: [Jprogramming] new tasks at rosettacode.org
Hi Dave,
Beautiful J and only 3 @'s!
Linda
'
Sent from my Verizon, Samsung Galaxy smartphone
-------- Original message --------
From: David Lambert <[email protected]>
Date: 3/5/19 8:06 AM (GMT-05:00)
To: programming <[email protected]>
Subject: [Jprogramming] new tasks at rosettacode.org
I submitted entries to many newly seen by me rosetta code tasks. There was some
low hanging fruit, such as involving totients.
There is a stretch goal for
https://nam01.safelinks.protection.outlook.com/?url=http%3A%2F%2Frosettacode.org%2Fwiki%2FLargest_number_divisible_by_its_digits&data=02%7C01%7C%7C15f17100d5714d45be7308d6a175e2dd%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C636873925014093007&sdata=yZ3%2FxaiLOWCtZtX9nf207IsvmsNv3RxI3kYuzEwhO8k%3D&reserved=0
to work in base 16. I solved the problem in base 7 instead to show how it
might be done without bothering to figure out if I had the resources for all
permutations of all combinations of fifteen digits. 0 isn't one of the digits.
Enjoy, Dave
----------------------------------------------------------------------
For information about J forums see
https://nam01.safelinks.protection.outlook.com/?url=http%3A%2F%2Fwww.jsoftware.com%2Fforums.htm&data=02%7C01%7C%7C15f17100d5714d45be7308d6a175e2dd%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C636873925014103018&sdata=XhjTDT153%2FQvmeQK4QccVYgXkuktIuHKFOKxRgkvJL0%3D&reserved=0
----------------------------------------------------------------------
For information about J forums see
https://nam01.safelinks.protection.outlook.com/?url=http%3A%2F%2Fwww.jsoftware.com%2Fforums.htm&data=02%7C01%7C%7C15f17100d5714d45be7308d6a175e2dd%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C636873925014103018&sdata=XhjTDT153%2FQvmeQK4QccVYgXkuktIuHKFOKxRgkvJL0%3D&reserved=0
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
