|
Search: id:A073262
|
|
|
| A073262 |
|
Partial sums of first m composite numbers arising in A053781. |
|
+0
2
|
|
| 4, 10, 18, 63, 132, 3692, 8025, 9200, 13205, 16275, 287382, 1674342, 13852716, 261109560, 509099424, 53226407187
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
Required to extend A053781 without recomputation.
|
|
FORMULA
|
a(n)/A053281(n) is integer.
|
|
MATHEMATICA
|
c[x_] := FixedPoint[x+PrimePi[ # ]+1&, x] t=Table[0, {256}]; s=0; k=0; Do[s=s+c[n]; If[IntegerQ[s/n], k=k+1; t[[k]]=s; Print[s]], {n, 1, 12000000}] t
|
|
CROSSREFS
|
Cf. A053281, A073263.
Adjacent sequences: A073259 A073260 A073261 this_sequence A073263 A073264 A073265
Sequence in context: A009913 A063591 A009912 this_sequence A029714 A062198 A050858
|
|
KEYWORD
|
more,nonn
|
|
AUTHOR
|
Labos E. (labos(AT)ana.sote.hu), Jul 22 2002
|
|
|
Search completed in 0.002 seconds
|
