cp's OEIS Frontend

A328492 First differences of A240510 (Numbers whose "reverse and add" process becomes palindromic at 8813200023188).

%I A328492 #5 Oct 16 2019 20:23:38
%S A328492 9,89,99,99,198,99,99,88,11,88,329,90,90,90,90,90,90,90,369,90,90,90,
%T A328492 90,90,90,90,369,90,90,90,90,90,90,90,369,90,90,90,90,90,90,90,369,90,
%U A328492 90,90,90,90,90,90,369,90,90,90,90,90,90,90,369,90,90,90,90
%N A328492 First differences of A240510 (Numbers whose "reverse and add" process becomes palindromic at 8813200023188).
%C A328492 Additional patterns can be seen in the bfile.
%H A328492 Robert Price, <a href="/A328492/b328492.txt">Table of n, a(n) for n = 1..176</a>
%t A328492 limit = 10^3; (* Assumes that there is no palindrome if none is found before "limit" iterations *)
%t A328492 Differences@Select[Range[0, 50000], (np = #; i = 0;
%t A328492     While[ ! PalindromeQ[np] && i < limit,
%t A328492      np = np + IntegerReverse[np]; i++];
%t A328492 np == 8813200023188) &] (* _Robert Price_, Oct 16 2019 *)
%Y A328492 Cf. A033670, A240510.
%K A328492 base,nonn,fini
%O A328492 1,1
%A A328492 _Robert Price_, Oct 16 2019