A332528-OEIS公司

A332528型

正割函数最大曲率的十进制展开式。

1, 1, 1, 5, 3, 9, 8, 6, 1, 6, 3, 6, 7, 0, 8, 4, 7, 8, 8, 5, 2, 3, 6, 7, 2, 0, 2, 2, 8, 1, 3, 2, 6, 6, 5, 7, 6, 5, 4, 7, 5, 1, 2, 0, 8, 1, 8, 4, 5, 3, 1, 7, 7, 3, 7, 4, 0, 4, 4, 4, 1, 0, 3, 3, 5, 8, 5, 6, 3, 4, 6, 7, 6, 8, 6, 4, 7, 3, 9, 2, 1, 7, 4, 3, 2, 3

(列表;常数;图表;参考;听;历史;文本;内部格式)

抵消

0,4

y=sec x的图的最大曲率出现在每个分支上的两点（x，y）处。其中一个点的y>0。设T为分支通过（0,1）并位于第一象限。最大曲率K出现在点（u，v）处：

u=0.469952511643664772466732023628843853062603014858623133147。。。

v=1.121592022152314185447110000884194699579672726085862403985。。。

K=1.11539861636708478852367202281326657654751208184531773740。。。

（u，v）处的密切圈有

中心=（x，y）=（0.02618081309772817465，，，1.900598757881329358432040976889617…）。

半径=1/K=0.8965404702195664498448951256628404091376257661443。。。

最大曲率：K=1.11539861636708478852367202281326657654751208184531773740。。。

链接

n，a（n）的表，n=0..85。

数学

最大C=ArcCos[平方[（2*（2-平方[31]*Cos[（Pi+ArcTan[（9*Sqrt[302]）/73]））/3]]；

中心最大C={（-3*x+x*Cos[2*x]+Sin[2*x]+2*Tan[x]^3）/（-3+

Cos[2*x]），-（（Cos[x]*Cos[2x]）/（-3+Cos[2**x]））+（3*秒[x]）/

2} /.x->最大C；

rMin=（平方[（7+余弦[4 x]）^3]秒[x]^3）/（平方[2]8（3-余弦[2 x]））/。x->最大C；

显示[绘图[秒[x]，{x，0-3/2，2}]，

图形[{PointSize[Large]，红色，Point[centerMaxC]，

点[{maxC，秒[maxC]}]，圆[centerMaxC，rMin]，

行[{centerMaxC，{maxC，秒[maxC]}}]，纵横比->自动，

绘图范围->{0，2}]

x=ArcCos[平方[（2*（2-平方[31]*Cos[（Pi+ArcTan[（9*Sqrt[302]）/73]）/3]））/

3]];（*最大曲率发生在（x，sec x）*）

{N[x，150]，N[秒[x]，150]}

｛cx，cy｝＝｛（-3*x+x*Cos[2*x]+Sin[2*x]+2*Tan[x]^3）/（-3+Cos[2*x]），-（（Cos[x]*Cos[2*x]）/（-3+Cos[2*x]））+（3*Sec[x]）/2｝；（*接触圆中心*）

{N[cx，150]，N[cy，150]}

r=N[Sqrt[（x-cx）^2+（Sec[x]-cy）^2]，150]（*曲率半径*）

1/r（*曲率*）

kr=实际数字[1/r][[1]

(*彼得·J·C·摩西2020年5月7日*）

交叉参考

囊性纤维变性。A332527型.

上下文中的序列：A224511型 A201938型 A201410型*A019955号 A296345型 A317907型

相邻序列：A332525型 A332526型 A332527型*A332529型 A332530型 A332531型

关键词

非n,欺骗

作者

克拉克·金伯利2020年6月21日

状态

经核准的