OEIS哀悼西蒙斯感谢西蒙斯基金会支持包括OEIS在内的许多科学分支的研究。
登录
OEIS由OEIS基金会的许多慷慨捐赠者

 

标志
提示
(来自的问候整数序列在线百科全书!)
2013年2月 精确n个分区的最小k k=x+y满足phi(k)=phi(x)+phi(y),其中phi(k)是k的Euler totiten函数。

%I#10 2016年4月9日16:39:55

%S 3,14,20,28,44,92112224266260404380476552558696860984846,

%电话:106213881128127817521494142203419261704199223582466,

%电话:2712242427183222300632584924328835824296379840084518568850945352

%N精确N个分区的最小k k=x+y满足phi(k)=phi(x)+phi(y),其中phi(k)是k的Euler totient函数。

%H Paolo P.Lava,n表,n=1..50的a(n)</a>

%e phi(28)=phi(6)+phi(22)=phi(8)+phi(20)=phi(12)+phi(16)=phi(14)+phi(14)=12,28是具有此性质的两个数的4个分区的最小数:因此a(4)=28;

%eφ(112)=phi(14)+phi(98)=phi(24)+phi(88)=φ(30)+φ(82)=φ。

%p with(numtheory):p:=进程(q)局部a,h,k,n;从1到q do的h

%p代表n从2*h到q do a:=0;对于从1到trunk(n/2)的k,如果phi(n)=phi(k)+phi(n-k),则a:=a+1;fi;od;

%p如果a=h,则打印(n);断裂;fi;od;od;结束:P(10^9);

%t表格[SelectFirst[Range[10+5 n^2],函数[k,使用[{e=EulerPhi@k},

%t计数[Transpose@{Range[k-1,天花板[k/2],-1],地板[k/2]},x_/;总计@EulerPhi@x==e]==n]]],{n,25}](*_Michael De Vlieger_,2016年4月6日,第10版*)

%Y参考A000005、A211224、A271382。

%K nonn,简单

%O 1,1号机组

%A_Paolo P.Lava,2016年4月6日

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

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

上次修改时间:6月2日00:37 EDT 2024。包含373032个序列。(在oeis4上运行。)