|
| |
|
|
A092613
|
|
Let p_i(n) = n-th prime ending in i; then a(n) = p_1(n) + p_3(n) + p_7(n) + p_9(n).
|
|
4
| |
|
|
40, 90, 160, 230, 280, 380, 460, 530, 610, 710, 780, 870, 970, 1110, 1180, 1280, 1330, 1460, 1540, 1610, 1690, 1860, 1930, 2000, 2190, 2280, 2390, 2480, 2590, 2670, 2740, 2870, 2980, 3130, 3190, 3310, 3480, 3580, 3720, 3780, 3920, 4000, 4080, 4170, 4260
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
COMMENTS
| All terms end in 0, first term to end in just 00 is a(67), with 000 a(24) and with 0000 is a(1168). - Robert G. Wilson v - Robert G. Wilson v (rgwv(AT)rgwv.com), Apr 13 2004
|
|
|
EXAMPLE
| a(1) = 3+7+11+19 = 40
a(2) = 13+17+31+29 = 90
a(3) = 23+37+41+59 = 160
|
|
|
MATHEMATICA
| A092613[n_] := Block[{p = Prime[ Range[5*(n + 10)]]}, Select[p, Mod[ #, 10] == 1 &][[n]] + Select[p, Mod[ #, 10] == 3 &][[n]] + Select[p, Mod[ #, 10] == 7 &][[n]] + Select[p, Mod[ #, 10] == 9 &][[n]]]; Table[ A092613[n], {n, 50}] (from Robert G. Wilson v Apr 13 2004)
|
|
|
CROSSREFS
| Sequence in context: A043414 A044178 A044559 * A005930 A036194 A023695
Adjacent sequences: A092610 A092611 A092612 * A092614 A092615 A092616
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Jorge Coveiro (jorgecoveiro(AT)yahoo.com), Apr 11 2004
|
|
|
EXTENSIONS
| More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Apr 13 2004
|
| |
|
|
