A131220-OEIS公司

A131220号

a（n）是数字不出现在a（n-1）中的最小半素数>a（n-1）。

4, 6, 9, 10, 22, 33, 46, 51, 62, 74, 82, 91, 202, 314, 502, 611, 703, 815, 922, 1003, 2227, 3005, 4117, 5006, 7111, 8002, 9111, 20003, 41119, 50003, 61111, 70027, 81113, 90026, 111113, 200006, 311113, 400006, 511113, 600007 (列表;图表;参考;听;历史;文本;内部格式)

	抵消	`1,1`
	评论	`的半素数模拟A030284号.`
	链接	`n=1..40时的n，a（n）表。`
	例子	前4个值是前4个半素数。但是，在10之后，我们不能有14、15或21（接下来的3个半素数中的任何一个），因为它们都与10共享数字1。因此，a（5）=22。序列是无限的，就像素数模拟一样。证明简图：显然是正确的，除非我们遇到一个泛数字半素数（使用了所有10位数字），在这个半素数之后，不能再出现以10为基数的整数。这样的半素数是存在的，最小的是10123456789。但我们不能在这个序列中有这样的值，因为它违反了定义。
	MAPLE公司	isA001358:=proc（n）如果numtheory[bigomega]（n）=2，则为true；否则为假；fi；end:sharedDgs:=proc（a，b）本地adigs，bdigs；adigs：=转换（转换（a，base，10），set）；bdigs:=转换（转换（b，base，10），set）；如果nops（adigs与bdigs相交）>0，则为true；否则为假；fi；结束时间：A131220号：=proc（n）选项记忆；局部a，aprev；如果n=1，则为4；其他aprev：=A131220号（n-1）；a:=aprev+1；当不是A001358（a）或sharedDgs（a，aprev）时，执行a:=a+1；od；a；fi；结束：seq(A131220号（n），n=1..40）#R.J.马塔尔2007年10月30日
	交叉参考	`囊性纤维变性。A001358号，A030284号.` `上下文中的序列：A084668号 A085842号 A356135美元A332618飞机 A295329型 A302990型` `相邻序列：A131217号 A131218号 A131219号A131221号 A131222号 A131223号`
	关键词	`基础，容易的，非n`
	作者	`乔纳森·沃斯邮报2007年10月20日`
	扩展	`更多术语来自R.J.马塔尔2007年10月30日`
	状态	`经核准的`