A072632 Solutions to A072631[n]=0.

1, 3, 8, 21, 55, 149, 404, 1097, 2981, 8104, 22027, 59875, 162755, 442414, 1202605, 3269018

Offset

1,2

Comments

Essentially the same as A001671.

Links

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

Example

Compare with A072610 [related to A004648].

Mathematica

Do[s=Floor[Mod[Floor[n*Log[n]]//N, n]]; If[s==0, Print[n]], {n, 1, 10000000}]

Crossrefs

Cf. A004648, A072608, A072609, A072610, A072630, A072631, A072610.

Sequence in context: A088305 A001906 A278613 * A001671 A360054 A309226

Adjacent sequences: A072629 A072630 A072631 * A072633 A072634 A072635

Keyword

more,nonn

Author

Labos Elemer, Jun 28 2002

Status

approved