A073263 Integer quotients of partial sum of first n composite and n (see A053781).

4, 5, 6, 9, 12, 52, 75, 80, 95, 105, 422, 1002, 2841, 12165, 16944, 170997, 430041, 5844984, 11095683, 71438394, 86938085, 485470043, 3341061731, 11203279551, 25053055391, 29329179630, 150058180590, 278953774325, 771115150044

Offset

1,1

Links

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

Formula

a(n)=A073262(n)/A053781(n)

Mathematica

s=0; Do[s=s+FixedPoint[n+PrimePi[ # ]+1&, n]; If[IntegerQ[s/n], k=k+1; t[[k]]=s/n; Print[s/n]], {n, 1, 12000000}]

Crossrefs

Cf. A002808, A053781, A073255-A073262.

Sequence in context: A145025 A245236 A209122 * A338692 A039013 A241511

Adjacent sequences: A073260 A073261 A073262 * A073264 A073265 A073266

Keyword

nonn

Author

Labos Elemer, Jul 22 2002

Extensions

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

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

a(27)-a(29) from Donovan Johnson, May 23 2011

Status

approved