A046810-OEIS公司

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

A046810号

n的素数字谜数量。

18

0, 1, 1, 0, 1, 0, 1, 0, 0, 0, 1, 0, 2, 1, 0, 1, 2, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 2, 1, 0, 1, 1, 0, 2, 1, 0, 0, 1, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 2, 0, 2, 1, 0, 1, 0, 0, 2, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 1, 1, 0, 0, 1, 0, 2, 1, 0, 0, 1, 0, 1, 1, 0, 1, 2, 0

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

抵消

1,13

评论

k位数字的变位是k中的一个！不以0开头的数字的排列。

链接

莱因哈德·祖姆凯勒（Reinhard Zumkeller），n=1..10000时的n，a（n）表

例子

107有两个基本字谜：107和701（但不是017或071）；因此a（107）=2。

数学

表格[Count[FromDigits/@Select[Permutations[IntegerDigits[n]]，First[#]！= 0&], _?（素数Q[#]&）]，{n，110}](*哈维·P·戴尔2011年8月24日*）

黄体脂酮素

（哈斯克尔）

导入数据。列表（排列，nub）

a046810 n=长度$过滤器（（==1）。a010051）

$map读取（nub$filter（（>“0”））。头部）

$排列$显示n）

--莱因哈德·祖姆凯勒2011年8月14日

（Python）

从sympy导入isprime

从itertools导入排列

定义a（n）：如果p[0]，则返回len（t表示置换中的p（str（n））！=“0”和isprime（t:=int（“”.join（p）））

打印（[a（n）表示范围（1106）中的n）]#迈克尔·布拉尼基2024年2月17日

交叉参考

囊性纤维变性。A039999号,A055098号.

上下文中的序列：178665英镑 A170958号 A178651号*A328515型 A356682型 A323989型

相邻序列：A046807号 A046808号 A046809号*A046811号 A046812号 A046813号

关键词

非n,容易的,基础,美好的

作者

大卫·W·威尔逊

状态

经核准的