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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A368619型 a(n)是具有h和k互质回文正整数的分数h/k的n位分母,在该分数下abs(h/k-e)是最小的。 5

%I#27 2024年1月12日22:21:47

%S 1,4323939143416171616212619192919324707423509838905,

%电话:3054666450359359795395332973737923391647454619

%N a(N)是具有h和k互质回文正整数的分数h/k的N位分母,其中abs(h/k-e)最小。

%C a(3)=323对应于A368617的分母。

%H David A.Corneth,PARI计划</a>

%H<a href=“/index/Ea”>与数字e相关的序列的索引条目</a>

%e n分数近似值

%e--------------------------------------

%e 1 3/1 3

%e 2 11/4 2.75

%e 3 878/323 2.7182662538699。。。

%e 4 2552/939 2.7177848775292。。。

%e 5 38983/14341 2.7182902168607。。。

%e 6 167761/6716 2.7182740294251。。。

%e 7 4407044/1621261 2.7182816338640。。。

%e 8 24988942/9192919 2.7182815382143。。。

%e 9 882646288/324707423 2.7182818299783。。。

%e。。。

%ta[1]=1;a[n_]:=模[{minim=Infinity},h=Select[Range[10^(n-1),10^n-1],回文Q];lh=长度【h】;对于[i=1,i<=lh,i++,k=Select[Range[Floor[Part[h,i]/E],Ceiling[Part[Ch,i]/E],PalindromeQ];lk=长度[k];对于[j=1,j<=lk,j++,如果[(dist=Abs[Part[h,i]/Part[k,j]-E])<minim&&GCD[Part[h,i],Part[k,j]]==1,minim=dist;kmin=零件[k,j]]];kmin];数组[a,9]

%o(PARI)\\请参阅链接中的PARI程序

%Y参见A001113、A002113、A070252、A368617、A3686818(分子)、A368658。

%Y参考A007676、A007677。

%Y参见A364845(与Pi类似)、A368620、A368681。

%K non、基础、压裂等

%O 1、2

%A _Stefano Spezia,2024年1月1日

%E a(10)-a(14),摘自David a.Corneth,2024年1月3日

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

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

上次修改时间:美国东部夏令时2024年5月21日05:34。包含372728个序列。(在oeis4上运行。)