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

A292571 Lucas-Carmichael numbers whose Dedekind psi value is a square.

Original entry on oeis.org

935, 31535, 76751, 1707839, 3106799, 11141999, 24685199, 43383167, 83618639, 151524071, 161841239, 189099039, 212133599, 213884999, 219155615, 233743319, 241485839, 271038599, 287432495, 338340239, 353107799, 624840479, 660423455, 945236159, 1171355471
Offset: 1

Views

Author

Amiram Eldar, Sep 19 2017

Keywords

Examples

			psi(935) = 36^2.
		

Crossrefs

Intersection of A006972 and A291167.

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@Sqrt[psi@#] &]
Showing 1-2 of 2 results.