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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A201939型 满足x*cosh(x)=2的x>0的十进制展开。 10
1, 1, 5, 0, 5, 8, 4, 9, 6, 7, 4, 1, 8, 6, 6, 3, 9, 4, 9, 5, 3, 4, 9, 3, 3, 7, 3, 3, 6, 1, 3, 7, 8, 8, 1, 9, 5, 7, 6, 6, 8, 3, 7, 4, 9, 4, 8, 4, 4, 2, 4, 2, 3, 4, 1, 1, 8, 3, 3, 9, 2, 5, 1, 8, 0, 8, 8, 3, 2, 2, 5, 4, 6, 1, 7, 6, 4, 1, 1, 7, 2, 8, 0, 1, 3, 6, 7, 5, 4, 4, 1, 4, 5, 2, 4, 6, 9, 9, 5 (列表;常数;图表;参考;;历史;文本;内部格式)
抵消
1、3
评论
对于u和v的许多选择,只有一个x>0满足x*cosh(u*x)=v。相关序列指南,Mathematica程序中包含图形:
u.…v.…x
1.... 1....A069814号
1.... 2....A201939型
1.... 3....A201943型
2.... 1....2014年2月
3.... 1....A201945型
2.... 2....A202283型
假设f(x,u,v)是三个实变量的函数,g(u,v。我们称z=g(u,v)的图为f的隐式曲面。
有关的示例A201939型取f(x,u,v)=x*cosh(u*x)-v,g(u,v。如果存在一个以上的非零解,则必须注意确保得到的函数g(u,v)是单值且连续的。程序2在Mathematica部分绘制了隐式曲面的一部分。
链接
例子
x=1.15058496741866394953493373361378819576。。。
数学
(*项目1:A201939型*)
u=1;v=2;
f[x_]:=x*余弦[u*x];g[x_]:=v
绘图[{f[x],g[x]},{x,0,2},}轴原点->{0,0}}]
r=x/。FindRoot[f[x]==g[x],{x,1.1,1.2},WorkingPrecision->110]
真实数字[r](*A201939型*)
(*程序2:u*cosh(x)=v*的隐式曲面)
f[{x_,u_,v_}]:=x*余弦[u*x]-v;
t=表[{u,v,x/.FindRoot[f[{x,u,v}]==0,{x,0,.2}]},{v,0,20},},[u,1,9}];
ListPlot3D[压扁[t,1]](*表示A201939型*)
交叉参考
囊性纤维变性。A201946型.
关键词
非n,欺骗
作者
克拉克·金伯利2011年12月15日
状态
经核准的

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

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

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