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

 

标志
提示
(来自的问候整数序列在线百科全书!)
240042美元 a(n)是最小的非负整数,因此a(n!包含正好n个连续1的字符串。 11

%I#76 2023年10月26日15:12:21

%S 2,0,22,47,3843673662322391247262123398263600679530725244,

%电话:81181615690326

%N a(N)是最小的非负整数,因此a(N!包含正好n个连续1的字符串。

%e a(0)=2自2起!等于2,不包含任何“1”。

%e a(1)=0,自0起!等于1,其中包含“1”,但不包含“11”。

%e a(2)=22,自22起!等于1124000727777607680000,其中包含“11”,22是满足此条件的最小整数。

%t f[n_]:=块[{k=0,s=ToString[(10^n-1)/9]},而[Length@StringPosition[ToString[k!],s]!=1,j=k++];k] ;f[0]=2;数组[f,12,0](*_Robert G.Wilson v_,2015年2月27日*)

%o(Python 2.7)

%o定义A254042():

%o指数=1

%o k=0

%o f=1

%o u=“1”

%o为True时:

%o sf=str(f)

%o如果u在sf中且u+'1'不在sf内:

%o打印“A254042(“+str(index)+”)=“+stra(k)

%o指数+=1

%o k=0

%o f=1

%o u+=“1”

%o k+=1

%o f*=k

%o返回

%o(PARI)a(n)=k=0;而(k<10^4,d=数字(2*10^(#(数字(k!))+1)+10*k!);对于(j=1,#d-n+1,c=0;对于(i=j,j+n-1,如果(d[i]==1,c++);if(d[i]!=1,c=0;break));如果(c==n&&d[j+n]!=1&&d[j-1]!=1,返回(k));如果(c==n,返回(k));如果(c!=n,k++))

%o代表(n=1,6,打印1(a(n),“,”)\\_Derek Orr_2015年1月29日

%o(PARI)max1s(n)=我的(v=数字(n),r,t);对于(i=1,#v,如果(v[i]==1,t++,r=max(r,t);t=0));最大值(t,r)

%o a(n)=我的(m=0);while(最大1s(m!)=n、 m++);2015年1月30日,查尔斯·格里特豪斯四世

%Y参见A254447、A254448、A25444、A254500、A254501、A254502、A254716、A25471、A252652。

%K nonn,基础,更多

%0、1

%A _Martin Y.Champel_,2015年1月25日

%E a(11)摘自Jon E.Schoenfield_2015年2月22日

%E a(12),a(13)摘自Jon E.Schoenfield_,2015年3月7日,2015年5月8日

%E a(14)-a(15),来自_伯特·多贝拉,2018年10月29日

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

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

上次修改时间:2024年4月18日22:18 EDT。包含371782个序列。(在oeis4上运行。)