%I#14 2020年3月24日06:29:20
%S 1,1,3,1,3,3,9,1,33,9,3,9,9,27,1,3,3,1,9,3,3,9,9,2,27,9,27,81,
%T 1,3,3,9,3,9,9,27,3,9,17,9,27,9,27,81,3,9,9,2,27,81,9,27,27,81,
%U 27,81,81243,1,3,3,9,3,9、9,27、3,9,9,27,9,27,27、81,3、9,29、27、9、27、
%N a(N)=3^(wt(N-1)-1),其中wt()=A000120()。
%C a(n)=A147582(n)/4。
%H Omar E.Pol,<a href=“http://www.polprimos.com/imagenespub/polca030.jpg“>初始项图解(重叠方块)
%F a(n)=3^A048881(n-2)_R.J.Mathar,2009年4月30日
%F递归:写n=2^i+1+j,0<=j<2^i,然后a(2^i+1)=1;对于j>0,a(2^i+j+1)=3*a(j+1)_N.J.A.Sloane,2009年6月9日
%F G.F.:x*(产品{k>=0}(1+3*x^(2^k))-1)/3.-_N.J.A.Sloane,2009年6月10日
%e写为三角形时:
%e.1、,
%e、1、3、,
%e、1、3、3、9、,
%e、3、3、9、3、9、27,
%e.第1、3、3、9、9、27、3、九、9、22、27、27、81条,
%例如:1,3,3,9,3,9,9,27,3,9-9,9,27,17,9,27,81,3,9:9,27:81,9,20,27,81,27,27,81,27,81,81243,
%e。。。。
%e行汇聚到A048883。行总和给出A000302。部分金额为A151920。
%p A000120:=程序(n)局部a,d;a:=0;对于从0到ilog2(n)的d,执行a:=a+(floor(n/2^d)mod 2);od:a;结束:A048881:=进程(n)A000120(n+1)-1;结束:A147610:=进程(n)3^A048881(n);结束:序列(A147610(n),n=0..100);#_R.J.Mathar,2009年4月30日
%t a[n_]:=3^(数字计数[n-1,2,1]-1);
%t a/@Range[2100](*_Jean-François Alcover_,2020年3月24日*)
%o(PARI)a(n)=3^(重量(n-1)-1);\\_米歇尔·马库斯,2020年3月24日
%Y参见A048883、A000120、A000302、A151920、A147582、A048881。
%Y参考A079314.-_Omar E.Pol_,2009年11月15日
%K nonn公司
%氧2,3
%A _N.J.A.Sloane,2009年4月29日
%E由R.J.Mathar_延长,2009年4月30日
%E偏移由N.J.A.Sloane修正,2009年6月9日
%E由N.J.A.Sloane_进一步编辑,2009年8月6日
|