OFFSET
1,3
COMMENTS
For proof of finiteness see A069693.
MATHEMATICA
Do[ If[ Union[ Drop[ RotateLeft[ IntegerDigits[n(n + 1)/2]], -2]] == {6}, Print[n(n + 1)/2]], {n, 14, 2 10^6}]
CROSSREFS
KEYWORD
nonn,base,fini,full
AUTHOR
Amarnath Murthy, Apr 06 2002
EXTENSIONS
Corrected by Sascha Kurz, Jan 02 2003
STATUS
approved