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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A044821号 具有不同的十进制游程长度的正整数。 18
1, 2, 3, 4, 5, 6, 7, 8, 9, 11, 22, 33, 44, 55, 66, 77, 88, 99, 100, 110, 111, 112, 113, 114, 115, 116, 117, 118, 119, 122, 133, 144, 155, 166, 177, 188, 199, 200, 211, 220, 221, 222, 223, 224, 225, 226, 227, 228, 229, 233, 244, 255 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,2
链接
例子
117在序列中,因为它的运行长度为2,运行长度为1。101不在序列中,因为它有三个长度为1的游程-R.J.马塔尔2018年1月18日
MAPLE公司
rlset:=进程(L::list)
局部lset,rl,i;
lset:=[];
rl:=1;
对于i从2到nops(L)do
如果op(i,L)=op(i-1,L),则
rl:=rl+1;
其他的
lset:=[op(lset),rl];
rl:=1;
结束条件:;
结束do:
lset:=[op(lset),rl];
结束进程:
isA044821:=进程(n)
本地dgs,rl;
dgs:=转换(n,基数,10);
rl:=rlset(dgs);
如果nops(rl)=nops(转换(rl,设置)),则
真;
其他的
虚假;
结束条件:;
结束进程:
对于从1到400 do的n
如果是A044821(n),则
printf(“%d,”,n);
结束条件:;
结束do:#R.J.马塔尔2018年1月18日
黄体脂酮素
(Python)
从itertools导入groupby
定义正常(n):
runlengths=[len(list(g))for k,g in groupby(str(n))]
return len(runlength)==len(set(runlongth))
打印([i代表范围(1256)中的i,如果正常(i)])#迈克尔·布拉尼基2021年1月4日
(PARI)是(n)={my(runs=List(),lr=0,d=数字(n));对于(i=1,#d-1,如果(d[i]!=d[i+1],listput(runs,i-lr);lr=i;));listput(runs,#d-lr),#Set(runs)==#runs}\\大卫·A·科内斯2021年1月4日
交叉参考
关键词
非n,基础
作者
状态
已批准

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

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

上次修改时间:美国东部夏令时2024年4月25日08:27。包含371964个序列。(在oeis4上运行。)