登录
OEIS由
OEIS基金会的许多慷慨捐赠者
.
提示
(来自的问候
整数序列在线百科全书
!)
A303435
使uphi(n)(酉totiten函数)
A047994号
)是n的幺正除数的幂(
A034444号
).
0
1, 2, 3, 5, 9, 10, 17, 30, 34, 85, 170, 257, 514, 765, 1285, 1542, 4369, 8738, 39321, 65537, 131070, 131074, 327685, 655370, 1114129, 2949165, 3342387, 16843009, 33686018, 100271610, 151587081, 572662306, 2863311530
(
列表
;
图表
;
参考
;
听
;
历史
;
文本
;
内部格式
)
偏移
1,2
评论
统一版本的
A289276号
.
自
A034444号
(n) =2^omega(n)是2的幂,所有项都是2和Fermat素数的乘积(
A019434号
),每个重数都小于2,但3可能重数为2(因为3^2=2^3+1)。
如果没有第六个费马素数,那么这个序列是有33个项的有限序列。
链接
n=1..33时的n,a(n)表。
例子
2863311530=2*5*17*257*65537在序列中,因为它有2^5个幺正除数,它的uphi值是2^30=(2^5)^6。
数学
uphi[n_]:=如果[n==1,1,(倍@@(表[#[1]]^#[2]]-1,{1}]&/@FactorInteger[n])[[1]]];
aQ[n_]:=如果[n==1,True,IntegerQ[Log[2,uphi[n]]/PrimeNu[n]];
v=并集[Times@@@Rest[Subsets[{1,2,3,5,17,257,65537}]];
w=联合[v,3*v];
s={};
做[w1=w[[k]];
如果[aQ[w1],AppendTo[s,w1]],{k,1,Length[w]}];
秒
交叉参考
囊性纤维变性。
A019434号
,
A034444号
,
A047994号
,
A092506号
,
A289276号
.
上下文中的序列:
A057254号
A057242号
A273139型
*
A090845号
A262990型
A058108号
相邻序列:
A303432型
A303433型
A303434型
*
A303436型
A303437型
A303438型
关键词
非n
作者
阿米拉姆·埃尔达尔
2018年4月24日
状态
经核准的
查找
|
欢迎光临
|
维基
|
注册
|
音乐
|
地块2
|
演示
|
索引
|
浏览
|
更多
|
网络摄像头
贡献新序列。
或评论
|
格式
|
样式表
|
变换
|
超级搜索
|
最近
OEIS社区
|
维护人
OEIS基金会。
许可协议、使用条款、隐私政策。
.
上次修改时间:美国东部夏令时2024年4月19日04:35。
包含371782个序列。
(在oeis4上运行。)