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 A374133 #6 Jun 30 2024 16:13:17 %S A374133 0,0,0,1,1,1,1,0,0,1,0,1,0,0,0,1,0,1,0,0,0,1,0,1,0,1,0,1,2,1,0,0,0,2, %T A374133 1,1,0,0,2,1,1,1,0,0,0,1,1,1,0,0,0,1,0,3,1,0,0,1,0,1,0,0,1,1,1,1,0,0, %U A374133 0,1,0,1,0,0,0,1,2,1,0,0,0,1,0,1,0,0,1,1,0,2,0,0,0,3,0,1,0,0,0,1,2,1,2,0,0,1,0,1 %N A374133 The 3-adic valuation of A276085(n), where A276085 is the primorial base log-function. %H A374133 Antti Karttunen, <a href="/A374133/b374133.txt">Table of n, a(n) for n = 2..100000</a> %F A374133 a(n) = A007949(A276085(n)). %o A374133 (PARI) %o A374133 A276085(n) = { my(f=factor(n)); sum(k=1, #f~, f[k, 2]*prod(i=1,primepi(f[k, 1]-1),prime(i))); }; %o A374133 A374133(n) = valuation(A276085(n),3); %Y A374133 Cf. A007949, A276085, A339746 (indices of nonzero terms), A372573 (their characteristic function). %Y A374133 Cf. also A373153, A374132. %K A374133 nonn %O A374133 2,29 %A A374133 _Antti Karttunen_, Jun 30 2024