登录
OEIS基金会得到了OEIS用户的捐赠和西蒙斯基金会的资助。

 

标志


提示
(问候来自整数序列在线百科全书!)
A138510 最小数b使得基b中第n个半素数的素因子(A001358)长度相等。 9
1、2、1、2、1、6、8、3、3、12、1、14、12、18、2、20、14、14、24、1、18、4、20、30、32、4、24、24、38、4、42、5、44、30、30、4、32、48、5、54、38、5、54、38、5、60、5、1、62、42、44、5、32、48、72、2、30、30、74、32、80、54、5、84、84、1、60、60、90、62、38、38、3、98、68、102、6、42、104、3、72、108、44、6、110、74、3、72、108、44、6、110、74、3、3、3、42、72、108、110、110 114,48,80 (列表;图表;参考文献;;历史;文本;内部格式)
抵消

1,2

评论

a(n)=1 iffA001358(n) 是质数的平方(A001248号);

a(A174956号(邮编:A138511(n) ))=A084127号(A174956号(邮编:A138511(n) ))+1。

同样,如果A001358(n) =p^2,否则,如果A001358(n) =p*q(p,q素数,p<q),然后a(n)=A252375(n) =r^k<=p<q<r^(k+1)的最小r,对于某些k>=0。-安蒂·卡尔图宁2014年12月16日

a(A174956号(A085721号(n) ))<=2。-莱因哈德·祖姆凯勒2014年12月19日

链接

莱因哈德·祖姆凯勒,n=1..10000的n,a(n)表

公式

a(n)=邮编:A251725(A001358(n) )。-安蒂·卡尔图宁2014年12月16日

例子

当n=31时,第n个半素数为A001358(31)=91=7*13;

7=111_2=21_3=13_4

13=1101_2=111_3=31u4,所以a(31)=4。[更正人乔恩·肖恩菲尔德2018年9月23日]

.

初始项说明,n<=25:

.n|A001358(n) =p*q | b=a(n)| p和q,以b为底

. ----+---------------------+-----------+-------------------

.1 | 4 2 2 | 1 |[1][1]

.2 | 6 2 3 | 2 |[1,0][1,1]

.3 | 9 3 3 | 1 |[1,1,1][1,1,1]

.4 |**10 2 5 | 6 |[2][5]

.5 |**14 2 7 | 8 |[2][7]

.6 | 15 3 5 | 3 |[1,0][1,2]

[公元1247年]

.8 |**22 2 11 | 12 |[2][11]

.9 | 25 5 5 | 1 |[1]^5[1]^5

.10 |**26 2 13 | 14 |[2][13]

.11 |**33 3 11 | 12 |[3][11]

.12 |**34 2 17 | 18 |[2][17]

.13 | 35 5 7 | 2 |[1,0,1][1,1,1]

.14 |**38 2 19 | 20 |[2][19]

.15 |**39 3 13 | 14 |[3][13]

.16 |**46 2 23 | 24 |[2][23]

.17 | 49 7 7 | 1 |[1]^7[1]^7

.18 |**51 3 17 | 18 |[3][17]

.19 | 55 5 11 | 4 |[1,1][2,3]

.20 |**57 3 19 | 20 |[3][19]

.21 |**58 2 29 | 30 |[2][29]

.22 |**62 2 31 | 32 |[2][31]

.23 | 65 5 13 | 4 |[1,1][3,1]

.24 |**69 3 23 | 24 |[3][23]

.25平方英寸**74 2 37英寸38英寸[2][37]

其中p=A084126型(n) 和q=A084127号(n) 你说,

标有**的半素数表示邮编:A138511即b=q+1。

黄体脂酮素

(哈斯克尔)

import Data.List(genericIndex,展开器);import Data.Tuple(swap)

导入数据。也许(mapMay)

a138510 n=genericIndex a138510_列表(n-1)

a138510_list=mapMay f[1..]其中

f x | a010051'q==0=无

| q==p=1

|否则=只是$

头部[b | b<-[2..],长度(d b p)==长度(d b q)]

式中,q=div x p;p=a020639 x

d b=展开器(\z->如果z==0,则除$swap$divMod z b外无其他内容)

--莱因哈德·祖姆凯勒2014年12月16日

(方案)(定义(A138510n)(邮编:A251725(A001358n) );;安蒂·卡尔图宁2014年12月16日

交叉引用

囊性纤维变性。A078972号,A085721号.

囊性纤维变性。邮编:A138511,A251728号,A252375,A084127号,A020639号,邮编:A162319,A174956号,A001358.

上下文顺序:A136470号 A220884号 A217877号*A026215型 A026220型 A138750号

相邻序列:邮编:A138507 邮编:A138508 A138509号*邮编:A138511 A138512 邮编:A138513

关键字

,基础

作者

莱因哈德·祖姆凯勒2008年3月21日

扩展

错误评论由更正莱因哈德·祖姆凯勒2014年12月16日

状态

经核准的

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

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

上次修改日期:美国东部时间2020年9月22日15:04。包含337291个序列。(运行在oeis4上。)