登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
（来自的问候整数序列在线百科全书!)
A248641型 不包含4项等距子序列（a（n+k*d）的词汇最早正序列；k=0,1,2,3）。 三
1, 1, 1, 2, 1, 1, 2, 1, 1, 1, 2, 2, 2, 3, 1, 1, 1, 2, 1, 2, 2, 2, 3, 3, 3, 1, 1, 3, 1, 1, 1, 2, 2, 1, 2, 2, 1, 2, 2, 2, 3, 3, 2, 3, 2, 3, 3, 5, 1, 1, 1, 3, 1, 1, 3, 1, 1, 1, 2, 2, 2, 3, 1, 2, 1, 1, 1, 2, 2, 2, 3, 4, 2, 3, 2, 2, 2, 3, 3, 1, 3, 3, 3, 5, 5, 4, 1, 1, 1, 3, 1, 2, 3, 1, 5, 3, 2, 6, 1, 3, 2, 2, 3, 2, 1, 1, 3, 3, 1, 1, 1 (列表;图表;参考;听;历史;文本;内部格式)
抵消
0,4
评论
请参阅A248625型获取更多信息、链接和示例。
它是A229037号其中，3项替换为4项（并使用“领先指数”0代替1）
链接
塞巴斯蒂安·帕尔库克斯，n=0..10000时的n，a（n）表
黄体脂酮素
（PARI）a=[]；对于（n=1190，a=concat（a，1））；while（hasAP（a，4），a[#a]++））；a\\请参阅A248625型用于hasAP（）。
（SageMath）
cpdef FourFree（int n）：
cdef int i、r、k、s、L1、L2、L3
cdef列表L，Lb
cdef集合b
L=[1，1，1]
对于范围（3，n）中的k：
b=设置（）
对于范围（k）内的i：
如果3*（（k-i）/3）==k-i：
r=（k-i）/3
L1、L2、L3=L[i]、L[i+r]、L[i+2*r]
s=3*（L2-L1）+L1
如果s>0且L3==2*（L2-L1）+L1：
b.添加
如果1不在b中：
L.附录（1）
其他：
Lb=列表（b）
磅排序（）
对于t（单位：磅）：
如果t+1不在b中：
L追加（t+1）
打破
返回L
#塞巴斯蒂安·帕尔库克斯2019年8月28日
交叉参考
囊性纤维变性。A248625型,A248639型,A248640型,248627英镑,A229037号,A241752型.
上下文中的序列：A073203型 A073204号 A322286型*A282934型 A273619型 327522美元
相邻序列：A248638型 A248639型 A248640型*A248642型 A248643型 A248644型
关键字
非n,容易的
作者
M.F.哈斯勒2014年10月10日
状态
经核准的

查找|欢迎光临|维基|注册|音乐|地块2|Demos公司|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|转换|超级搜索|最近
OEIS社区|维护人OEIS基金会。

许可协议、使用条款、隐私政策。.

上次修改时间：2024年7月26日21:57 EDT。包含374636个序列。（在oeis4上运行。）