q=c(1,1);for(n in 1:300){q=c(sum(q[q[1:2]]),q);write(q[3],"")}

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

download

return to the top page