cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A373381 a(n) = gcd(bigomega(n), A056239(n)), where bigomega is number of prime factors with repetition, and A056239 is fully additive with a(p) = primepi(p).

Original entry on oeis.org

0, 1, 1, 2, 1, 1, 1, 3, 2, 2, 1, 1, 1, 1, 1, 4, 1, 1, 1, 1, 2, 2, 1, 1, 2, 1, 3, 3, 1, 3, 1, 5, 1, 2, 1, 2, 1, 1, 2, 2, 1, 1, 1, 1, 1, 2, 1, 1, 2, 1, 1, 1, 1, 1, 2, 1, 2, 1, 1, 1, 1, 2, 1, 6, 1, 1, 1, 3, 1, 1, 1, 1, 1, 1, 1, 1, 1, 3, 1, 1, 4, 2, 1, 4, 2, 1, 2, 4, 1, 4, 2, 1, 1, 2, 1, 1, 1, 3, 3, 4, 1, 1, 1, 1, 3
Offset: 1

Views

Author

Antti Karttunen, Jun 06 2024

Keywords

Comments

As A001222 and A056239 are both fully additive sequences, all sequences that give the positions of multiples of some natural number k in this sequence are closed under multiplication, i.e., are multiplicative semigroups; for example A340784.

Crossrefs

Cf. A001222, A056239, A340784 (positions of even terms), A353331 (their characteristic function).
Cf. also A354871, A373370.

Programs

  • PARI
    A056239(n) = if(1==n, 0, my(f=factor(n)); sum(i=1, #f~, f[i, 2] * primepi(f[i, 1])));
    A373381(n) = gcd(bigomega(n), A056239(n));

Formula

a(n) = gcd(A001222(n), A056239(n)).