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 A348661 #6 Nov 01 2021 19:22:13 %S A348661 1,1,1,3,1,6,1,39,4,8,1,330,1,10,9,12495,1,1446,1,1620,11,14,1, %T A348661 1792050,6,16,580,10158,1,53002,1,2516534175,15,20,13,469241466,1,22, %U A348661 17,774558756,1,1696170,1,712914,20160,26,1,108457624531554,8,328588,21,6383964 %N A348661 a(1) = 1; a(n) = Sum_{d|n, d < n} d * a(d)^(n/d). %F A348661 For n > 1, a(n) is the coefficient of x^n/n in expansion of -log(Product_{k=1..n-1} (1 - a(k)*x^k)). %t A348661 a[1] = 1; a[n_] := a[n] = Sum[If[d < n, d a[d]^(n/d), 0], {d, Divisors[n]}]; Table[a[n], {n, 1, 52}] %Y A348661 Cf. A006241, A008578 (positions of 1's), A157313, A165552, A196545, A281145. %K A348661 nonn %O A348661 1,4 %A A348661 _Ilya Gutkovskiy_, Oct 28 2021