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

 


A210666型
至少有三位数字的数字,其中除一位外所有数字都相同。
6
100, 101, 110, 112, 113, 114, 115, 116, 117, 118, 119, 121, 122, 131, 133, 141, 144, 151, 155, 161, 166, 171, 177, 181, 188, 191, 199, 200, 202, 211, 212, 220, 221, 223, 224, 225, 226, 227, 228, 229, 232, 233, 242, 244, 252, 255, 262, 266, 272, 277, 282, 288
抵消
1,1
评论
每个k位术语都有数字d1的k-1外观,以及不同数字d2的1外观,并且k-1>=2,以便重复d1。具体来说A010784号这里不是术语-迈克尔·布拉尼基2022年5月22日
a(n)=A031955号(n+81),对于n<=244。
对于n≤243,即3位数项,a(n)=A218556型(n+10)-M.F.哈斯勒2012年11月2日
链接
Arkadiusz Wesolowski,n=1..10000时的n,a(n)表
数学
lst={};Do[If[SortBy[Tally[Integer Digits[n]],Last][[-1,-1]]==整数长度[n]-1,追加到[lst,n]]、{n,100,288}];第一次
lst={};Do[r=表[a,{n}];做[c=FromDigits@排列[连接[{d},r]];如果[d==0,c=Rest[c]];附加到[lst,c],{d,0,9}],{a,0,9},{n,2,2}];删除[扁平接头[lst],19]
nrepQ[n_]:=模块[{dg=选择[DigitCount[n],#>0&]},长度[dg]==2&Min[dg]==1&Max[dg>1];选择[Range[300],nrepQ](*哈维·P·戴尔2012年11月20日*)
黄体脂酮素
(Python)
从itertools导入计数,islice
def agen():#术语生成器
对于计数(3)中的d:
dterms=set()
对于“123456789”中的大多数:
dterms.add(int(最多+“0”*(d-1)))
对于“0123456789”中的差异:
如果大多数==diff:继续
cands=(对于范围(d)内的i,最大*i+diff+most*(d-1-i))
如果t[0]!=,则dterms.update(int(t)for t in cands"0")
分选产量(dterms)
打印(列表(islice(agen(),52))#迈克尔·布拉尼基2022年5月17日
交叉参考
关键词
基础,容易的,非n,较少的
作者
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年9月21日04:44。包含376079个序列。(在oeis4上运行。)