

A171528


Denominator of (nth composite/n).


3



1, 1, 3, 4, 1, 1, 1, 8, 9, 5, 11, 4, 13, 7, 3, 8, 17, 9, 19, 5, 7, 11, 23, 2, 25, 2, 27, 2, 29, 2, 31, 2, 33, 17, 35, 9, 37, 38, 39, 40, 41, 7, 43, 44, 45, 46, 47, 12, 49, 5, 17, 26, 53, 27, 5, 28, 57, 58, 59, 5, 61, 31, 21, 8, 13, 66, 67, 68, 69, 14
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,3


COMMENTS



LINKS



PROG

(PARI) lista(nn) = {compo = select(n>(! isprime(n) && (n != 1)), vector(nn, i, i)); for (i = 1, #compo, print1(denominator(compo[i]/i), ", "); ); } \\ Michel Marcus, Sep 11 2013


CROSSREFS



KEYWORD

nonn,frac


AUTHOR



EXTENSIONS



STATUS

approved



