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.

A349869 Nobly deficient numbers (A349759) that are not deficient numbers (A005100).

This page as a plain text file.
%I A349869 #9 Dec 06 2021 03:11:48
%S A349869 36,48,100,112,144,162,192,196,208,324,400,448,576,784,832,900,1296,
%T A349869 1458,1600,1764,1936,1984,2304,2368,2500,2704,2752,2916,3072,3136,
%U A349869 3600,3904,4288,4356,4624,4672,4900,5184,5776,6084,6208,6400,6976,7056,7168,7744,8100
%N A349869 Nobly deficient numbers (A349759) that are not deficient numbers (A005100).
%H A349869 Amiram Eldar, <a href="/A349869/b349869.txt">Table of n, a(n) for n = 1..10000</a>
%e A349869 36 is a term since it is not deficient, A000203(36) = 91 > 2*36 = 72, and both A000005(36) = 9 and A000203(36) = 91 are deficient.
%t A349869 defQ[n_] := DivisorSigma[1, n] < 2*n; nobDefQ[n_] := And @@ defQ /@ DivisorSigma[{0, 1}, n]; Select[Range[10^4], !defQ[#] && nobDefQ[#] &]
%Y A349869 Intersection of A023196 and A349759.
%Y A349869 Cf. A000005, A000203, A005100, A349868.
%K A349869 nonn
%O A349869 1,1
%A A349869 _Amiram Eldar_, Dec 03 2021