|
|
A094207
|
|
a(n) = prime(4n-3) + prime(4n-2) + prime(4n-1) + prime(4n).
|
|
0
|
|
|
17, 60, 120, 184, 258, 324, 408, 480, 576, 660, 744, 830, 928, 1012, 1098, 1194, 1298, 1408, 1502, 1596, 1704, 1788, 1870, 1980, 2094, 2236, 2328, 2420, 2508, 2602, 2694, 2820, 2942, 3038, 3166, 3282, 3378, 3480, 3588, 3726, 3838, 3948, 4062, 4152, 4244
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
FORMULA
|
|
|
EXAMPLE
|
a(1) = prime(1) + prime(2) + prime(3) + prime(4) = 2 + 3 + 5 + 7 = 17.
a(2) = prime(5) + prime(6) + prime(7) + prime(8) = 11 + 13 + 17 + 19 = 60.
a(3) = prime(9) + prime(10) + prime(11) + prime(12) = 23 + 29 + 31 + 37 = 120.
|
|
MATHEMATICA
|
f[n_] := Sum[ Prime[i], {i, 4n - 3, 4n}]; Table[ f[n], {n, 45}] (* Robert G. Wilson v, Jun 01 2004 *)
|
|
PROG
|
(Magma) [NthPrime(4*n-3) + NthPrime(4*n-2) + NthPrime(4*n-1) + NthPrime(4*n): n in [1..50]]; // Vincenzo Librandi, Jul 25 2015
(PARI) vector(50, n, prime(4*n-3) + prime(4*n-2) + prime(4*n-1) + prime(4*n)) \\ Michel Marcus, Jul 25 2015
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Jun Mizuki (suzuki32(AT)sanken.osaka-u.ac.jp), May 26 2004
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|