A155075-OEIS公司

A155075号

一个数字的素数只使用了两次，其他所有数字都是不同的。

11, 101, 113, 131, 151, 181, 191, 199, 211, 223, 227, 229, 233, 277, 311, 313, 331, 337, 353, 373, 383, 433, 443, 449, 499, 557, 577, 599, 661, 677, 727, 733, 757, 773, 787, 797, 811, 877, 881, 883, 887, 911, 919, 929, 977, 991, 997, 1009, 1013, 1019, 1021

(列表;图表;参考;听;历史;文本;内部格式)

抵消

1,1

序列是有限的。最后10个术语是98876342501、98876405231、988764、21053、98876501243、988765、20143、9887、624013、988、624301、9887和530421、98876532401-扎克·塞多夫2014年12月18日

以n=1开头的n位数术语的数量：{0，1，46，508，4117，31395，187533，854665，2989094，7172381，6481542}-扎克·塞多夫2015年6月4日

链接

罗伯特·伊斯雷尔，n=1..10000时的n，a（n）表

MAPLE公司

G： =proc（d）#生成所有d位术语

本地L、C、Cc、P、i、x、res；

res:=空；

五十： =[false，true，false，true，false；

对于组合中的C：-choose（[$0..9]，d-1）do

因为我从1到d-1

Cc:=[运算（C），C[i]]；

如果convert（Cc，`+`）mod 3=0，则下一个fi；

对于组合中的P：-permute（Cc）do

如果P[-1]=0或不是L[P[1]+1]，则下一个fi；

x： =加（P[i]*10^（i-1），i=1..nops（P））；

如果isprime（x），则res:=res，x fi；

操作系统

od；

排序（[res]）；

结束进程：

seq（op（G（d）），d=1..5）#罗伯特·伊斯雷尔2015年6月4日

数学

fQ[n_]：=长度[IntegerDigits[n]]-长度[Union[Integer Digits[n]]]==1；选择[Prime@范围[21713]，fQ[#]&](*伊万·伊纳基耶夫2015年9月25日*）

黄体脂酮素

（PARI）列表a（nn）={forprime（p=2，nn，my（d=数字（p））；如果（#vecsort（d，8）==#d-1，print1（p，“，”）；）；}\\米歇尔·马库斯2014年12月18日

交叉参考

囊性纤维变性。A000040型,A073064型.

上下文中的序列：A158051号 A091366号 A073064型*A180421号 A176179号 A176196号

相邻序列：A155072号 A155073号 A155074号*A155076号 A155077号 A155078号

关键词

非n,完成,基础

作者

尤里·斯蒂潘·杰拉西莫夫2009年1月19日

扩展

定义由澄清R.J.马塔尔2010年5月5日

状态

经核准的