[Jprogramming] convert 0,1 coding to _1,1

[Mike Day]

On 11/12/2012 12:13 AM, Brian Schott wrote:
Is there a better way than the verb `am` to do the following?

    am =:_1& (I.@:-.@]})
    am"1] 2 6 ?.@$ 2
_1 _1 _1 _1 1 _1
_1 _1 _1  1 1 _1

===============================================
Here are three other simple ways- my "random" array appears to be 
different from yours(!?):

    ((_1 + +:) ; ({&_1 1) ; (_1&^@>:); am"1 )2 6 ?.@$ 2
+----------------+----------------+----------------+----------------+
|_1 1  1 _1 _1  1|_1 1  1 _1 _1  1|_1 1  1 _1 _1  1|_1 1  1 _1 _1  1|
|_1 1 _1 _1 _1 _1|_1 1 _1 _1 _1 _1|_1 1 _1 _1 _1 _1|_1 1 _1 _1 _1 _1|
+----------------+----------------+----------------+----------------+


Mike