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.

A336679 Odd exponential abundant numbers whose exponential abundancy is closer to 2 than that of any smaller odd exponential abundant number.

This page as a plain text file.
%I A336679 #4 Jul 30 2020 20:19:34
%S A336679 225450225,385533225,481583025,538472025,672624225,985646025,
%T A336679 1150227225,1566972225,1685513025,2105433225,2679615225,6485886225,
%U A336679 6554064825,6933060225,9150077475,179678493225,185601564225,191620685025,195686793225
%N A336679 Odd exponential abundant numbers whose exponential abundancy is closer to 2 than that of any smaller odd exponential abundant number.
%C A336679 The exponential abundancy of a number k is esigma(k)/k, where esigma(k) is the sum of exponential divisors of k (A051377).
%C A336679 The corresponding values of esigma(k)/k are 2.148..., 2.112..., 2.099..., 2.085..., 2.072..., ...
%t A336679 esigma[n_] := Times @@ (Sum[First[#]^d, {d, Divisors[Last[#]]}] &) /@ FactorInteger[n]; seq = {}; rm = 3; Do[r = esigma[n]/n; If[r > 2 && r < rm, rm = r; AppendTo[seq, n]], {n, 1, 10^9, 2}]; seq
%Y A336679 The exponential version of A188263.
%Y A336679 The odd version of A336254.
%Y A336679 Subsequence of A321147.
%Y A336679 Similar sequences: A335052, A335053, A335055.
%Y A336679 Cf. A051377.
%K A336679 nonn,more
%O A336679 1,1
%A A336679 _Amiram Eldar_, Jul 30 2020