搜索: a198221-编号:a198221
|
|
A197737号
|
| x<0的十进制展开式具有x^2+x=cos(x)。 |
|
+10 144
|
|
|
1、2、5、1、1、5、1、8、3、5、2、0、7、6、4、8、1、1、5、9、2、8、7、0、0、6、8、8、1、6、1、8、5、9、4、5、3、5、6、1、0、8、5、8、8、9、6、8、3、6、2、0、1、7、8、2、8、1、2、1、0、3、6、0、1、9、1、2、3,8,2,1,0,9,1,0,4,1,1,2,7,3,5,7,6,5,9,4,8,6,8,4,2
(列表;常数;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,2
|
|
评论
|
对于a、b、c的许多选择,正好有两个数字x具有a*x^2+b*x=cos(x)。
Mathematica程序中包含图表的相关序列指南:
a.…b.…c.…x
假设f(x,u,v)是三个实变量的函数,g(u,v)是由f(g(u,v),u,v)=0隐式定义的函数。我们称z=g(u,v)的图为f的隐式曲面。
有关的示例A197737号取f(x,u,v)=x^2+u*x-v*cos(x),g(u,v。如果有多个非零解,必须注意确保得到的函数g(u,v)是单值的和连续的。隐式曲面的一部分由Mathematica部分中的程序2绘制。
|
|
链接
|
|
|
例子
|
阴性:-1.2115183522076481159287006878816185994。。。
阳性:0.550009349927261566695361947172926116。。。
|
|
数学
|
a=1;b=1;c=1;
f[x_]:=a*x^2+b*x;g[x_]:=c*Cos[x]
绘图[{f[x],g[x]},{x,-2,1}]
r1=x/。查找根[f[x]==g[x],{x,-1.26,-1.25},工作精度->110]
r1=x/。查找根[f[x]==g[x],{x,.55,.551},工作精度->110]
(*程序2:x^2+u*x=v*cos(x)*的隐式曲面)
f[{x_,u_,v_}]:=x^2+u*x-v*Cos[x];
t=表[{u,v,x/.FindRoot[f[{x,u,v}]==0,{x,0,1}]},{u,0,20};
|
|
黄体脂酮素
|
(PARI)A197737号_vec(N=150)={localprec(N+10);数字(解(x=-1.5,-1,x^2+x-cos(x))\.1^N)}\\M.F.哈斯勒2021年8月5日
|
|
交叉参考
|
|
|
关键词
|
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|
|
A198220型
|
| 最小x的十进制展开式,具有3*x^2+x=4*cos(x)。 |
|
+10 3
|
|
|
1, 0, 1, 9, 0, 9, 2, 5, 0, 2, 8, 1, 5, 4, 1, 8, 0, 6, 7, 9, 8, 4, 1, 7, 9, 1, 2, 6, 0, 8, 9, 8, 5, 9, 0, 3, 6, 9, 6, 2, 2, 3, 0, 4, 4, 2, 0, 6, 4, 4, 7, 2, 2, 9, 4, 8, 2, 0, 6, 4, 1, 7, 4, 3, 6, 4, 6, 3, 9, 2, 2, 2, 2, 2, 8, 3, 2, 4, 7, 7, 8, 9, 1, 6, 3, 7, 3, 7, 3, 9, 3, 4, 6, 3, 8, 0, 8, 7, 1
(列表;常数;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,4个
|
|
评论
|
请参见A197737号有关相关序列的指南。Mathematica程序包含一个图形。
|
|
链接
|
|
|
例子
|
最小x:-1.0190925028154180679841791260898590369。。。
最大x:0.807678482427210650918057213078375663。。。
|
|
数学
|
a=3;b=1;c=4;
f[x_]:=a*x^2+b*x;g[x_]:=c*Cos[x]
绘图[{f[x],g[x]},{x,-2,1}]
r1=x/。查找根[f[x]==g[x],{x,-1.1,-1},工作精度->110]
r2=x/。查找根[f[x]==g[x],{x,.8,.9},工作精度->110]
|
|
交叉参考
|
|
|
关键词
|
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
搜索在0.008秒内完成
|