Boustrophedon transform: Difference between revisions

m
m (→‎{{header|J}}: make M local in alternate approach)
Line 154:
'(-1)^n A062162', (flat 1, [\×] -1 xx *),
'Primes A000747', (^∞ .grep: &is-prime),
'FibbonaccisFibonaccis A000744', (1,1,*+*…*),
'Factorials A230960', (1,|[\×] 1..∞)
-> $name, $seq
Line 175:
1000th term: 13250869953362054385…82450325540640498987 (2371 digits)
 
FibbonaccisFibonaccis A000744:
1 2 5 14 42 144 563 2526 12877 73778 469616 3288428 25121097 207902202 1852961189
1000th term: 56757474139659741321…66135597559209657242 (2370 digits)
10,333

edits