OFFSET
1,3
LINKS
Michael S. Branicky, Table of n, a(n) for n = 1..49
Patrick De Geest, Palindromic Quasipronics of the form n(n+x)
Erich Friedman, What's Special About This Number? (See entries 1452, 1582, 5412, 8338, 8459.)
MATHEMATICA
Select[Range[0, 9999], PalindromeQ[#^2 + 4#] &] (* Alonso del Arte, Nov 10 2019 *)
PROG
(Scala) def palQ(n: Int, b: Int = 10): Boolean = n - Integer.parseInt(n.toString.reverse) == 0
(0 to 9999).filter((n: Int) => palQ(n * n + 4 * n)) // Alonso del Arte, Nov 10 2019
(Python)
from itertools import count, islice
def ispal(n): s = str(n); return s == s[::-1]
def agen():
for k in count(0):
if ispal(k*(k+4)):
yield k
print(list(islice(agen(), 32))) # Michael S. Branicky, Jan 25 2022
CROSSREFS
KEYWORD
nonn,base
AUTHOR
EXTENSIONS
a(33) and beyond from Michael S. Branicky, Jan 25 2022
STATUS
approved