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 A359091 #8 Feb 16 2025 08:34:04
%S A359091 6,13,9,10,24,58,34,55,67,151,134,187,201,691,350,623,1082,1870,2302,
%T A359091 3171,5017,13863,13230,6663,24357,50397,35604,60347,63810,107019,
%U A359091 181517,365595,624858,1345485,1002585,1969415,1191179,7651731,4592173,7279863,7403686,17923182
%N A359091 a(n) is the index of the smallest n-gonal number with binary weight n.
%H A359091 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/PolygonalNumber.html">Polygonal Number</a>
%H A359091 <a href="/index/Bi#binary">Index entries for sequences related to binary expansion of n</a>
%t A359091 p[n_, k_] := (n - 2)*k*(k - 1)/2 + k; a[n_] := Module[{k = 1}, While[DigitCount[p[n, k], 2, 1] != n, k++]; k]; Array[a, 30, 3] (* _Amiram Eldar_, Dec 17 2022 *)
%Y A359091 Cf. A000120, A211201, A231897, A359092.
%K A359091 nonn,base
%O A359091 3,1
%A A359091 _Ilya Gutkovskiy_, Dec 16 2022