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 A342402 #11 Mar 11 2021 15:32:40
%S A342402 36,100,144,324,400,576,784,900,1296,1600,1764,1936,2304,2500,2704,
%T A342402 2916,3136,3600,4356,4624,4900,5184,5776,6084,6400,7056,7744,8100,
%U A342402 9216,9604,10000,10404,10816,11025,11664,12100,12544,12996,14400,15876,16900,17424,18496
%N A342402 Numbers k with property that if k has m proper divisors, there are m/2 proper divisors of k whose sum is k.
%C A342402 All terms are perfect squares.
%e A342402 576 is a term because it has 20 proper divisors and 1+2+3+4+6+8+24+48+192+288 = 576.
%t A342402 q[n_] := Module[{d = Most @ Divisors[n], nd, ans = False}, nd = Length[d]; Do[If[Plus @@ Subsets[d, {nd/2}, {k}][[1]] == n, ans = True; Break[]], {k, 1, Binomial[nd, nd/2]}]; ans]; Select[Range[136]^2, q] (* _Amiram Eldar_, Mar 11 2021 *)
%Y A342402 Cf. A000396, A001065, A005835, A293188, A342119.
%K A342402 nonn
%O A342402 1,1
%A A342402 _Metin Sariyar_, Mar 10 2021
%E A342402 a(8)-a(43) from _Alois P. Heinz_, Mar 10 2021