login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A226486 First available increasing palindromes (A002113) found in the decimal expansion of Pi-3 (A000796). 2

%I

%S 1,4,5,9,535,979,46264,59195,73637,77477,99999,467764,8683868,

%T 23911932,398989893,559555955,769646967,972464279,992868299,

%U 21348884312,49612121694,450197791054,9475082805749

%N First available increasing palindromes (A002113) found in the decimal expansion of Pi-3 (A000796).

%t pi = RealDigits[Pi-3, 10, 2500000][[1]]; palQ[n_] := n == Reverse[n]; mx = 0; k = 1; While[k < 1000, j = 1; While[j <= k, If[ palQ[ Take[ pi, {j, k}]], p = FromDigits[ Take[ pi, {j, k}]]; If[p > mx, mx = p; Print[p]; pi = Drop[pi, k]; k = 0; Break[]]]; j++]; k++]

%Y Cf. A000796, A068046, A226487.

%K nonn,base

%O 1,2

%A _Patrick De Geest_ & _Robert G. Wilson v_, Jun 09 2013

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified September 20 22:20 EDT 2019. Contains 327252 sequences. (Running on oeis4.)