A072626 Parity of floor(n/log(n)).

0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0

Offset: 2

Author

Labos Elemer, Jun 28 2002

Keywords

• nonn

Links

• Amiram Eldar, Table of n, a(n) for n = 2..10000

Crossrefs

Cf. A000035, A000720, A050500, A071986.

Programs

Mathematica

a[n_] := Mod[Floor[n / Log[n]], 2]; Array[a, 100, 2] (* Amiram Eldar, Mar 17 2025 *)

Formula

a(n) = floor(n / log(n)) mod 2.

a(n) = A000035(A050500(n)). - Amiram Eldar, Mar 17 2025

Extensions

Offset corrected by Sean A. Irvine, Oct 15 2024