%我#22 2022年9月8日08:44:57

%S 1,3,4,9,11,12,17,19,20,25,27,28,33,35,36,41,43,44,49,51,52,57,59,60，

%第65、67、68、73、75、76、81、83、84、89、91、92、97、91、105、107、108、113、115页，

%电话：116121123124129131132137139140145147148153155156

%与{1,3,4}模8同余的N个数。

%C数字m，使得Lucas（m）mod 3=1_Bruno Berselli，2017年10月19日

%H<a href=“/index/Rec#order_04”>具有常系数的线性递归索引条目，签名（1,0,1，-1）。

%传真：x*（1+2*x+x^2+4*x^3）/（（1-x）^2*（1+x+x*2））_科林·巴克，2012年5月13日

%F From _Wesley Ivan Hurt_，2016年6月9日：（开始）

%当n>4时，F a（n）=a（n-1）+a（n-3）-a（n-4）。

%F a（n）=2*（12*n-12-6*cos（2*n*Pi/3）+sqrt（3）*sin（2*n*Pi/3。

%Fα（3*k）=8*k-4，a（3*k-1）=8*k-5，a（3+k-2）=8xk-7。（结束）

%p A047459:=n->2*（12*n-12-6*cos（2*n*Pi/3）+sqrt（3）*sin（2*n*Pi/3”）/9:seq（A047459（n），n=1..100）；#_Wesley Ivan Hurt_，2016年6月9日

%t选择[Range[200]，MemberQ[{1，3，4}，Mod[#，8]]&]（*或*）LinearRecurrence[{1、0、1、-1}，{1、3、4、9}，60]（*H arvey P.Dale_，2015年11月26日*）

%o（岩浆）[0..150]n中的n:n在[1,3,4]中的n mod 8；//_Wesley Ivan Hurt_，2016年6月9日

%Y参考A000032。

%Y参考A016825：数字m，使得Lucas（m）mod 3=0。

%Y参考A047477：数字m，使得Lucas（m）mod 3=2。

%K nonn，简单

%O 1,2号机组

%A _N.J.A.斯隆_