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

 

标志


提示
(问候来自整数序列在线百科全书!)
A092669号 a(n)=埃及分数的个数1=1/x_1+。。。+1/x_k(对于任何k),0<x_1<…<x_k=n。 11
1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,3,0,0,5,0,5,0,11,0,0,0,0,19,0,0,0,0,73,0,86,0,0,0,0,0,163,0,203,286,0,0,0,0,1399,0,1399,0,0,27223,0,27223,0,0,4870,0,0,0,0,4870,0,0,8789,8789,0,13937,13937,1397 987,42081,0,0,0,0,8557577,0,0,0,0,159982,159982,11782 0,0,818640,0 (列表;图表;参考文献;;历史;文本;内部格式)
抵消

1,15个

评论

对于给定的n,Mathematica程序使用回溯来计算解。可以通过取消对print语句的注释来打印解决方案。对于大n来说这是非常耗时的。A0921号给出得到a(n)>0的n。-T、 D.不2004年3月26日

链接

铃木俊美,n=1..610的n,a(n)表

Harry Ruderman和Paul Erdős,问题E2427:埃及分数单位划分的界限,艾默尔。数学。月刊,第81卷,第7期(1974年),780-782。

与埃及分数相关的序列的索引项

公式

a(n)=A092670号(n)-A092670号(n-1)。

例子

a(6)=1,因为只有分数1=1/2+1/3+1/6。

数学

n=20;try2[lev_2;,s_x]:=模块[{nmim,nmax,si,i},AppendTo[soln,0];如果[lev==1,nmin=2,nmin=1+soln[-2]]];nmax=n-1;Do[如果[i<n/2 | |!PrimeQ[i],si=s+1/i;如果[si==1,soln[[-1]]=i;(*Print[soln];*)cnt++];If[si<1,soln[[-1]]=i;try2[lev+1,si]],{i,nmin,nmax}];soln=Drop[soln,-1]];soln={n};cnt=0;try2[1,1/n];cnt(*T、 D.不2004年3月26日*)

交叉引用

囊性纤维变性。A092666号,A092667号,A092670号,A092671号,A092672号,A006585号.

上下文顺序:邮编:A127775 A210953号 A254280*A255986年 114A000 A115013型

相邻序列:A092666号 A092667号 A092668号*A092670号 A092671号 A092672号

关键字

作者

马克斯·阿列克谢耶夫2004年3月2日

扩展

更多条款来自T、 D.不2004年3月26日

更多术语来自T.Suzuki(AT)scio.co.jp,2006年11月24日

状态

经核准的

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

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

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