login
A029738
Palindromic squares in base 12.
11
0, 1, 4, 9, 169, 676, 21025, 24649, 28561, 32041, 32761, 84100, 85264, 91204, 373321, 2989441, 3045025, 3179089, 3553225, 4165681, 11957764, 13060996, 14409616, 430023169, 436016161, 442050625, 448126561, 505215529
OFFSET
1,3
MATHEMATICA
pb12Q[n_]:=Module[{idn12=IntegerDigits[n, 12]}, idn12==Reverse[idn12]]; Select[Range[0, 20000]^2, pb12Q] (* Vincenzo Librandi, Jul 24 2014 *)
KEYWORD
base,nonn
STATUS
approved