Hofstadter Q sequence: Difference between revisions

m
→‎{{header|Quackery}}: simplified bounds check in qpeek
(Added Quackery.)
m (→‎{{header|Quackery}}: simplified bounds check in qpeek)
Line 2,729:
=={{header|Quackery}}==
 
<lang Quackery> [ 2dup swap size dup 0negate <swap ifwithin 1+
abs swap size <
not if
[ drop size 1+ number$
Line 2,767 ⟶ 2,766:
<pre>1 1 2 3 3 4 5 5 6 6 ... 502
49798 decreasing terms</pre>
 
 
=={{header|R}}==
1,462

edits