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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A238332 Primes whose digits, after the first, form a nonprime number not occurring earlier. 2
11, 19, 127, 139, 149, 151, 157, 163, 181, 191, 193, 199, 233, 269, 277, 421, 487, 1117, 1123, 1129, 1153, 1171, 1187, 1201, 1213, 1217, 1231, 1237, 1249, 1259, 1279, 1289, 1291, 1297, 1301, 1303, 1319, 1321, 1327, 1361, 1381, 1399, 1423, 1427, 1429, 1447 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

The corresponding nonprime numbers are in A238333.

LINKS

T. D. Noe and Reinhard Zumkeller, Table of n, a(n) for n = 1..10000, first 2700 terms from T. D. Noe

MATHEMATICA

t = {}; eList = {}; p = 7; While[Length[t] < 1000, p = NextPrime[p]; e = FromDigits[Rest[IntegerDigits[p]]]; If[! PrimeQ[e] && ! MemberQ[eList, e], AppendTo[t, p]; AppendTo[eList, e]]]; t

PROG

(Haskell)

a238332 n = a238332_list !! (n-1)

a238332_list = f [] $ drop 4 a000040_list where

   f xs (p:ps) | a010051 t == 1 || t `elem` xs = f xs ps

               | otherwise = p : f (t:xs) ps

               where t = read $ tail $ show p

-- Reinhard Zumkeller, Feb 28 2014

CROSSREFS

Cf. A000040 (prime numbers), A238333.

Cf. A010051.

Sequence in context: A043968 A199329 A121132 * A089773 A048389 A163151

Adjacent sequences:  A238329 A238330 A238331 * A238333 A238334 A238335

KEYWORD

nonn,base

AUTHOR

T. D. Noe, Feb 28 2014

STATUS

approved

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 June 18 14:52 EDT 2019. Contains 324213 sequences. (Running on oeis4.)