login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A143390 Numbers in which every suffix (in base 10) is 1 or a prime. 5
1, 2, 3, 5, 7, 11, 13, 17, 23, 31, 37, 41, 43, 47, 53, 61, 67, 71, 73, 83, 97, 101, 103, 107, 113, 131, 137, 167, 173, 197, 211, 223, 241, 271, 283, 307, 311, 313, 317, 331, 337, 347, 353, 367, 373, 383, 397, 401, 431, 443, 461, 467, 503, 523, 541, 547, 571, 601 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

COMMENTS

Subsequence of A042986 apart from first term; a(n+1)=A042986(n) for n<25.

LINKS

Reinhard Zumkeller, Table of n, a(n) for n = 1..1000

MATHEMATICA

prQ[n_] := n == 1 || PrimeQ[n];

okQ[n_] := Module[{dd = IntegerDigits[n]}, AllTrue[Range[Length[dd]-1], prQ@ FromDigits@ Drop[dd, #]&]];

{1}~Join~Select[ Prime@Range[1000], okQ] (* Jean-Fran├žois Alcover, Nov 20 2019 *)

PROG

(PARI) is(n)=my(d=digits(n, 10)); for(i=1, #d-1, if(!isprime(fromdigits(d[i..#d], 10)), return(0))); isprime(d[#d]) || d[#d]==1 \\ Charles R Greathouse IV, Nov 26 2016

CROSSREFS

Cf. A012883, A012884.

Sequence in context: A040065 A051647 A042986 * A038617 A036962 A160337

Adjacent sequences:  A143387 A143388 A143389 * A143391 A143392 A143393

KEYWORD

nonn,base

AUTHOR

Reinhard Zumkeller, Aug 13 2008

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 May 17 18:17 EDT 2021. Contains 343986 sequences. (Running on oeis4.)