The OEIS is supported by the many generous donors to the OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A180458 Largest palindromic number <= n-th-prime. 2
 2, 3, 5, 7, 11, 11, 11, 11, 22, 22, 22, 33, 33, 33, 44, 44, 55, 55, 66, 66, 66, 77, 77, 88, 88, 101, 101, 101, 101, 111, 121, 131, 131, 131, 141, 151, 151, 161, 161, 171, 171, 181, 191, 191, 191, 191, 202, 222, 222, 222, 232, 232, 232, 242, 252, 262, 262, 262, 272 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 LINKS Robert Israel, Table of n, a(n) for n = 1..10000 MAPLE # given lists Primes of primes and Palis of palindromes, with Palis[-1] > Primes[-1] m:= 1; A:= 'A': for n from 1 to nops(Primes) do while m < nops(Palis) and Palis[m+1] <= Primes[n] do m:= m+1 od: A[n]:= Palis[m] od: seq(A[i], i=1..nops(Primes)); # Robert Israel, Apr 26 2016 MATHEMATICA lpn[n_]:=Module[{k=0}, While[!PalindromeQ[n-k], k++]; n-k]; Table[lpn[n], {n, Prime[Range[60]]}] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Dec 18 2020 *) CROSSREFS Cf. A000040, A261423. Sequence in context: A053724 A046220 A141792 * A060264 A219429 A256457 Adjacent sequences: A180455 A180456 A180457 * A180459 A180460 A180461 KEYWORD base,nonn AUTHOR Giovanni Teofilatto, Sep 06 2010 EXTENSIONS Corrected by Robert Israel, Apr 26 2016 STATUS approved

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

Last modified July 13 02:50 EDT 2024. Contains 374265 sequences. (Running on oeis4.)