Magnanimous numbers: Difference between revisions
Content deleted Content added
Line 853: | Line 853: | ||
strange=: ({. + [: i. -~/)@:(_1 0&+) NB. produce index ranges for output |
strange=: ({. + [: i. -~/)@:(_1 0&+) NB. produce index ranges for output |
||
I=: _2 <@strange\ 1 45 241 250 391 400 |
I=: _2 <@strange\ 1 45 241 250 391 400 |
||
I (":@:{~ >)~"0 _ A |
|||
0 1 2 3 4 5 6 7 8 9 11 12 14 16 20 21 23 25 29 30 32 34 38 41 43 47 49 50 52 56 58 61 65 67 70 74 76 83 85 89 92 94 98 101 110 |
0 1 2 3 4 5 6 7 8 9 11 12 14 16 20 21 23 25 29 30 32 34 38 41 43 47 49 50 52 56 58 61 65 67 70 74 76 83 85 89 92 94 98 101 110 |
||
17992 19972 20209 20261 20861 22061 22201 22801 22885 24407 |
17992 19972 20209 20261 20861 22061 22201 22801 22885 24407 |