A023270 - OEIS

A023270

Primes that remain prime through 2 iterations of function f(x) = 10x + 9.

5, 13, 19, 23, 47, 61, 103, 127, 139, 233, 257, 293, 331, 433, 463, 491, 499, 547, 593, 701, 859, 967, 1009, 1013, 1049, 1223, 1321, 1399, 1493, 1567, 1723, 1811, 1867, 1889, 1997, 2039, 2063, 2087, 2137, 2203, 2267, 2273, 2309, 2423, 2437, 2441, 2609, 2633

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

COMMENTS

Primes p such that 10*p+9 and 100*p+99 are also primes. - Vincenzo Librandi, Aug 04 2010

LINKS

Harvey P. Dale, Table of n, a(n) for n = 1..1000

MATHEMATICA

Select[Prime[Range[400]], AllTrue[NestList[10#+9&, #, 2], PrimeQ]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* Harvey P. Dale, Jun 05 2015 *)

PROG

(Magma) [n: n in [1..100000] | IsPrime(n) and IsPrime(10*n+9) and IsPrime(100*n+99)] // Vincenzo Librandi, Aug 04 2010

CROSSREFS

Sequence in context: A171603 A118915 A084442 * A279765 A308196 A287615

Adjacent sequences: A023267 A023268 A023269 * A023271 A023272 A023273

KEYWORD

nonn

AUTHOR

David W. Wilson

STATUS

approved

Note: This service is not intended for secure transactions such as banking, social media, email, or purchasing. Use at your own risk. We assume no liability whatsoever for broken pages.

Pfad - The Proxy pFad of © 2024 Garber Painting. All rights reserved.