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-1 of 1 results.

A118671 Primitive elements of A096490.

Original entry on oeis.org

60, 168, 252, 792, 924, 936, 2448, 2736, 6624, 6864, 6930, 9936, 12528, 18564, 20748, 23256, 24570, 26784, 28152, 31968, 35424, 37152, 40176, 40608, 40950, 58344, 65208, 87516, 91584, 94392, 96048, 101952, 102672, 105408, 106488, 113832, 115776, 122544, 135792
Offset: 1

Views

Author

Franklin T. Adams-Watters, May 19 2006

Keywords

Comments

Members of A096490 that are not divisible by any smaller member of that sequence.

Links

Crossrefs

Cf. A096490.

Programs

  • Mathematica
    Select[6*Range[23000], DivisorSigma[-2, #] > 3/2 && Max[DivisorSigma[-2, #/(FactorInteger[#][[;; , 1]])]] < 3/2 &] (* Amiram Eldar, Aug 16 2024 *)
  • PARI
    is(k) = {!(k % 6) && if(sigma(k, -2) < 3/2, return(0)); fordiv(k, d, if(d < k && sigma(d, -2) >= 3/2, return(0))); 1;} \\ Amiram Eldar, Aug 16 2024

Extensions

Data corrected and extended by Amiram Eldar, Aug 16 2024
Showing 1-1 of 1 results.

Started in 1964 by Neil J. A. Sloane | Maintained by The OEIS Foundation Inc.

Content is available under The OEIS End-User License Agreement.