A029738 Palindromic squares in base 12.
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
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..58
- Patrick De Geest, Palindromic Squares in bases 2 to 17
Crossrefs
Programs
-
Mathematica
pb12Q[n_]:=Module[{idn12=IntegerDigits[n, 12]}, idn12==Reverse[idn12]]; Select[Range[0, 20000]^2, pb12Q] (* Vincenzo Librandi, Jul 24 2014 *)