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.

Showing 1-2 of 2 results.

A257089 a(n) = log_3 (A256689(n)).

Original entry on oeis.org

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

Views

Author

Wolfgang Hintze, Apr 16 2015

Keywords

Comments

a(n) is the logarithm to the base 3 of the denominator of the Dirichlet series of zeta(s)^(1/3). For details, see A256689.

Crossrefs

Cf. A046645 (k = 2, log_2), A257089 (k = 3, log_3), A257090 (k = 4, log_2), A257091 (k = 5, log_5).

Formula

3^a(n) = A256689(n). a(n) = A007949(A256689(n)).

A257091 a(n) = log_5 (A256693(n)).

Original entry on oeis.org

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

Views

Author

Wolfgang Hintze, Apr 16 2015

Keywords

Comments

a(n) is the logarithm to the base 5 of the denominator of the Dirichlet series of zeta(s)^(1/5). For details, see A256693.

Crossrefs

Cf. A046645 (k = 2, log_2), A257089 (k = 3, log_3), A257090 (k = 4, log_2), A257091 (k = 5, log_5).

Programs

  • Maple
    F:= proc(n) local e,m;
    add(add(floor(e/5^m),m=0..floor(log[5](e))),e=map(t-> t[2],ifactors(n)[2]));
    end proc:
    seq(F(i),i=1..100);
  • Mathematica
    F[n_] := Sum[Sum[Floor[e/5^m], {m, 0, Floor[Log[5, e]]}], {e, FactorInteger[n][[All, 2]]}];
    F[1] = 0;
    Array[F, 100] (* Jean-François Alcover, Jun 18 2020, after Maple *)

Formula

5^a(n) = A256693(n).
For n<=10000, if n = Product_i p_i^(e_i) is the prime factorization of n, a(n) = A001222(n) + Sum_i floor(e_i/5). - Robert Israel, May 13 2016
If n = Product_i p_i^(e_i) is the prime factorization of n, a(n) = Sum_{j >= 0} Sum_i floor(e_i/5^j). - Robert Israel, May 16 2016
Showing 1-2 of 2 results.