login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A073168 a(n) = A007821(n) - A022449(n). 2
1, 5, 9, 9, 9, 15, 16, 17, 18, 17, 25, 19, 21, 27, 31, 26, 21, 22, 21, 35, 38, 31, 35, 31, 34, 33, 37, 39, 49, 49, 33, 52, 49, 47, 39, 43, 47, 47, 48, 48, 41, 49, 48, 60, 59, 59, 49, 52, 58, 58, 63, 71, 75, 65, 65, 67, 71, 79, 75, 81, 84, 77, 65, 69, 72, 72, 67, 69, 61, 65, 65 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

COMMENTS

Values of commutator of A000040 and A002808 functions i.e., of prime() and composite().

LINKS

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

MATHEMATICA

c[n_Integer] := FixedPoint[n+PrimePi[ # ]+1&, n] Table[Prime[c[w]]-c[Prime[w]], {w, 1, 10000}];

CROSSREFS

Cf. A000040, A002808, A007821, A022449.

Sequence in context: A105643 A175373 A175363 * A315121 A127500 A057655

Adjacent sequences:  A073165 A073166 A073167 * A073169 A073170 A073171

KEYWORD

nonn

AUTHOR

Labos Elemer, Jul 19 2002

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified November 29 01:40 EST 2021. Contains 349416 sequences. (Running on oeis4.)