登录

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

 

提示 （来自的问候整数序列在线百科全书!) A092108号 对m进行编号，使m-th素数+m-th半素数为素数。 2 4, 8, 12, 21, 38, 45, 47, 52, 58, 62, 70, 111, 142, 143, 155, 178, 269, 301, 348, 359, 364, 387, 395, 403, 435, 442, 451, 464, 497, 525, 529, 577, 579, 582, 585, 598, 624, 700, 709, 716, 752, 764, 797, 800, 803, 814, 836, 841, 864, 873, 877, 922, 934, 978, 990 (列表;图表;参考文献;听;历史;文本;内部格式) 抵消 1,1 评论 生成的素数为：17、41、71、131、281、331、353、397、449、487、563、953、1279、1289、1409、1627-扎克·塞多夫2018年5月8日 链接 查尔斯·格里塔斯四世，n=1..10000时的n，a（n）表 例子 12是一个成员，因为12素数是37，12半素数是34，37+34=71是素数。 数学 PrimeFactorExponentsAdded[n_]：=加@@展平[表[#[2]]，{1}]&/@FactorInteger[n]]；sp=选择[Range[3700]，PrimeFactorExponentsAdded[#]==2&]；p=表格[素数[i]，{i，长度[sp]}]；选择[Range[Length[sp]]，PrimeQ[sp[[#]]+p[[#]]&](*罗伯特·威尔逊v2004年2月24日*） 模块[{nn=5000，sms，prs，len}，sms=Select[Range[nn]，PrimeOmega[#]==2&]；len=长度[sms]；prs=素数[范围[len]]；选择[Table[{n，prs[[n]]，sms[[n]]}，{n，len}]，PrimeQ[#[2]]+#[[3]]&][All，1]](*哈维·P·戴尔2018年2月28日*） 交叉参考 囊性纤维变性。A000040型,A001358号. 上下文中的序列：A190891号 A188293号 A128233号*A015781号 A130643号 A014617号 相邻序列：A092105年 A092106号 A092107号*2009年0月21日 A092110型 A092111号 关键词 非n 作者 扎克·塞多夫2004年2月22日 扩展 更多术语来自罗伯特·威尔逊v和雷·钱德勒2004年2月24日 状态 经核准的

查找|欢迎光临|维基|注册|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。

许可协议、使用条款、隐私政策。.

上次修改时间：美国东部夏令时2024年6月20日03:21。包含373512个序列。（在oeis4上运行。）