

A060473


a(n) = numerator of phi(n)/(n+1), where phi(n) is Euler's phi, A000010.


3



1, 1, 1, 2, 2, 2, 3, 4, 3, 4, 5, 4, 6, 2, 1, 8, 8, 6, 9, 8, 6, 10, 11, 8, 10, 4, 9, 12, 14, 8, 15, 16, 10, 16, 2, 12, 18, 6, 3, 16, 20, 12, 21, 4, 12, 22, 23, 16, 21, 20, 8, 24, 26, 18, 5, 8, 18, 28, 29, 16, 30, 10, 9, 32, 8, 20, 33, 32, 22, 24, 35, 24, 36, 12, 10, 36, 10, 24, 39, 32, 27, 40, 41
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,4


COMMENTS

a(A203966(n)) = 1.  Robert G. Wilson v, Jul 05 2014


LINKS

T. D. Noe, Table of n, a(n) for n=1..1000


EXAMPLE

a(7) = 3 because phi(7)/(7+1) = 6/8 = 3/4.


MAPLE

with(numtheory, phi): seq(numer(phi(n)/(n+1)), n=1..50);


MATHEMATICA

Numerator/@Table[EulerPhi[n]/(n+1), {n, 90}] (* Harvey P. Dale, May 11 2011 *)


PROG

(PARI) { for (n=1, 1000, write("b060473.txt", n, " ", numerator(eulerphi(n)/(n + 1))); ) } \\ Harry J. Smith, Jul 05 2009


CROSSREFS

Cf. A000010, A060474.
Sequence in context: A016729 A155940 A186963 * A055034 A112184 A112213
Adjacent sequences: A060470 A060471 A060472 * A060474 A060475 A060476


KEYWORD

easy,frac,nice,nonn


AUTHOR

Fabian Rothelius, Mar 16 2001


EXTENSIONS

More terms from Asher Natan Auel (auela(AT)reed.edu), Mar 16 2001


STATUS

approved



