OEIS哀悼西蒙斯感谢西蒙斯基金会支持包括OEIS在内的许多科学分支的研究。
登录
OEIS由OEIS基金会的许多慷慨捐助者

 

标志
提示
(来自的问候整数序列在线百科全书!)
A303475型 a(n)是最小的m>n,因此,出现在英文名称n中的每个字母,如果重复,也会出现在英文名m中。 4
14, 21, 13, 14, 25, 16, 17, 18, 19, 13, 111, 112, 37, 74, 57, 67, 77, 78, 79, 21, 120, 122, 122, 124, 125, 126, 127, 128, 125, 31, 125, 128, 132, 134, 135, 136, 137, 138, 135, 41, 124, 124, 124, 144, 145, 64, 74, 148, 94, 51, 145, 152, 152, 154, 155, 156, 157, 158, 155, 61 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,1
链接
阿尔图·阿尔坎,n=1..10000时的n,a(n)表
例子
a(2)=21,因为2是2,21是21,其中所有两个字母都出现在21中,而这在21之前不会发生。
数学
in[n_]:=整数名称[n,“单词”];
ch[n_]:=字符[StringReplace[IntegerName[n,“Words”],{“-”->“”,“->”“}]];
f[n_]:=模[{m=n+1},而[Complement[ch[n],ch[m]]={}||
并集[Select[Table[Count[ch[m],ch[n][[i]]]-Count[ch[n],ch[n][i]],{i,1,Length[ch[n]]}],#<0&]]={},m++];m] ;
数组[f,60](*伊万·伊纳基耶夫2018年4月26日*)
黄体脂酮素
(PARI)
v1=[“一”、“二”、“三”、“四”、“五”、“六”、“七”、“八”、“九”];
v2=[“十一”,“十二”,“十三”,“十四”,“十五”,“十六”,“十七”,“十八”,“十九”];
v3=[“十”,“二十”,“三十”,“四十”,“五十”,“六十”,“七十”,“八十”,“九十”];
conv(n)={if(n>=10^12,错误(“对于这个程序来说太大”);
如果(n>=10^9,返回(concat(concat(conv(n\10^6),“十亿”),conv(n%10^9)));
如果(n>=10^6,返回(concat(concat(conv(n\10^6),“million”),conv(n%10^6,));
如果(n>=10^3,则返回(concat(conat(conv(n\10^3),“千”),conv(n%10^3,));
如果(n>=10^2,则返回(concat(conct(conv(n\100),“百”),conv(n%100)));
如果(n>=20,返回(concat(v3[n\10],conv(n%10)););
如果(n>=10,如果(n==10,返回(v3[n\10]),返回(v2[n%10]););
如果(n,返回(v1[n]),返回(“”);
}
mycmp(sa,sb)={my(vsa=Vec(sa),vsb=Vec
a(n)={my(m=n+1,sn=conv(n),sm=conv
交叉参考
囊性纤维变性。A303380型
关键词
非n,单词,
作者
米歇尔·马库斯2018年4月24日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年5月26日11:55。包含372824个序列。(在oeis4上运行。)