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

 

Logo
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
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
Sequence in context: A053724 A046220 A141792 * A060264 A219429 A256457
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.

License Agreements, Terms of Use, Privacy Policy. .

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