

A106720


Largest of six consecutive primes the sum of the digits of each of which is prime.


1



2089, 2609, 3299, 3301, 3307, 4177, 4201, 4423, 4441, 4447, 7129, 12109, 12479, 14341, 14347, 14369, 14387, 25073, 27109, 27127, 27143, 32341, 33409, 34057, 34253, 34259, 35227, 35803, 42227, 59809, 67213, 67217, 80221, 101267, 102107
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


LINKS



EXAMPLE

a(1)=2089 is a term because this is Largest of six consecutive primes i.e. 2063,2069,2081,2083,2087 and 2089, whose sum of digits is prime i.e. 2+0+6+3=11, 2+0+6+9=17, 2+0+8+1=11, 2+0+8+3=13, 2+0+8+7=17 and 2+0+8+9=19.


MATHEMATICA

idprQ[n_]:=PrimeQ[Total[IntegerDigits[n]]]; Transpose[Select[ Partition[ Prime[ Range[ 10000]], 6, 1], And@@idprQ/@#&]][[6]] (* Harvey P. Dale, Dec 05 2014 *)


CROSSREFS



KEYWORD

base,nonn


AUTHOR



EXTENSIONS



STATUS

approved



