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.

A293713 Numbers n such that phi(psi(n))/n < phi(psi(m))/m for all m < n, where phi is Euler's totient function (A000010) and psi is the Dedekind psi function (A001615).

Original entry on oeis.org

1, 3, 4, 5, 11, 17, 23, 25, 29, 59, 89, 149, 179, 239, 269, 359, 377, 389, 419, 839, 1049, 1259, 1889, 2099, 2309, 9239, 11549, 13859, 20789, 23099, 25409, 30029, 90089, 180179, 210209, 270269, 300299, 330329, 390389, 420419, 540539, 570569, 1017917, 1018013
Offset: 1

Views

Author

Amiram Eldar, Oct 15 2017

Keywords

Comments

Sândor proved that lim inf phi(psi(n))/n = 0, hence this sequence is infinite.

References

  • Jôzsef Sândor, On Dedekind’s arithmetical function, Seminarul de Teoria Structurilor, Univ. Timisoara, No. 51, 1988, pp. 1-15.

Crossrefs

Programs

  • Mathematica
    psi[n_] := If[n < 1, 0, n*Sum[MoebiusMu[d]^2/d, {d, Divisors@n}]]; a={}; rm=2; Do[r=EulerPhi[psi[n]]/n; If[r