%I#16 2019年2月1日19:59:06
%S 0,4,8,9,13,17,18,22,26,27,31,35,36,40,44,45,49,53,54,58,62,63,67,71,
%电话72,76,80,81,85,89,90,94,98,99103107108112116121125126,
%电话:130134135139143144148152153161162166170171175179180184
%N个数字k,使得A0000330(k)是3的倍数。
%C k mod 3是周期性的:0,1,2,0,1,2,0,1,2,0,1,1,2,0,1.2。
%H<a href=“/index/Rec#order_04”>为具有常数系数的线性递归索引条目</a>,签名(1,0,1,-1)。
%F k*(1+k)*(1+2*k)是18的倍数;a(0..2)=0,4,8;当n>2时,a(n)=a(n-3)+9。
%F a(n)=3*(n层(n/3))+n.-_加里·德特勒,2010年3月27日
%F a(n)=3*n+A010872(n).-_韦斯利·伊万·赫特,2013年7月7日
%传真:x*(x+2)^2/((1+x+x^2)*(x-1)^2)_R.J.Mathar,2013年7月13日
%p序列(3*(n层(n/3))+n,n=0..61);#_Gary Detlefs,2010年3月27日
%t s={};Do[如果[Mod[m*(1+m)*(1+2*m),18]==0,s={s,m}],{m,0400}];压扁[s]
%t展平[Position[Accumulate[Range[0200]^2],_?(模式[#,3]==0&)]-1(*或*)线性递归[{1,0,1,-1},{0,4,8,9},100](*哈维·P·戴尔,2018年3月8日*)
%Y参考A000330。
%K nonn,简单
%0、2
%A_Zak Seidov,2008年5月23日