|
Search: id:A097589
|
|
|
| A097589 |
|
a(n)=sum from i=1 to n of the Fortunate numbers (A005235). |
|
+0
1
|
|
| 3, 8, 15, 28, 51, 68, 87, 110, 147, 208, 275, 336, 407, 454, 561, 620, 681, 790, 879, 982, 1061, 1212, 1409, 1510, 1613, 1846, 2069, 2196, 2419, 2610, 2773, 3002, 3645, 3884, 4041, 4208, 4647, 4886, 5085, 5276, 5475, 5858, 6091, 6842, 7155, 7928, 8535, 8848
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
FORMULA
|
Let F(n) := a(n)/A007504(n). Conjecture: as n tends to infinity F(n) tends to pi/2 with pi=3.14159......
|
|
MATHEMATICA
|
NextPrime[ n_Integer] := Block[{k}, k = n + 1; While[ !PrimeQ[ k ], k++ ]; k ]; Fortunate[ n_Integer] := Block[{p = Product[ Prime[i], {i, 1, n} ] + 1, q}, q = NextPrime[p]; q - p + 1 ]; t = Table[ Fortunate[ n ], {n, 1, 48}]; Table[Plus @@ Take[t, n], {n, 48}] (from Robert G. Wilson v Sep 04 2004)
|
|
CROSSREFS
|
Cf. A005235 A007504.
Adjacent sequences: A097586 A097587 A097588 this_sequence A097590 A097591 A097592
Sequence in context: A047873 A036419 A054107 this_sequence A015631 A116686 A135350
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Pierre CAMI (pierrecami(AT)tele2.fr), Aug 29 2004
|
|
EXTENSIONS
|
More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Sep 04 2004
|
|
|
Search completed in 0.002 seconds
|
