Hofstadter Q sequence by pooq(teebee)

q:[1,1];thru 300 do dispterms((q:cons(q[q[1]]+q[q[2]],q))[3]);

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page