|
|
|
|
0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 17, 18, 20, 21, 22, 24, 26, 27, 30, 31, 33, 35, 36, 39, 40, 42, 44, 45, 48, 50, 53, 54, 55, 60, 62, 63, 66, 70, 71, 72, 77, 80, 81, 84, 88, 90, 93, 99, 100, 101, 102, 106, 108, 110, 111, 112, 114, 117, 120
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,3
|
|
评论
|
给定一个整数-1<k<10,如果可以从k开始构造一个升序无限序列并包含n,则n是一个比利时-k数,并且该序列的第一个差分重复给出以n为基数的10位数字,而不是其他数字。
|
|
链接
|
文森佐·利班迪(Vincenzo Librandi)和莱因哈德·祖克勒(Reinhard Zumkeller),n=1..10000时的n,a(n)表文森佐·利班迪(Vincenzo Librandi)的前1000条条款
|
|
例子
|
由于序列的原因,13是比利时的0
0, 1, 4, 5, 8, 9, 12, 13, 16, 17, 20, ...
其中的第一个区别是
1, 3, 1, 3, 1, 3, 1, 3, 1, 3, ...
176是一个比利时-0数字,因为从0(种子)开始,可以通过以下方式构建包含176的序列:
0.1.8.14.15.22.28.29.36.42.43.50…..155.162.168.169.176……(顺序)
.1.7.6..1..7..6..1..7..6..1..7.6..1..7………….7…….7..6..1..7(第一个差异)
14不是比利时数字,因为尽管我们可以用所需的起点和所需的第一个差异(即0、1、5、6、10、11、15…)构建序列,但该序列不包含14。
|
|
数学
|
比利时Q[n_,k_]:=如果[n<k,False,Block[{id=Join[{0},IntegerDigits@n]},MemberQ[Accumulate@id,Mod[n-k,Plus@@id]]];选择[Range@120,belgianQ[#,0]&](*罗伯特·威尔逊v2011年5月6日*)
|
|
黄体脂酮素
|
(哈斯克尔)
a106039 n=a106039_列表!!(n-1)
a106039_list=过滤器bel0[0..],其中
belge0 n=n==(头部$dropWhile(<n)$
scanl(+)0$cycle((map(read.return))。显示)n))
|
|
交叉参考
|
|
|
关键词
|
基础,容易的,非n
|
|
作者
|
|
|
扩展
|
|
|
状态
|
经核准的
|
|
|
|