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.

A302993 Number of unitary abundant numbers < 10^n.

This page as a plain text file.
%I A302993 #12 Aug 03 2018 11:01:58
%S A302993 0,5,64,691,7011,70030,699597,7005450,70048740,700321813,7003128054,
%T A302993 70034216605,700350142296,7003426996800,70033987968599,
%U A302993 700341098675985,7003416399263312
%N A302993 Number of unitary abundant numbers < 10^n.
%F A302993 Conjecture: Lim_{n->oo} a(n)/10^n = 0.07... is the density of unitary abundant numbers.
%t A302993 usigma[n_] := If[n == 1, 1, Times @@ (1 + Power @@@ FactorInteger[n])]; uabQ[n_] := usigma[n] > 2 n; c = 0; k = 1; seq={}; Do[While[k < 10^n, If[uabQ[k], c++]; k++]; AppendTo[seq, c], {n, 1, 5}]; seq
%Y A302993 Cf. A034448, A034683, A302992.
%K A302993 nonn,more
%O A302993 1,2
%A A302993 _Amiram Eldar_, Apr 17 2018
%E A302993 a(10)-a(17) from _Hiroaki Yamanouchi_, Aug 03 2018