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.

A292573 Least Lucas-Carmichael number whose Dedekind psi value is an n-th power.

Original entry on oeis.org

399, 935, 8855, 935, 191807, 31535, 2376401921999, 287432495, 3512071871, 443155187061431999, 269174015, 7187117143679, 13153784862132539999, 16794805460009764607, 12239445970372607, 308403604421150344874999, 1940371455953001599, 22735742424704664191, 193426182224210221055, 2674275760170030054482343935
Offset: 1

Views

Author

Amiram Eldar, Sep 19 2017

Keywords

Comments

There are no other terms below 10^12.

Examples

			psi(8855) = 24^3 while the psi values of smaller Lucas-Carmichael numbers are not cubes, therefore a(3) = 8855.
		

Crossrefs

Extensions

a(7),a(10),a(12)-a(26) from Max Alekseyev, May 01 2024

A292572 Lucas-Carmichael numbers whose Dedekind psi value is a cube.

Original entry on oeis.org

8855, 31535, 73535, 265895, 12676799, 30071327, 86450399, 561645839, 674628479, 741722399, 945066527, 1066699799, 1304305415, 2239506719, 2423951999, 2693338559, 3512071871, 4708417055, 4811496767, 8194093919, 9140299199, 9184665599, 9405512639, 11729537855
Offset: 1

Views

Author

Amiram Eldar, Sep 19 2017

Keywords

Examples

			psi(8855) = 24^3.
		

Crossrefs

Programs

  • Mathematica
    psi[n_] := If[n < 1, 0, n*Sum[MoebiusMu[d]^2/d, {d, Divisors@n}]]; s = Import["b006972.txt","Data"][[All,-1]];Select[s, IntegerQ@Power[psi@#, 1/3] &]
Showing 1-2 of 2 results.