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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A067581号 a(n)=序列中没有与a(n-1)相同数字的最小整数,a(0)=0。 26

%I#37 2022年7月1日05:33:50

%S 0,1,2,3,4,5,6,7,8,9,10,22,11,20,13,24,15,23,14,25,16,27,18,26,17,28,

%电话:19,30,12,33,21,34,29,31,40,32,41,35,42,36,44,37,45,38,46,39,47,50,43,

%U 51,48,52,49,53,60,54,61,55,62,57,63,58,64,59,66,70,56,71,65,72,68,73,69

%N a(N)=序列中还没有与a(N-1)相同数字的最小整数,a(0)=0。

%C David W.Wilson已经证明,序列包含所有正整数,除了包含所有数字1到9的整数(显然没有可能的前身)。2002年6月4日

%C a(A137857(n))=A137857.-_Reinhard Zumkeller,2008年2月15日

%H Reinhard Zumkeller和Zak Seidov,n表,n(n)表示n=0..10000</a>

%e a(14)=13,因为a(13)=20和所有小于13的整数都有一个与20相同的数字或已经出现在序列中。

%t f[s_List]:=块[{k=1,id=IntegerDigits@s[[-1]]},而[MemberQ[s,k]||交集[id,整数位数@k] != {},k++];追加[s,k]];巢穴[f,{1},71](*_Robert G.Wilson v_,2009年4月3日*)

%o(哈斯克尔)

%o导入数据。列表(删除、相交);导入数据。功能(打开)

%o a067581 n=a067581_列表!!(n-1)

%o a067581_list=1:f 1[2..]其中

%o f u vs=v:f v(删除v vs)

%o其中v:_=过滤器(null.(intersect`on`show)u)vs

%o--_Reinhard Zumkeller,2013年7月1日

%o(PARI){u=0;a=0;对于(n=0,99,print1(a“,”);u+=1<a;D=Set(if(a,digits(a)));对于(k=0,9e9,bittest(u,k)&&next;#setintersect(D,Set(digits,k))&&next;a=k;break))}\\_M.F.Hasler_,2014年11月1日

%o(Python)

%o从itertools导入计数,islice,产品为P

%o仅定义(s,D=1):#numbers with>=D digits only from s

%o从count(d)中d的(int(“”.join(p))中获得p在p(s,repeat=d)中的产量

%o def agen():#术语生成器

%o集合,an,minan={0},0,1

%o为True时:

%o产生an

%o an,s=minan,集合(str(an))

%o使用=“”.join(c代表“0123456789”中的c,如果c不在s中)

%o仅适用于in(使用,D=len(str(minan))):

%o如果不在资产负债表中:中断

%o增加(a)

%o而minan在aset中:minan+=1

%o打印(列表(islice(agen),73))#_Michael S.Branicky_,2022年6月30日

%Y参见A136332、A184992、A239664、A249585、A249591。

%Y另见A276512、A276633、A276766。

%K简单,不,基本,漂亮,看

%0、3

%A Ulrich Schimke(ulrschimke(AT)aol.com)

%2014年11月2日,M.F.Hasler_将E扩展为a(0)=0

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

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

上次修改时间:美国东部夏令时2024年3月29日09:44。包含371268个序列。(在oeis4上运行。)