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 A349972 #14 Apr 30 2022 20:10:29 %S A349972 0,1,2,3,2,8,10,25,49,93,187,377,747,1472,2975,5911,11880,23734,47474, %T A349972 94885,190623,380805,763402,1528095,3061916,6125358,12278446,24564954, %U A349972 49200792,98478615,197164774,394536002,789993459,1580640910,3163602123,6330608624,12668987317 %N A349972 a(n) = A349976(n, n-1) for n >= 1 and a(0) = 0. %H A349972 Fausto A. C. Cariboni, <a href="/A349972/b349972.txt">Table of n, a(n) for n = 0..47</a> %o A349972 (SageMath) # Uses function DistsetLength from A349976. %o A349972 from collections import Counter %o A349972 def A349972(n): return Counter([DistsetLength(s) for s in Subsets(n)])[n-1] %o A349972 print([A349972(n) for n in range(10)]) %Y A349972 Cf. A349976. %K A349972 nonn %O A349972 0,3 %A A349972 _Peter Luschny_, Dec 12 2021