RosettaCodeData/Task/Hailstone-sequence/J/hailstone-sequence-2.j

8 lines
263 B
Plaintext

# hailseq 27 NB. sequence length
112
4 _4 {."0 1 hailseq 27 NB. first & last 4 numbers in sequence
27 82 41 124
8 4 2 1
(>:@(i. >./) , >./) #@hailseq }.i. 1e5 NB. number < 100000 with max seq length & its seq length
77031 351