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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A106726 Smallest of nine consecutive primes whose sum of digits is prime. 0
14293, 200041, 210011, 710573, 799817, 851113, 1104113, 1133513, 1245227, 2000153, 2442113, 2442133, 2442151, 2442173, 2442179, 2442191, 2442197, 3301037, 3513997, 5684891, 5684909, 5684927, 5834513, 5977333, 6558733 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

Table of n, a(n) for n=1..25.

EXAMPLE

a(1)=14293 is a term because this is smallest of nine consecutive primes i.e. 14293,14303,14321,14323,14327,14341,14347,14369 and 14387, whose sum of digits is prime i.e. 1+4+2+9+3=19, 1+4+3+0+3=11, 1+4+3+2+1=11, 1+4+3+2+3=13, 1+4+3+2+7=17, 1+4+3+4+1=13,1+4+3+4+7=19,1+4+3+6+9=23 and 1+4+3+8+7=23.

MATHEMATICA

ncpQ[lst_]:=AllTrue[Total[IntegerDigits[#]]&/@lst, PrimeQ]; Transpose[ Select[ Partition[ Prime[Range[450000]], 9, 1], ncpQ]][[1]] (* The program uses the AllTrue function from Mathematica version 10 *) (* Harvey P. Dale, Sep 04 2014 *)

CROSSREFS

Sequence in context: A034232 A233889 A115554 * A064965 A072890 A249314

Adjacent sequences:  A106723 A106724 A106725 * A106727 A106728 A106729

KEYWORD

base,nonn

AUTHOR

Shyam Sunder Gupta, May 14 2005

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 | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy .

Last modified September 25 21:33 EDT 2017. Contains 292500 sequences.