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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A288452型 伪完美totient数:等于其迭代φ(n)子集之和的数n。 4
3, 5, 7, 9, 11, 13, 15, 17, 19, 23, 25, 27, 29, 31, 33, 35, 37, 39, 41, 43, 47, 49, 51, 53, 55, 59, 61, 65, 67, 69, 71, 73, 77, 79, 81, 83, 85, 87, 89, 97, 101, 103, 107, 109, 111, 113, 115, 119, 121, 123, 125, 127, 131, 137, 139, 141, 143, 149, 151, 153, 155 (列表;图表;参考文献;;历史;文本;内部格式)
抵消
1,1
评论
类似于A005835号(伪完美数)作为A082897号(完全数字)类似于A000396号(完美数字)。
所有奇数素数都在这个序列中。
<10^k:4、40、350、2956、24842等-罗伯特·威尔逊v2017年6月17日
所有术语都很奇怪。如果n是偶数,则phi(n)<=n/2,除n=2外,phi(n)也是偶数。因此,φ序列之和<n*(1/2+1/4+…)=n-富兰克林·T·亚当斯-沃特斯2017年6月25日
链接
例子
25的迭代φ是20、8、4、2、1和25=20+4+1。
数学
pseudoPerfectTotQ[n_]:=模块[{tots=Most[Rest[FixedPointList[EulerPhi@#&,n]]},成员Q[Total/@Subsets[tots,Length[tots],n]];选择[Range[155],pseudo PerfectTotQ]
黄体脂酮素
(PARI)subsetSum(v,target)=if(setsearch(v,target),return(1));如果(#v<2,返回(目标==0));my(u=v[1..#v-1]);如果(target>v[#v]&&subsetSum(u,target-v[#v]),返回(1));subsetSum(u,目标);
is(n)=如果(i素数(n),返回(n>2));我的(v=列表(),k=n);而(k>1,listput(v,k=eulerphi(k));subsetSum(集合(v),n)\\查尔斯·格里特豪斯四世2017年6月25日
交叉参考
的超序列A082897美元.后续A286265型.
关键词
非n
作者
状态
经核准的

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

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

上次修改时间:2024年6月19日19:59 EDT。包含373507个序列。(在oeis4上运行。)