A106551-OEIS公司

106551英镑

a（n）=第n个半素数+（它的两个除数的串联，第一个是最大除数）。

26, 38, 42, 62, 86, 68, 94, 134, 80, 158, 146, 206, 110, 230, 172, 278, 126, 224, 170, 250, 350, 374, 200, 302, 446, 194, 494, 260, 518, 380, 228, 406, 566, 290, 638, 484, 350, 710, 296, 1232, 734, 536, 562, 330, 806, 614, 854, 1454, 440, 878, 470, 950, 692

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

抵消

1,1

以最小的除数开始的除数的串联导致不同的序列。

链接

罗伯特·伊斯雷尔，n=1..10000时的n，a（n）表

例子

第一个半素数是4；4是2*2；26=4+22.

第二个半素数是6；6是3*2；38=6+32.

第三个半素数是9；9是3*3；42=9+33.

第四个半素数是10；10是5*2；62=10+52.

MAPLE公司

N： =1000:#对于术语<=N

素数：=选择（i素数，[2，seq（i，i=3…N/2，2）]）：

R： =空：

对于i从1到nops（素数），对于j从1到i，而对于素数[i]*素数[j]<=N do

R： =R，[素数[i]*素数[j]，素数[i]*10^（1+ilog10（素数[j]））+素数[j]]

日期：

映射（转换，排序（[R]，（x，y）->x[1]<y[1]），`+`）#罗伯特·伊斯雷尔2020年6月9日

数学

cp[n_]：=块[{p=Reverse[First/@FactorInteger[n]]}，如果[Length[p]==1，p=Join[p，p]]；n+FromDigits[加入@@整数位数@p]]；cp/@选择[Range@160，2==PrimeOmega@#&](*乔瓦尼·雷斯塔2020年6月10日*）

交叉参考

上下文中的序列：A213012型 171745英镑 A045092号*A106553号 A371696飞机 A178662号

相邻序列：A106548号 A106549号 A106550型*106552英镑 A106553号 A106554号

关键字

基础,容易的,非n,看

作者

埃里克·安吉利尼2005年5月9日

扩展

编辑人N.J.A.斯隆2007年9月29日

更正和扩展人哈维·P·戴尔2012年6月3日

a（40）和a（48）由修正罗伯特·伊斯雷尔2020年6月9日

状态

经核准的