A247206 - OEIS

A247206

a(n) = round(prime(n)/A245085(n)).

1, 1, 4, 2, 3, 5, 3, 6, 3, 3, 7, 4, 5, 5, 15, 4, 10, 9, 10, 6, 5, 10, 5, 8, 6, 12, 11, 11, 6, 12, 12, 8, 9, 9, 9, 8, 11, 12, 6, 14, 7, 5, 25, 15, 7, 10, 14, 38, 10, 16, 11, 9, 12, 18, 10, 17, 7, 12, 9, 12, 38, 16, 17, 16, 10, 13, 35, 10, 25, 72, 13, 29, 20, 8

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

OFFSET

3,3

COMMENTS

Does every positive integer occur at least once? Does every positive integer occur only finitely often?

LINKS

Peter J. C. Moses, Table of n, a(n) for n = 3..2002

MATHEMATICA

Table[ans={};

Round[Prime[n]/(NestWhile[#+1&, 2, (AppendTo[ans, Mod[#!, Prime[n]]]; (Length[ans]<Prime[n]-1)&&(Max[Last[Transpose[Tally[ans]]]]==1))&]-1)], {n, 3, 50}] (* Peter J. C. Moses, Nov 26 2014 *)

CROSSREFS

Cf. A000040, A247190, A245085.

Sequence in context: A316257 A274791 A200024 * A228047 A188543 A182272

Adjacent sequences: A247203 A247204 A247205 * A247207 A247208 A247209

KEYWORD

nonn

AUTHOR

Vladimir Shevelev, Nov 25 2014

EXTENSIONS

More terms from Peter J. C. Moses, Nov 25 2014

STATUS

approved