搜索: a201931-编号:a201931
|
|
|
|
1, 3, 1, 9, 0, 7, 3, 6, 7, 6, 8, 5, 7, 3, 6, 5, 3, 5, 4, 4, 1, 7, 8, 9, 9, 1, 0, 9, 5, 2, 0, 8, 4, 8, 4, 6, 4, 4, 2, 1, 9, 6, 6, 7, 8, 0, 8, 2, 5, 4, 9, 7, 6, 6, 9, 2, 5, 6, 0, 8, 9, 0, 0, 4, 9, 0, 5, 1, 2, 7, 0, 7, 6, 3, 4, 6, 1, 0, 7, 3, 1, 6, 7, 2, 5, 1, 0, 4, 0, 6, 3, 8, 4, 4, 9, 4, 0, 2, 7
(列表;常数;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1、2
|
|
评论
|
对于a、b、c的某些选择,有一个唯一的x值满足a*x^2+b*x+c=e^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的隐式曲面。
有关的示例A201741号取f(x,u,v)=u*x^2+v-e^x,g(u,v。如果有多个非零解,必须注意确保得到的函数g(u,v)是单值的和连续的。隐式曲面的一部分由Mathematica部分中的程序2绘制。
|
|
链接
|
|
|
例子
|
x=1.31907367685736535441789910952084846442196。。。
|
|
数学
|
a=1;b=0;c=2;
f[x_]:=a*x^2+b*x+c;g[x_]:=E^x
绘图[{f[x],g[x]},{x,-3,3},}轴原点->{0,0}}]
r=x/。查找根[f[x]==g[x],{x,1.2,1.3},工作精度->110]
(*程序2:u*x^2+v=E^x*的隐式曲面)
f[{x_,u_,v_}]:=u*x^2+v-E^x;
t=表[{u,v,x/.FindRoot[f[{x,u,v}]==0,{x,1,5}]},
{v,1,3},{u,0,5}];
|
|
交叉参考
|
|
|
关键词
|
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|
|
A201932型
|
| 满足x^2+5x+1=e^x的最大x的十进制展开式。 |
|
+10 三
|
|
|
3, 3, 7, 7, 3, 6, 1, 4, 8, 4, 1, 9, 7, 4, 0, 0, 5, 7, 9, 2, 5, 5, 0, 2, 5, 0, 5, 8, 8, 8, 9, 2, 1, 0, 6, 1, 4, 3, 9, 2, 6, 1, 0, 8, 0, 3, 0, 3, 1, 5, 9, 4, 9, 4, 8, 2, 5, 0, 4, 0, 2, 2, 1, 0, 4, 2, 4, 4, 1, 7, 7, 6, 0, 9, 0, 2, 6, 1, 0, 7, 7, 4, 6, 8, 2, 9, 4, 9, 2, 4, 0, 2, 5, 7, 2, 0, 2, 7, 5
(列表;常数;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
评论
|
请参见A201741号有关相关序列的指南。Mathematica程序包含一个图形。
|
|
链接
|
|
|
例子
|
最小值:-4.79309545512749358956562110850420。。。
最大值:3.377361484197400579255025058889。。。
|
|
数学
|
a=1;b=5;c=1;
f[x_]:=a*x^2+b*x+c;g[x_]:=E^x
绘图[{f[x],g[x]},{x,-5,3.5},{AxesOrigin->{0,0}}]
r=x/。查找根[f[x]==g[x],{x,-4.8,-4.7},工作精度->110]
r=x/。查找根[f[x]==g[x],{x,3.3,3.4},工作精度->110]
|
|
交叉参考
|
|
|
关键词
|
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
搜索在0.008秒内完成
|