A073262 - OEIS

A073262

Partial sums of first m composite numbers arising in A053781.

4, 10, 18, 63, 132, 3692, 8025, 9200, 13205, 16275, 287382, 1674342, 13852716, 261109560, 509099424, 53226407187, 339194408709, 63673280091408, 230160748303410, 9613333448250222, 14247374595414090, 446710602178803172

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

COMMENTS

Required to extend A053781 without recomputation.

LINKS

Table of n, a(n) for n=1..22.

FORMULA

a(n)/A053781(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. A053781, A073263.

Sequence in context: A063591 A009912 A318070 * A353189 A362100 A033263

Adjacent sequences: A073259 A073260 A073261 * A073263 A073264 A073265

KEYWORD

nonn

AUTHOR

Labos Elemer, Jul 22 2002

EXTENSIONS

a(17) - a(19) from Klaus Brockhaus, Aug 12 2009

a(20)-a(22) from Ray Chandler, Jul 19 2010

STATUS

approved