[go: up one dir, main page]

login
A027729
Numbers k such that k^2+k+6 is a palindrome.
3
0, 1, 24, 25, 28, 288, 2485, 2550, 2888, 2946, 28888, 146777, 264334, 288888, 292276, 2834101, 2873233, 2888888, 2952316, 2960816, 2985943, 2995631, 14604657, 16353547, 28888888, 29190748, 29585508, 148278137, 264056434, 288888888, 2853889203, 2931604151, 28988127118
OFFSET
1,3
MATHEMATICA
palOblongPlus6Q[n_] := Module[{d = IntegerDigits[n^2 + n + 6]}, d == Reverse[d]]; Select[Range[0, 3000000], palOblongPlus6Q] (* Harvey P. Dale, Nov 14 2012 *)
PROG
(Magma) [n: n in [0..3*10^6] | Intseq(n^2+n+6) eq Reverse(Intseq(n^2+n+6))]; // Vincenzo Librandi, Jun 16 2016
CROSSREFS
KEYWORD
nonn,base
EXTENSIONS
a(23)-a(33) from Giovanni Resta, Aug 27 2018
STATUS
approved