cp's OEIS Frontend

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.

A227835 3^a(n) is the highest power of 3 dividing A000930(n).

This page as a plain text file.
%I A227835 #14 Sep 08 2022 08:46:05
%S A227835 0,0,0,0,1,0,1,2,0,0,0,0,1,0,1,3,0,0,0,0,2,0,2,3,0,0,0,0,1,0,1,2,0,0,
%T A227835 0,0,1,0,1,3,0,0,0,0,2,0,2,3,0,0,0,0,1,0,1,2,0,0,0,0,1,0,1,4,0,0,0,0,
%U A227835 3,0,3,4,0,0,0,0,1,0,1,2,0,0,0,0,1,0,1,3,0,0,0,0,2,0,2,3,0,0,0,0,1,0,1,2,0,0,0,0,1,0,1,3,0
%N A227835 3^a(n) is the highest power of 3 dividing A000930(n).
%C A227835 This is the 3-adic valuation of A000930.
%H A227835 G. C. Greubel, <a href="/A227835/b227835.txt">Table of n, a(n) for n = 0..5000</a>
%t A227835 A000930[n_] := Sum[Binomial[n - 2*i, i], {i, 0, Floor[n/3]}]; Table[IntegerExponent[A000930[n], 3], {n, 0, 100}] (* _G. C. Greubel_, Apr 26 2017 *)
%o A227835 (Magma) A000930:=func<i | &+[Binomial(i-2*k,k): k in [0..i div 3]]>; [Valuation(A000930(n),3): n in [0..120]]; // _Bruno Berselli_, Aug 05 2013
%Y A227835 Cf. A000930, A007949, A227834.
%K A227835 nonn
%O A227835 0,8
%A A227835 _N. J. A. Sloane_, Aug 04 2013