login
A161464
Sum of all digits of primes from n-th prime to (2*n-1)-th prime.
1
2, 8, 14, 21, 29, 42, 53, 63, 75, 90, 97, 120, 143, 144, 155, 159, 167, 180, 193, 204, 224, 235, 249, 261, 262, 267, 286, 304, 324, 340, 359, 373, 380, 387, 401, 414, 440, 459, 483, 493, 509, 507, 523, 540, 554, 567, 587, 619, 634, 641, 654, 677, 696, 728, 760
OFFSET
1,1
LINKS
EXAMPLE
2nd prime to 3rd prime are 3, 5, hence a(2) = 8; 3rd prime to 5th prime are 5, 7, 11, hence a(3) = 14; 4th prime to 7th prime are 7, 11, 13, 17, hence a(4) = 21.
MATHEMATICA
Module[{nn=60, pr}, pr=Prime[Range[2nn-1]]; Table[Total[Flatten[ IntegerDigits/@ Take[pr, {n, 2n-1}]]], {n, nn}]] (* Harvey P. Dale, Jul 13 2015 *)
PROG
(Magma) [ &+[ &+Intseq(NthPrime(k), 10): k in [n..2*n-1] ]: n in [1..55] ]; // Klaus Brockhaus, Jun 13 2009
CROSSREFS
Cf. A000040 (primes), A007605 (sum of digits of n-th prime).
Sequence in context: A082930 A064148 A246299 * A211873 A248057 A121055
KEYWORD
nonn,base
AUTHOR
EXTENSIONS
Edited and extended by Klaus Brockhaus, Jun 13 2009
STATUS
approved