OFFSET
1,2
COMMENTS
37 is in the sequence because 37^2 = 1369 and 1369 is an anagram of 3916 = (88 * 89)/2 = T(88).
71 is in the sequence because 71^2 = 5041 and 5041 is an anagram of 1540 = (55 * 56)/2 = T(55).
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
MATHEMATICA
n2tnQ[n_]:=Module[{cc=Select[FromDigits/@Permutations[IntegerDigits[n^2]], IntegerQ[ (Sqrt[8#+1]-1)/2]&]}, Length[Select[cc, IntegerLength[#] == IntegerLength[n^2]&]]>0]; Select[Range[300], n2tnQ] (* Harvey P. Dale, Aug 17 2012 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Claudio Meller, Jul 01 2009
STATUS
approved