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 A069700 #3 Dec 05 2013 19:55:17 %S A069700 0,1,3,6,10,15,21,28,36,45,55,66,78,91,190,496,595,990,5995 %N A069700 Triangular numbers with internal digits 9. %C A069700 For proof of finiteness see A069693. %t A069700 Do[ If[ Union[ Drop[ RotateLeft[ IntegerDigits[n(n + 1)/2]], -2]] == {9}, Print[n(n + 1)/2]], {n, 14, 10^6}] %Y A069700 Cf. A069675 to A069684, A069693 to A069700. %K A069700 fini,full,nonn,base %O A069700 1,3 %A A069700 _Amarnath Murthy_, Apr 06 2002