|
| |
| |
|
|
|
4, 4, 2, 2, 5, 6, 20, 20, 36, 127, 152, 290, 376, 423, 590, 857, 1279, 1379, 1928, 2308, 2308, 2859, 3339, 4200, 5579, 6252, 6252, 6968, 7223, 7738, 11232, 12206, 13913, 13913, 17338, 17753, 19914, 22191, 23130, 25561, 28102, 28625, 33642, 33642, 34814
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
FORMULA
| a(n) = sum_{j=1..A161671(n)} A161671(j) = A163116(A161671(n)).
|
|
|
EXAMPLE
| a(1) = A163116(A161671(1)) = A163116(2) = 4.
a(2) = A163116(A161671(2)) = A163116(2) = 4.
a(5) = A163116(A161671(5)) = A163116(3) = 5.
|
|
|
MAPLE
| A141468 := proc(n) option remember ; if n <= 2 then n-1 ; else for a from procname(n-1)+1 do if not isprime(a) then RETURN(a) ; fi; od: fi; end:
A161671 := proc(n) ithprime(n)-A141468(n) ; end:
A161778 := proc(n) add( A161671(j), j=1..A161671(n)) ; end: seq(A161778(n), n=1..90) ; # R. J. Mathar, Oct 04 2009
|
|
|
CROSSREFS
| Cf. A000040, A141468, A161671.
Sequence in context: A029676 A105190 A002581 * A099655 A146899 A031351
Adjacent sequences: A161775 A161776 A161777 * A161779 A161780 A161781
|
|
|
KEYWORD
| nonn,less
|
|
|
AUTHOR
| Juri-Stepan Gerasimov (2stepan(AT)rambler.ru), Jun 19 2009
|
|
|
EXTENSIONS
| Edited, corrected from a(15) on, and extended by R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Oct 04 2009
|
| |
|
|
