A355037 - OEIS

A355037

a(n) is the product of the digits of n in primorial base.

0, 1, 0, 1, 0, 2, 0, 0, 0, 1, 0, 2, 0, 0, 0, 2, 0, 4, 0, 0, 0, 3, 0, 6, 0, 0, 0, 4, 0, 8, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 2, 0, 0, 0, 2, 0, 4, 0, 0, 0, 3, 0, 6, 0, 0, 0, 4, 0, 8, 0, 0, 0, 0, 0, 0, 0, 0, 0, 2, 0, 4, 0, 0, 0, 4, 0, 8, 0, 0, 0, 6, 0, 12, 0, 0, 0

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

OFFSET

0,6

LINKS

Rémy Sigrist, Table of n, a(n) for n = 0..10000

Index entries for sequences related to primorial base

FORMULA

a(n) = 1 iff n belongs to A143293.

a(n) > 0 iff n belongs to A328574 \ {0}.

EXAMPLE

The first terms, alongside the digits of n in primorial base, are:

n a(n) pr(n)

-- ---- -----

0 0 0

1 1 1

2 0 1_0

3 1 1_1

4 0 2_0

5 2 2_1

6 0 1_0_0

7 0 1_0_1

8 0 1_1_0

9 1 1_1_1

10 0 1_2_0

11 2 1_2_1

12 0 2_0_0

13 0 2_0_1

14 0 2_1_0

15 2 2_1_1

PROG

(PARI) a(n) = { my (p=1); forprime (r=2, oo, p*=n%r; n\=r; if (p==0 || n==0, return (p))) }

CROSSREFS

Cf. A143293, A208575, A235168, A328574.

Sequence in context: A333146 A135767 A208575 * A365832 A070203 A070201

Adjacent sequences: A355034 A355035 A355036 * A355038 A355039 A355040

KEYWORD

nonn,look,base

AUTHOR

Rémy Sigrist, Jun 16 2022

STATUS

approved