A373156 - OEIS

A373156

a(n) = 1 if the 2-adic and the 3-adic valuations of n are equal, otherwise 0.

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

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

OFFSET

LINKS

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

Index entries for characteristic functions

FORMULA

a(n) = [A007814(n) == A007949(n)], where [ ] is the Iverson bracket.

Sum_{k=1..n} a(k) ~ (2/5) * n. - Amiram Eldar, May 31 2024

MATHEMATICA

a[n_] := Boole[IntegerExponent[n, 2] == IntegerExponent[n, 3]];

Table[a[n], {n, 1, 121}] (* Robert P. P. McKone, May 28 2024 *)

PROG