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 A065335 #8 Feb 21 2021 03:17:32 %S A065335 0,0,1,0,0,1,0,0,2,0,0,1,0,0,0,0,0,2,0,0,0,0,0,1,0,0,3,0,0,0,0,0,0,0, %T A065335 0,2,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,0,0,3,0,0,0,0,0,0,0,0,0,0,0,0,0,0, %U A065335 0,0,0,2,0,0,0,0,0,0,0,0,4,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0 %N A065335 3-exponents to represent 3-smooth numbers (A065332). %H A065335 Amiram Eldar, <a href="/A065335/b065335.txt">Table of n, a(n) for n = 1..10000</a> %F A065335 a(n) = A007949(n) * A065333(n). %F A065335 a(n) = log_3(n / A006519(n)), where log_3 = A062153. For k > 0 with A065332(k) > 0: A065332(k) = (2^A065334(k)) * (3^a(k)). %t A065335 a[n_] := If[n/2^IntegerExponent[n, 2]/3^(e = IntegerExponent[n, 3]) == 1, e, 0]; Array[a, 100] (* _Amiram Eldar_, Feb 21 2021 *) %Y A065335 Cf. A006519, A007949, A062153, A065332, A065333, A065334. %K A065335 nonn %O A065335 1,9 %A A065335 _Reinhard Zumkeller_, Oct 29 2001