A027718 Numbers k such that k^2+k+5 is a palindrome.

0, 1, 2, 8, 12, 26, 74, 127, 224, 230, 2751, 3462, 4012, 4067, 12752, 22424, 27548, 28168, 105322, 107422, 2358150, 2724718, 2775383, 4063892, 7569245, 85125933, 87579753, 106617617, 2237334999, 2426472519, 2765569146, 2781875716, 2815069131, 4029203527

Offset

1,3

Links

Giovanni Resta, Table of n, a(n) for n = 1..46

Mathematica

palQ[n_] := Block[{d = IntegerDigits[n]}, d == Reverse[d]]; f[n_] := n^2 + n + 5; Select[Range[0, 10^5], palQ@ f@ # &] (* Giovanni Resta, Aug 29 2018 *)

Crossrefs

Cf. A027728, A027690, A027754, A027755, A027716, A027729.

Sequence in context: A135957 A107755 A268836 * A115102 A257082 A265736

Adjacent sequences: A027715 A027716 A027717 * A027719 A027720 A027721

Keyword

nonn,base

Author

Patrick De Geest

Extensions

More terms from Giovanni Resta, Aug 28 2018

Status

approved