A204999 a(n) = (1/n)*A204998(n).

3, 4, 1, 2, 1, 2, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 1, 4, 1, 1, 1, 2, 1, 1, 3, 2, 1, 1, 1, 2, 1, 1, 1, 2, 1, 2, 1, 2, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 3, 4, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 1, 4, 1, 2, 1, 2, 1, 1, 1

Offset

1,1

Comments

For a guide to related sequences, see A204892.

Positions of 3's seem to be given by a subsequence of A104777. - Antti Karttunen, Sep 29 2018

Links

Antti Karttunen, Table of n, a(n) for n = 1..23005

Formula

a(n) = (A204996(n)-A204997(n))/n.

Mathematica

(See the program at A204994.)

Prog

(PARI) A204999(n) = { my(d); for(k=sqrtint(1+n), oo, for(j=1, k-1, if(!((d=(k^2)-(j^2))%n), return(d/n), if(d<n, break)))); }; \\ Antti Karttunen, Sep 28 2018

Crossrefs

Cf. A204996, A204997, A204998, A204892.

Sequence in context: A123019 A226063 A326748 * A294731 A085710 A248004

Adjacent sequences: A204996 A204997 A204998 * A205000 A205001 A205002

Keyword

nonn

Author

Clark Kimberling, Jan 21 2012

Extensions

More terms from Antti Karttunen, Sep 28 2018

Status

approved