编辑
经核准的
nxt[{a_，b_，c}]：={b，c，因子整数[c+a][[-1，1]]}；嵌套列表[nxt，｛1，1，1｝，120][[全部,1]] (*或*)PadRight（右垫）[{1,1, 1]] (* _,2,三,2,2},130, {三,2,三,三,5,2,5,5,7}] (* _Harvey P.Dale_，2017年7月8日*）
nxt[{a_，b_，c}]：={b，c，因子整数[c+a][[-1，1]]}；嵌套列表[nxt，{1，1，1}，120][[全部，1]](*哈维·P·戴尔2017年7月8日*）
（哈斯克尔）
a214320 n=a214320_列表！！n个
a214320_list=1:1:1:（地图a006530$
zipWith（+）a214320_list（删除2$a214320-list）
--莱因哈德·祖姆凯勒2012年7月24日
囊性纤维变性。A000930号,A006530号,A177904号,A214320型.
7个学期后，以周期9进行循环。
