A104154-OEIS公司

A104154号

对于每个自然数n：如果n的最后一位不为零，并且A004086号（n）是质数，追加A004086号（n）到序列。

2, 3, 5, 7, 11, 31, 41, 61, 71, 13, 23, 43, 53, 73, 83, 17, 37, 47, 67, 97, 19, 29, 59, 79, 89, 101, 401, 601, 701, 211, 311, 811, 911, 421, 521, 821, 131, 331, 431, 631, 241, 541, 641, 941, 151, 251, 751, 461, 661, 761, 271, 571, 971, 181, 281, 881

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

抵消

1,1

等价地说，这些是按其反转顺序排列的素数-雷米·西格里斯特2022年2月13日

链接

雷米·西格里斯特，n=1..9592时的n，a（n）表

例子

13的最后一位不是“0”，31是质数，因此我们追加31。

数学

a=选择[Range[196]，Integer Digits[#][[-1]]！=0&&PrimeQ[FromDigits[Reverse[IntegerDigits[#]]]&]；b={}；对于[n=1，n<长度[a]+1，n++，AppendTo[b，FromDigits[Reverse[IntegerDigits[a[n]]]]]；b条

黄体脂酮素

（PARI）left（str，n）={my（v，tmp，x）；v=“”；tmp=Vec（str）；ln=长度（tmp）；if（n>ln，n=ln）；for（x=1，n，v=concat（v、tmp[x]）；）；return（v）}\\从字符串str中获取左边的n个字符

rev（str）={local（tmp，s，j）；tmp=Vec（str（str，j））；s=“”；forstep（j=长度（tmp），1，-1，s=concat（s，tmp[j]））；return（s）}\\获取输入字符串的反转

rpime（n）={local（x，y，v）；for（x=1，n，y=rev（x）；v=Vec（y）；if（left（y，1）<>“0”&isprime（eval（y）），print1（y“，”））}

（Python）

从itertools导入计数，islice

从sympy导入primerange

定义1954年1月_gen（）：#术语生成器

对于count（1）中的l，对于sorted中的d，从（int（d[：：-1]）得到（str（m）[：：-1-对于素数范围（10**（l-1），10**l）中的m））

A104154号_list=列表（岛屿(1954年1月_生成（），20）#柴华武2022年2月17日

交叉参考

囊性纤维变性。A004087号.

上下文中的序列：A157158号 A155833号 A028867号*A123214号 A119834号 A095180型

相邻序列：A104151号 A104152号 2004年1月153日*A104155号 A104156号 A104157号

关键词

非n,基础,看,容易的

作者

西诺·希利亚德2005年3月9日

扩展

编辑人斯特凡·斯坦纳伯格2007年8月1日

状态

经核准的