RosettaCodeData/Task/Hofstadter-Q-sequence/J/hofstadter-q-sequence-2.j
Ingy döt Net 776bba907c Sync
2013-10-27 22:24:23 +00:00

1 line
43 B
Text

Q=: 1:`(+&$:/@:- $:@-& 1 2)@.(>&2)"0 M.