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 A326172 #15 Jun 22 2019 08:11:11 %S A326172 0,0,1,2,3,6,12,21,34,69,140,278,561,1144,2367,4936,9503,19368,38202, %T A326172 77911,156458,318911,651462,1329624,2596458,5144833,10494839,20500025, %U A326172 40923643,83620258,164982516,335873558,651383048,1310551707,2655240565,5295397093,10338145110,21052407259,42748787713,86078893923,169349494068 %N A326172 Number of nonempty subsets of {2..n} whose product is divisible by their sum. %e A326172 The a(2) = 1 through a(7) = 21 subsets: %e A326172 {2} {2} {2} {2} {2} {2} %e A326172 {3} {3} {3} {3} {3} %e A326172 {4} {4} {4} {4} %e A326172 {5} {5} {5} %e A326172 {2,3,5} {6} {6} %e A326172 {3,4,5} {3,6} {7} %e A326172 {2,3,5} {3,6} %e A326172 {2,4,6} {2,3,5} %e A326172 {3,4,5} {2,4,6} %e A326172 {4,5,6} {2,5,7} %e A326172 {3,4,5,6} {3,4,5} %e A326172 {2,3,4,5,6} {3,4,7} %e A326172 {3,5,7} %e A326172 {4,5,6} %e A326172 {2,3,6,7} %e A326172 {2,5,6,7} %e A326172 {3,4,5,6} %e A326172 {3,5,6,7} %e A326172 {2,3,4,5,6} %e A326172 {2,3,4,5,7} %e A326172 {2,4,5,6,7} %t A326172 Table[Length[Select[Subsets[Range[2,n],{1,n}],Divisible[Times@@#,Plus@@#]&]],{n,0,10}] %Y A326172 Cf. A053632, A057567, A057568, A059529, A063865, A301987, A325037, A325044, A326150, A326151, A326153/A326154, A326155, A326156, A326158, A326178. %K A326172 nonn %O A326172 0,4 %A A326172 _Gus Wiseman_, Jun 11 2019 %E A326172 a(21)-a(29) from _Alois P. Heinz_, Jun 13 2019 %E A326172 a(30)-a(40) from _Bert Dobbelaere_, Jun 22 2019