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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A106792号 比利时-5号。 13

%I#15 2015年5月8日16:51:29

%S 5,10,11,12,13,29,38,45,50,52,53,55,611001010211011114120,

%电话:121124125130131132134135136137139140145148150151,

%U 160174175182186191195211电话

%N比利时-5号。

%H Reinhard Zumkeller,<a href=“/A106792/b106792.txt”>n的表,a(n)表示n=1.-10000</a>

%t比利时Q[n_,k_]:=如果[n<k,False,Block[{id=Join[{0},IntegerDigits@n]},MemberQ[Accumulate@id,Mod[n-k,Plus@@id]]];选择[Range@211,belgianQ[#,5]&](*_Robert G.Wilson v_,2011年5月6日*)

%o(哈斯克尔)

%o a106792 n=a106792_list!!(n-1)

%o a106792_list=过滤器bel5[5..],其中

%o belge5 x=x==(头部$dropWhile(<x)$

%o扫描(+)5$cycle((map(read.return))。显示)x))

%o--_Reinhard Zumkeller_,2015年5月8日

%Y有关定义和链接,请参见A106039。

%Y比利时-k数字,k=0..9:A106039,A106439,A105518,A106596,A106631,A106792,A107014,A1070118,A107032,A1007043。

%Y参考A257770。

%K基础,简单,无

%O 1,1

%A _Eric Angelini,2005年6月7日

%E偏移由Reinhard Zumkeller_于2015年5月8日更改

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

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

上次修改时间:2024年3月28日13:42 EDT。包含371254个序列。(在oeis4上运行。)