|
| |
|
| A224269号 |
| 想想西奥多罗斯的螺旋(A072895号). 这个序列给出了k个连续三角形的数量，比之前的k个三角形更接近360度。 |
|
5
|
|
|
|
17, 53, 185, 396, 4926, 9086, 20291, 28083, 440835, 579644, 1819320, 3032895, 8305458, 15159436, 29824343, 46104922, 88019569, 89143145, 94929121, 107958869, 227428224, 402409536, 527154160
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,1
|
|
|
评论
|
这些条目对应于1、2、4、6、22、30、45、53、211、242、429、554、917、1239、1738、2161、2986、3005、3101、3307、4800、6385、7308、…、。。。，绕轴旋转。在中使用公式A072895号检查条目。
搜索限制：围绕轴旋转10000圈。
|
|
|
链接
|
|
|
|
例子
|
a（1）=17，因为前16个直角三角形产生351.15042°（原始轴之前8.84958°），前17个直角三角形生成364.78344°。17个直角三角形位于原始轴4.78344°范围内。
a（2）=53，因为前54个直角三角形产生727.48834°，前53个直角三角形形成719.73897°。这比16更接近原始轴，并且在0.2610252°范围内。
a（3）#109或110，因为前109个直角三角形产生1079.12463°，前110个直角三角形形成1084.57110°。两个角度与原始轴（1080°）的距离均小于53。因此，绕中心的第三圈距离原始轴的距离不超过两圈。
a（3）=185，因为前186个直角三角形产生1444.08227°（原始轴后4.08227），前185个直角三角产生1439.88864°。这比53更接近原始轴，并且在0.11136°范围内。
|
|
|
数学
|
lmt=无穷大；lst={}；k=n=1；s=0；而[n<1001，而[s<2Pi*n，s=n[s+ArcTan[1/Sqrt@k]，32]；k++]；a=s-2Pi*n；b=2Pi*n-（s-ArcTan[1/Sqrt[k-1]]）；如果[Min[a，b]<lmt，lmt=Min[a，b]；如果[a<b，AppendTo[lst，{n，k-1}]；打印[{n，k-1}]，附加到[lst，{n，k-2}]；打印[{n，k-2}]]；n++]；最后@换位@lst
k=最小距离=1；lst={}；K=-2.157782996659446220929142786829577335；num[n_]：=模[{a=-（K/2）+n Pi，b}，b=a^2-1/6；如果[Floor[b]==Floor[b+1/（144 a^2）]，Floor[b]，Undefined]]；当[k<40000000时，n=num[k]；如果[！NumberQ[n]，打印[k，“停止”]；中断[]]；a=2Pi-Mod[K+2平方[n]+1/（6平方[n]），2Pi]；b=型号[K+2平方[n+1]+1/（6平方[n+1]），2Pi]；如果[a<minDist&&a<b，则附加到[lst，n-1]；最小距离=a；]；
如果[b<minDist&&b<a，则追加到[lst，n]；最小距离=b；]；k++]；第一次(*赫伯特·科西姆巴2013年7月18日*）
|
|
|
交叉参考
|
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
