RosettaCodeData/Task/Hofstadter-Q-sequence/J/hofstadter-q-sequence-2.j
2023-07-01 13:44:08 -04:00

1 line
43 B
Text

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