This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A036435 #14 May 18 2015 16:06:57 %S A036435 1,4,9,11,14,19,41,44,49,91,94,99,111,114,119,141,144,149,191,194,199, %T A036435 411,414,419,441,444,449,491,494,499,911,914,919,941,944,949,991,994, %U A036435 999,1111,1114,1119,1141,1144,1149,1191,1194,1199,1411,1414,1419,1441 %N A036435 Digits are nonzero squares. %C A036435 Invented by the HR concept formation program. %H A036435 Harvey P. Dale, <a href="/A036435/b036435.txt">Table of n, a(n) for n = 1..1000</a> %H A036435 S. Colton, <a href="http://www.cs.uwaterloo.ca/journals/JIS/colton/joisol.html">Refactorable Numbers - A Machine Invention</a>, J. Integer Sequences, Vol. 2, 1999, #2. %H A036435 S. Colton, <a href="http://web.archive.org/web/20070831060523/http://www.dai.ed.ac.uk/homes/simonco/research/hr/">HR - Automatic Theory Formation in Pure Mathematics</a> %t A036435 Flatten[Table[FromDigits/@Tuples[{1,4,9},n],{n,4}]] (* _Harvey P. Dale_, May 18 2015 *) %o A036435 (PARI) isok(n) = {digs = digits(n); for (i=1, #digs, if (! digs[i] || ! issquare(digs[i]), return (0));); return (1);} \\ _Michel Marcus_, Aug 31 2013 %Y A036435 Cf. A046030. %K A036435 easy,nonn,base %O A036435 1,2 %A A036435 Simon Colton (simonco(AT)cs.york.ac.uk) %E A036435 More terms from Sam Alexander (pink2001x(AT)hotmail.com).