|
| |
|
| A270338型 |
| 十进制展开式只包含3和4的素数，其中每4的前面和后面都有一个3。 |
|
2
|
|
|
|
3343, 3433, 33343, 333433, 334333, 343333, 343433, 3333433, 3343343, 3343433, 3433333, 34333333, 333334333, 333343343, 333343433, 333433343, 333434333, 334334333, 3333334343, 3333433343, 3334333333, 3343334333, 3343434343, 3433434343, 3434343433, 33333333343
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1，1
|
|
|
评论
|
与以下内容相关的序列A054356号。当以180度的旋转角度倒置观看时，这些素数看起来像“EEhEEhEEE”（3343-“EhEE”，3433-“EEhE”，33343-“Eh EEE”，33.3433-”EEhEEEE“）。
|
|
|
参考文献
|
乔治·巴尔扎罗蒂（Giorgio Balzarotti），保罗·拉瓦（Paolo P.Lava），《Centotre curiositámatematiche》，霍普里出版社，2010年，第3-4页。
|
|
|
链接
|
|
|
|
MAPLE公司
|
S： ={}：
对于从3到16 do的n
对于k从1到地板（（n-1）/2）do
对于组合中的r：-choose（n-1-k，k）do
五十： =底土（seq（t=（3,4），t=r），[3$（n-k）]）；
x： =加（L[i]*10^（n-i），i=1..n）；
如果是素数（x），则S:=S并集{x}fi
od od od日期：
|
|
|
数学
|
Select[Flatten[Table[FromDigits/@Select[Tuples[{3，4}，n]，SequenceCount[#，{3，4，3}，Overlaps->True]==计数[#，4]&]，{n，3，11}]]，PrimeQ]//Sort（*需要Mathematica版本10或更高版本*）(*哈维·P·戴尔2016年9月17日*）
|
|
|
黄体脂酮素
|
（Magma）[p:p in[3..333333333 43 by 10]|（p mod 100 eq 33或p mod 100 eq 43）和IsPrime（p）和Position（IntegerToString（p），IntegerToString（3））eq 1和Set（Intseq（p））子集[3，4]，而不是IntegerToString（p）中的IntegerToString（44）]；
|
|
|
交叉参考
|
|
|
|
关键词
|
非n,基础,哑的
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
