OFFSET
1,3
LINKS
Michael S. Branicky, Table of n, a(n) for n = 1..35
Patrick De Geest, Palindromic Quasipronics of the form n(n+x)
Erich Friedman, What's Special About This Number? (See entries 863, 8541.)
MATHEMATICA
Select[Range[0, 24*10^6], PalindromeQ[#(#+6)]&] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Sep 04 2017 *)
PROG
(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+6)):
yield k
print(list(islice(agen(), 22))) # Michael S. Branicky, Jan 25 2022
CROSSREFS
KEYWORD
nonn,base
AUTHOR
EXTENSIONS
a(23) and beyond from Michael S. Branicky, Jan 25 2022
STATUS
approved