A373156 - OEIS

The OEIS is supported by the many generous donors to the OEIS Foundation.

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