%I#53 2019年9月8日12:03:43

%S 1,1,2,2,2,3,1,3,2,2,5,1,4,2,2,7,1,5,2,2,9,1,6,2,2,11,1,7,2,2,13，

%T 1,8,8,2,2,15,19,22,17,10,10,2,2,19,11,11,2,21,12,12,2,23,1，

%U 13,2,25,14,14,2,2,27,15,2,2

%N a（1）=1；a（n）=如果a（n-1）是奇数，则a（n-1）的出现次数；a（n）=如果a（n-1）是偶数，则a（n-2）的出现次数。

%H Colin Barker，n的表格，n=1..1000的a（n）</a>

%H<a href=“/index/Rec#order_22”>带常系数线性递归的索引条目</a>，签名（0,0,0,1,0,0-0,00,0_0,0,2,0,0:0,0,0，-1）。

%F From _Colin Barker_，2019年8月24日：（开始）

%传真：x*（1+x+2*x^2+2*x|3+2*x^4+3*x^5+x^6+3*x^7+2*x*8+2*x_9+5*x^10-x^11+2*x^12-2*x^14-2-x^15+x^16-x^17-x^18-2-x^19-2-x^20-x^21-x^23）/（（1-x）^2*（1+x+x^2+x^3+x^4+x^5+x ^6+x^7+x^8+x^9+x^10）^2）。

%当n>24时，F a（n）=2*a（n-11）-a（n-22）。

%F（结束）

%e由于a（6）是奇数，a（7）=a（6”的出现次数。a（6）=3到该点的出现次数为1。

%e a（14）是偶数，因此a（15）=a（13）的出现次数。a（13）=4到该点的出现次数为2。

%t系数列表[级数[（1+x+2*x^2+2*x*^3+2*x^4+3*x^5+x^6+3*x^7+2*xs^8+2*xx^9+5*x^10-x^11+2*x ^12-2*x^14-2-x^15+x^16-x^17-x^18-2-x^19-2-x^20-x^21-x^23）/（1-x）^2*（1+x^2+x^3+x^4+x^5+x^6+x^7+x^8+x^9+x^10）^2），{x，0，100}]，x]（*_Wesley Ivan Hurt_，2019年8月24日*）

%o（VBA/Excel）

%o子条款306399（）

%o单元格（1,1）=1

%o n=2至200

%o k=2-（单元格（n-1，1）Mod 2）

%o m=单元格（n-k，1）

%o S=0

%o对于j=1到n-1

%o如果单元格（j，1）=m，则

%o S=S+1

%o结束条件

%o下一个j

%o单元格（n，1）=S

%o下一个n

%o端接头

%o（Python）

%o n，aa=1，[1]

%o打印（n，1）

%o当n≤75时：

%o sa=aa[len（aa）-2+aa[len（aa）-1]%2]

%o i，a=0，0

%o当i<len（aa）时：

%o如果sa==aa[i]：

%o a=a+1

%o i=i+1

%o打印（n，a）

%o n，aa=n+1，aa+[a]#_a.H.M.Smeets_，2019年8月23日

%o（PARI）nbo（v，i）=#选择（x->（x==v[i]），v）；

%o lista（nn）={v=矢量（nn，v[1]=1；对于（k=2，nn，如果（v[k-1]%2，v[k]=nbo（v，k-1），v[k]=nbo（v，k-2））；）；v；}马库斯，2019年8月24日

%o（PARI）向量^5+x^6+x^7+x^8+x^9+x^10）^2）+o（x^80））\\科林·巴克，2019年8月25日

%o（PARI）A306399_以上（N，c=Map（[0；1]~），L，P）=向量（N，i，[P，L]=[L，mapget（c，if（bitand（L，1），L、P））]；地图输入（~c，L，ifrer（地图输入（c，L）+1，E，1））；五十） \\ M.F.Hasler_，2019年9月2日

%K nonn，简单

%氧1,3

%A _Ali Sada，2019年8月22日