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 A334216 #7 Apr 20 2020 09:55:17 %S A334216 1,2,2,3,2,2,2,3,3,2,2,3,2,2,2,4,2,3,2,3,2,2,2,3,3,2,3,3,2,2,2,4,2,2, %T A334216 2,3,2,2,2,3,2,2,2,3,3,2,2,4,3,3,2,3,2,3,2,3,2,2,2,3,2,2,3,5,2,2,2,3, %U A334216 2,2,2,4,2,2,3,3,2,2,2,4,4,2,2,3,2,2,2 %N A334216 a(n) is the number of distinct terms in the n-th row of A334215. %F A334216 a(n) <= A000005(n). %F A334216 a(p^k) = A000267(k) for any k >= 0 and prime number p. %o A334216 (PARI) a(n) = { my (f=factor(n)); #Set(apply (k -> prod (i=1, #f~, f[i,1]^(f[i,2]\k)), [1..1+if (n==1, 0, vecmax(f[,2]~))])) } %Y A334216 Cf. A000005, A000267, A334215, A334217. %K A334216 nonn %O A334216 1,2 %A A334216 _Rémy Sigrist_, Apr 19 2020