|
%I #10 Aug 29 2018 06:08:53
%S 0,1,2,9,17,23,64,75,99,191,204,999,1747,1907,2365,2966,5731,9999,
%T 18991,20564,99999,174601,174747,179317,243063,293786,552101,999999,
%U 1868287,2967032,9200156,9999999,22765895,31552659,93809716,99999999,185812387,999999999
%N Numbers k such that k*(k+2) is a palindrome.
%H Giovanni Resta, <a href="/A028503/b028503.txt">Table of n, a(n) for n = 1..53</a>
%H P. De Geest, <a href="http://www.worldofnumbers.com/quapron.htm">Palindromic quasipronic numbers of the form n(n+2)</a>
%F a(n) = A070253(n) - 1. a(n) * (a(n) + 2) = A028504(n). - _Giovanni Resta_, Aug 29 2018
%t palQ[n_] := Block[{d = IntegerDigits[n]}, d == Reverse[d]]; Select[Range[0, 10^5], palQ[# (# + 2)] &] (* _Giovanni Resta_, Aug 29 2018 *)
%Y Cf. A005563, A028504, A070253.
%K nonn,base
%O 1,3
%A _Patrick De Geest_
%E More terms from _Giovanni Resta_, Aug 28 2018
|
