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.

A380892 Hexagonal numbers that are abundant.

This page as a plain text file.
%I A380892 #19 Feb 24 2025 21:22:40
%S A380892 66,120,276,378,630,780,1128,1326,1540,1770,2016,2556,2850,3160,3486,
%T A380892 3828,4560,4950,5778,6216,7140,7626,7875,8646,9180,9730,10296,10878,
%U A380892 12090,12720,14028,14706,15400,16110,16836,17955,18336,19110,19900,20706,21528,21945,23220,24090,24976
%N A380892 Hexagonal numbers that are abundant.
%C A380892 The least term that is coprime to 6 is a(30415179) = 9820742934657655. - _Amiram Eldar_, Feb 07 2025
%e A380892 66 = 2*3*11 is a term since it is a hexagonal number and less than the sum of its proper divisors 78.
%e A380892 120 = 2^3*3*5 is a term since it is a hexagonal number and less than the sum of its proper divisors 240.
%e A380892 7875 = 3^2*5^3*7 is a term since it is a hexagonal number and less than the sum of its proper divisors 8349.
%t A380892 Select[Table[n*(2*n-1), {n, 1, 125}], DivisorSigma[-1, #] > 2 &] (* _Amiram Eldar_, Feb 07 2025 *)
%o A380892 (PARI) select(x->sigma(x)>2*x, vector(150, k, k*(2*k-1))) \\ _Michel Marcus_, Feb 07 2025
%Y A380892 Intersection of A000384 and A005101.
%Y A380892 Cf. A074315, A063734, A117794, A379264.
%K A380892 nonn
%O A380892 1,1
%A A380892 _Massimo Kofler_, Feb 07 2025