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.
%I A342119 #18 Mar 08 2021 22:25:10
%S A342119 2,3,5,7,11,12,13,17,18,19,23,24,29,30,31,37,40,41,42,43,47,48,53,54,
%T A342119 59,60,61,67,71,72,73,79,80,83,84,89,90,96,97,101,103,107,108,109,112,
%U A342119 113,120,126,127,131,132,137,139,140,149,150,151,156,157,160,162
%N A342119 Numbers k with property that if k has m divisors, there are m/2 divisors of k whose sum is k.
%C A342119 All primes and all numbers of the form 3*2^k (k>1) are terms.
%e A342119 40 is a term because it has 8 divisors and 2+8+10+20 = 40.
%t A342119 Select[Range[160], EvenQ[(d = DivisorSigma[0, #])] && MemberQ[Plus @@@ Subsets[Divisors[#], {d/2}], #] &] (* _Amiram Eldar_, Feb 28 2021 *)
%Y A342119 Cf. A000203, A293188, A005835.
%K A342119 nonn
%O A342119 1,1
%A A342119 _Metin Sariyar_, Feb 28 2021