|
|
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);
结束条件:;
|
|
黄体脂酮素
|
(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日
|
|
交叉参考
|
囊性纤维变性。A044813号,A044814号,A044815号,A044816号,A044817号,A044818号,A044819美元,A044820号,A044821号,A044822号,A044823号,A044824美元,A044825号,A044826号,A044827号(底座2至底座16)。
|
|
关键词
|
非n,基础
|
|
作者
|
|
|
状态
|
已批准
|
|
|
|