A210629 Each entry is the first of four consecutive primes with equal digital sum.

1442173, 2288509, 2660183, 2805773, 3830891, 4137473, 4951073, 5216137, 5517173, 5521819, 5521891, 5914591, 6474119, 6518173, 7118519, 7570273, 8508473, 8584273, 8689573, 8912591, 9383053, 9958519, 10116373, 10204391, 11418193, 11878873, 11890873, 12948773, 13738163, 13873073, 14377157, 14436391, 14677573, 14732191

Offset

1,1

Comments

The differences between each of the 4-consecutive primes are multiples of 18. - Harvey P. Dale, Jul 22 2016

Links

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

Example

2288509 is in the sequence because 2288509, 2288527, 2288563, and 2288581 are consecutive primes and the sum of the digits of each = 34

Mathematica

Transpose[Select[Partition[Prime[Range[1000000]], 4, 1], Total[ IntegerDigits[#[[1]]]]==Total[IntegerDigits[#[[2]]]] == Total[ IntegerDigits[#[[3]]]]==Total[IntegerDigits[#[[4]]]]&]][[1]]
Transpose[Select[Partition[Prime[Range[10^6]], 4, 1], Differences[ Total/@ (IntegerDigits/@#)]=={0, 0, 0}&]][[1]] (* Harvey P. Dale, Jul 22 2016 *)

Crossrefs

Cf. A066540, A209663, A209396.

Sequence in context: A234657 A015361 A259306 * A156621 A108841 A124490

Adjacent sequences: A210626 A210627 A210628 * A210630 A210631 A210632

Keyword

nonn,base

Author

Harvey P. Dale, Mar 25 2012

Status

approved