搜索： a197737-编号：a197737
|
| |
|
|
A200338号
|
| 满足x^2+1=tan（x）的最小x>0的十进制展开式。 |
|
+10
159
|
|
|
|
1, 1, 7, 2, 0, 9, 3, 6, 1, 7, 2, 8, 5, 6, 6, 9, 0, 3, 9, 6, 8, 7, 8, 1, 8, 7, 9, 5, 8, 1, 0, 8, 9, 8, 8, 0, 4, 0, 2, 4, 2, 4, 5, 7, 0, 8, 8, 0, 2, 7, 6, 3, 7, 1, 7, 6, 0, 1, 8, 6, 6, 3, 6, 7, 1, 2, 1, 8, 6, 6, 3, 4, 6, 0, 7, 6, 4, 1, 2, 2, 8, 3, 6, 5, 4, 5, 6, 1, 1, 2, 2, 8, 6, 7, 2, 3, 0, 3, 2
(列表;常数;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,3
|
|
|
评论
|
对于a、b、c的许多选择，只有一个x满足a*x^2+b*x+c=tan（x）和0<x<Pi/2。
Mathematica程序中包含图表的相关序列指南：
a.…b.…c.…x
假设f（x，u，v）是三个实变量的函数，g（u，v）是由f（g（u，v），u，v）=0隐式定义的函数。我们称z=g（u，v）的图为f的隐式曲面。
有关的示例A200338号取f（x，u，v）=x^2+u*x+v-tan（x），g（u，v。如果有多个非零解，必须注意确保得到的函数g（u，v）是单值的和连续的。隐式曲面的一部分由Mathematica部分中的程序2绘制。
|
|
|
链接
|
|
|
|
例子
|
x=1.17209361728566903968781879581089880。。。
|
|
|
数学
|
a=1；b=0；c=1；
f[x_]：=a*x^2+b*x+c；g[x_]：=Tan[x]
绘图[{f[x]，g[x]}，{x，-.1，Pi/2}，}AxesOrigin->{0，0}}]
r=x/。查找根[f[x]==g[x]，{x，1.1，1.2}，工作精度->110]
（*程序2:x^2+u*x+v=tan（x）的隐式曲面*）
f[{x_，u_，v_}]：=x^2+u*x+v-Tan[x]；
t=表[{u，v，x/.FindRoot[f[{x，u，v}]==0，{x，0，1.57}]}，{u，0，5，.1}，}；
|
|
|
黄体脂酮素
|
|
|
|
交叉参考
|
|
|
|
关键字
|
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
|
|
A198414号
|
| 满足x^2=2*sin（x）的x>0的十进制展开式。 |
|
+10
107
|
|
|
|
1, 4, 0, 4, 4, 1, 4, 8, 2, 4, 0, 9, 2, 4, 3, 4, 3, 6, 4, 1, 4, 8, 3, 2, 7, 9, 4, 3, 7, 4, 5, 7, 5, 8, 6, 0, 3, 7, 2, 5, 7, 1, 6, 1, 3, 7, 0, 4, 9, 1, 1, 4, 8, 1, 0, 9, 4, 4, 8, 2, 4, 3, 5, 4, 8, 7, 7, 5, 2, 5, 2, 9, 5, 6, 1, 7, 1, 4, 4, 3, 6, 2, 1, 2, 0, 5, 1, 0, 1, 5, 2, 4, 8, 2, 0, 8, 1, 7, 5
(列表;常数;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,2
|
|
|
评论
|
对于a，b，c的许多选择，有一个唯一的非零数x满足a*x^2+b*x=c*sin（x）。
具体来说，对于a>0以及b和c的许多选择，当且仅当b=c时，曲线y=ax^2+bx和y=c*sin（x）在一个点上相交，在这种情况下，曲线有一条公共切线，y=c*x。如果b<c，曲线在象限1上相交；如果b>c，它们在象限2中相遇。
相关序列指南（Mathematica程序中包含图表）：
a…..b…..c…..x
假设f（x，u，v）是三个实变量的函数，g（u，v）是由f（g（u，v），u，v）=0隐式定义的函数。我们称z=g（u，v）的图为f的隐式曲面。
有关的示例A198414号取f（x，u，v）=x^2+u*x-v*sin（x）和g（u，v。如果有多个非零解，必须注意确保得到的函数g（u，v）是单值的和连续的。隐式曲面的一部分由Mathematica部分中的程序2绘制。
|
|
|
链接
|
|
|
|
例子
|
1.4044148240924343641483279437457586037...
|
|
|
数学
|
a=1；b=0；c=2；
f[x_]：=a*x^2+b*x；g[x_]：=c*正弦[x]
绘图[{f[x]，g[x]}，{x，-1，2}]
r=x/。查找根[f[x]==g[x]，{x，1.4，1.41}，工作精度->110]
（*程序2:x^2+u*x=v*sin（x）*的隐式曲面）
f[{x_，u_，v_}]：=x^2+u*x-v*Sin[x]；
t=表[{u，v，x/.FindRoot[f[{x，u，v}]==0，{x，.01，6}]}，{u，.1，100}，}；
ListPlot3D[展平[t，1]]
|
|
|
交叉参考
|
|
|
|
关键字
|
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
|
|
A198755号
|
| 满足x^2+cos（x）=2的x>0的十进制展开式。 |
|
+10
106
|
|
|
|
1, 3, 2, 5, 6, 2, 2, 5, 1, 8, 1, 4, 7, 5, 3, 6, 6, 2, 3, 4, 8, 3, 2, 2, 9, 0, 2, 9, 3, 8, 7, 9, 8, 7, 4, 4, 3, 3, 0, 4, 5, 4, 6, 7, 2, 5, 6, 5, 7, 6, 6, 4, 9, 5, 2, 6, 2, 7, 4, 0, 1, 8, 5, 3, 2, 0, 0, 8, 9, 5, 0, 6, 1, 6, 5, 9, 3, 0, 2, 4, 6, 5, 0, 3, 4, 1, 1, 0, 9, 7, 5, 9, 7, 7, 5, 7, 5, 6, 7
(列表;常数;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,2
|
|
|
评论
|
对于a、b、c的许多选择，有一个唯一的x>0满足a*x^2+b*cos（x）=c。
Mathematica程序中包含图表的相关序列指南：
a.…b.…c….x
假设f（x，u，v）是三个实变量的函数，g（u，v）是由f（g（u，v），u，v）=0隐式定义的函数。我们称z=g（u，v）的图为f的隐式曲面。
有关的示例A198755号取f（x，u，v）=x^2+u*cos（x）-v和g（u，v。如果有多个非零解，必须注意确保得到的函数g（u，v）是单值的和连续的。隐式曲面的一部分由Mathematica部分中的程序2绘制。
|
|
|
链接
|
|
|
|
例子
|
x=1.32562251814753662348322902938798744330。。。
|
|
|
数学
|
a=1；b=1；c=2；
f[x_]：=a*x^2+b*Cos[x]；g[x_]：=c
绘图[{f[x]，g[x]}，{x，-2，2}，}轴原点->{0，0}}]
r=x/。查找根[f[x]==g[x]，{x，1.32，1.33}，工作精度->110]
（*程序2:x^2+u*cos（x）=v*的隐式曲面）
f[{x_，u_，v_}]：=x^2+u*Cos[x]-v；
t=表[{u，v，x/.FindRoot[f[{x，u，v}]==0，{x，0，3}]}，{u，-5，4}，}；
|
|
|
交叉参考
|
|
|
|
关键字
|
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
|
|
A199597号
|
| 满足x^2+x*cos（x）=sin（x）的x>0的十进制展开式。 |
|
+10
99
|
|
|
|
1、1、8、8、1、8、5、1、3、4、4、5、1、4、3、8、8、0、3、2、1、7、8、1、0、9、7、2、9、0、7、6、5、2、5、9、7、3、8、3、2、4、2、5、6、1、2、8、4、1、4、7、1、9、4、1、8、2、3、9、5、2、8、3、3、4、1、8、6、0、9、1、3，4，2，2，9，6，0，3，4，2，6，1，8，0，9，6，9，1，8，3，4，8，8，4，3，0
(列表;常数;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,3
|
|
|
评论
|
对于a、b、c的许多选择，只有一个x>0满足a*x^2+b*x*cos（x）=c*sin（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的隐式曲面。
有关的示例A199597号取f（x，u，v）=x^2+u*x*cos（x）-v*sin（x）和g（u，v。如果有多个非零解，必须注意确保得到的函数g（u，v）是单值的和连续的。隐式曲面的一部分由Mathematica部分中的程序2绘制。
|
|
|
链接
|
|
|
|
例子
|
1.1881851344514388032178109729076525973...
|
|
|
数学
|
a=1；b=1；c=2；
f[x_]：=a*x^2+b*x*Cos[x]；g[x_]：=c*正弦[x]
绘图[｛f[x]，g[x]｝，｛x，-Pi，Pi｝，｛AxesOrigin->｛0，0｝｝]
r=x/。查找根[f[x]==g[x]，{x，1.18，1.19}，工作精度->110]
（*程序2:impl.surf.x^2+u*x*cos（x）=v*sin（x）*）
f[{x_，u_，v_}]：=x^2+u*x*Cos[x]-v*Sin[x]；
t=表[{u，v，x/.FindRoot[f[{x，u，v}]==0，{x，.5，3}]}，{u，0，2}，}；
|
|
|
交叉参考
|
|
|
|
关键字
|
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
|
|
A198866号
|
| 满足x^2+sin（x）=1的x<0的十进制展开式。 |
|
+10
57
|
|
|
|
1, 4, 0, 9, 6, 2, 4, 0, 0, 4, 0, 0, 2, 5, 9, 6, 2, 4, 9, 2, 3, 5, 5, 9, 3, 9, 7, 0, 5, 8, 9, 4, 9, 3, 5, 4, 7, 1, 2, 3, 5, 4, 8, 3, 5, 1, 0, 7, 8, 9, 0, 1, 5, 1, 5, 1, 0, 1, 6, 6, 8, 3, 0, 0, 9, 9, 1, 8, 3, 6, 0, 1, 6, 7, 3, 1, 8, 1, 4, 5, 2, 5, 1, 6, 8, 7, 4, 8, 9, 2, 1, 4, 3, 2, 5, 9, 0, 7, 9
(列表;常数;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,2
|
|
|
评论
|
对于a、b、c的许多选择，正好有两个数字x具有a*x^2+b*sin（x）=c。
Mathematica程序中包含图表的相关序列指南：
a.…b.…c.…x
假设f（x，u，v）是三个实变量的函数，g（u，v。我们称z=g（u，v）的图为f的隐式曲面。
有关的示例A198866号取f（x，u，v）=x^2+u*sin（x）-v和g（u，v。如果有多个非零解，必须注意确保得到的函数g（u，v）是单值的和连续的。隐式曲面的一部分由Mathematica部分中的程序2绘制。
|
|
|
链接
|
|
|
|
例子
|
负面：-1.40962400400259624923559397058949354。。。
阳性：0.636732650805282010887990383828005。。。
|
|
|
数学
|
a=1；b=1；c=1；
f[x_]：=a*x^2+b*Sin[x]；g[x_]：=c
绘图[{f[x]，g[x]}，{x，-2，2}，}轴原点->{0，0}}]
r=x/。查找根[f[x]==g[x]，{x，-1.41，-1.40}，工作精度->110]
RealDigits[r]（*此序列*）
r=x/。查找根[f[x]==g[x]，{x，.63，.64}，工作精度->110]
（*程序2:x^2+u*sin（x）=v*的隐式曲面）
f[{x_，u_，v_}]：=x^2+u*Sin[x]-v；
t=表[{u，v，x/.FindRoot[f[{x，u，v}]==0，{x，0，1}]}，{u，0，6}，}；
ListPlot3D[展平[t，1]]（*用于此序列*）
|
|
|
黄体脂酮素
|
（PARI）a=1；b=1；c=1；求解（x=-2，0，a*x^2+b*sin（x）-c）\\G.C.格鲁贝尔2019年2月20日
（Sage）a=1；b=1；c=1；（a*x^2+b*sin（x）==c）.find_root（-2，0，x）#G.C.格鲁贝尔2019年2月20日
|
|
|
交叉参考
|
|
|
|
关键字
|
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
|
|
A199429号
|
| 满足x^2+x*sin（x）=cos（x）的x>0的十进制展开式。 |
|
+10
57
|
|
|
|
6, 4, 3, 4, 3, 6, 3, 6, 4, 1, 3, 8, 0, 2, 6, 1, 5, 8, 6, 4, 2, 0, 9, 8, 9, 1, 4, 3, 0, 4, 0, 1, 3, 1, 8, 2, 6, 8, 7, 4, 4, 6, 7, 2, 4, 1, 9, 4, 5, 7, 8, 5, 1, 6, 3, 2, 3, 8, 7, 4, 9, 1, 9, 8, 5, 8, 8, 7, 5, 2, 2, 9, 2, 2, 2, 7, 2, 5, 9, 4, 1, 7, 6, 4, 1, 7, 8, 8, 8, 7, 0, 7, 8, 5, 2, 7, 8, 5, 7
(列表;常数;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
0,1
|
|
|
评论
|
对于a、b、c的许多选择，只有一个x>0满足a*x^2+b*x*sin（x）=c*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的隐式曲面。
有关的示例A199429号取f（x，u，v）=x^2+u*x*sin（x）-v*cos（x）和g（u，v。如果有多个非零解，必须注意确保得到的函数g（u，v）是单值的和连续的。隐式曲面的一部分由Mathematica部分中的程序2绘制。
|
|
|
链接
|
|
|
|
例子
|
x=0.6434363641380261586420989143040131826874。。。
|
|
|
数学
|
a=1；b=1；c=1；
f[x_]：=a*x^2+b*x*Sin[x]；g[x_]：=c*Cos[x]
绘图[{f[x]，g[x]}，{x，-2 Pi，2 Pi}，}轴原点->{0，0}}]
r=x/。查找根[f[x]==g[x]，{x，.64，.65}，工作精度->110]
（*程序2：隐式曲面：x^2+u*x*sin（x）=v*cos（x）*）
f[{x_，u_，v_}]：=x^2+u*x*Sin[x]-v*Cos[x]；
t=表[{u，v，x/.FindRoot[f[{x，u，v}]==0，{x，0，1}]}，{u，0，10}，}；
|
|
|
交叉参考
|
|
|
|
关键字
|
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
|
|
A199170号
|
| x<0的十进制展开满足x^2+x*cos（x）=1。 |
|
+10
54
|
|
|
|
1, 1, 9, 8, 3, 5, 9, 8, 4, 4, 5, 1, 8, 6, 6, 0, 2, 6, 8, 2, 6, 5, 0, 2, 1, 6, 0, 3, 4, 3, 0, 3, 0, 8, 9, 8, 9, 2, 7, 2, 6, 8, 0, 9, 3, 5, 8, 7, 4, 8, 2, 5, 6, 9, 0, 1, 4, 4, 4, 9, 2, 3, 8, 6, 8, 6, 4, 2, 7, 1, 7, 6, 1, 4, 9, 7, 1, 9, 1, 2, 5, 5, 9, 1, 7, 1, 4, 2, 8, 9, 1, 6, 9, 7, 2, 0, 9, 5, 4
(列表;常数;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,3
|
|
|
评论
|
对于a，b，c的许多选择，正好有两个数字x满足a*x^2+b*x*cos（x）=c。
Mathematica程序中包含图表的相关序列指南：
a.…b.…c.…x
假设f（x，u，v）是三个实变量的函数，g（u，v）是由f（g（u，v），u，v）=0隐式定义的函数。我们称z=g（u，v）的图为f的隐式曲面。
有关的示例A199170号取f（x，u，v）=x^2+u*xcos（x）-v和g（u，v。如果有多个非零解，必须注意确保得到的函数g（u，v）是单值的和连续的。隐式曲面的一部分由Mathematica部分中的程序2绘制。
|
|
|
链接
|
|
|
|
例子
|
阴性：-1.19835984451866026826501603603430898927268。。。
阳性：0.6851741338545031878952115038458709591。。。
|
|
|
数学
|
a=1；b=1；c=1；
f[x_]：=a*x^2+b*x*Cos[x]；g[x_]：=c
绘图[{f[x]，g[x]}，{x，-2 Pi，2 Pi}，}轴原点->{0，0}}]
r=x/。查找根[f[x]==g[x]，{x，-1.2，-1.1}，工作精度->110]
r=x/。查找根[f[x]==g[x]，{x，.68，.69}，工作精度->110]
（*程序2:x^2+u*x*cos（x）=v*的隐式曲面）
f[{x_，u_，v_}]：=x^2+u*x*Cos[x]-v；
t=表[{u，v，x/.FindRoot[f[{x，u，v}]==0，{x，0，1}]}，{u，0，
1.9}，{v，u，600}]；
|
|
|
交叉参考
|
|
|
|
关键字
|
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
|
|
A199370型
|
| 满足x^2+x*sin（x）=1的x>0的十进制展开式。 |
|
+10
52
|
|
|
|
7, 2, 2, 5, 8, 7, 5, 4, 9, 9, 2, 2, 5, 2, 4, 7, 6, 8, 3, 5, 5, 9, 3, 2, 8, 7, 2, 8, 7, 7, 1, 9, 6, 7, 5, 5, 1, 5, 9, 6, 4, 5, 9, 2, 1, 1, 4, 3, 9, 4, 2, 6, 9, 8, 0, 7, 7, 6, 5, 1, 4, 7, 6, 0, 2, 5, 9, 0, 9, 4, 2, 5, 0, 7, 3, 1, 6, 0, 1, 8, 3, 0, 3, 4, 3, 5, 6, 2, 9, 4, 1, 8, 7, 2, 7, 9, 8, 3, 3
(列表;常数;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
0,1
|
|
|
评论
|
对于a，b，c的许多选择，只有一个x>0满足a*x^2+b*x*sin（x）=c。
Mathematica程序中包含图表的相关序列指南：
a.…b.…c.…x
假设f（x，u，v）是三个实变量的函数，g（u，v）是由f（g（u，v），u，v）=0隐式定义的函数。我们称z=g（u，v）的图为f的隐式曲面。
有关的示例A199370型取f（x，u，v）=x^2+u*x*sin（x）-v和g（u，v。如果有多个非零解，必须注意确保得到的函数g（u，v）是单值的和连续的。隐式曲面的一部分由Mathematica部分中的程序2绘制。
|
|
|
链接
|
|
|
|
例子
|
x=0.722587549922524768355932872877196755159。。。
|
|
|
数学
|
a=1；b=1；c=1；
f[x_]：=a*x^2+b*x*Sin[x]；g[x_]：=c
绘图[｛f[x]，g[x]｝，｛x，-1，Pi｝，｛AxesOrigin->｛0，0｝｝]
r=x/。查找根[f[x]==g[x]，{x，.72，.73}，工作精度->110]
（*程序2:x^2+u*x*sin（x）=v*的隐式曲面）
f[{x_，u_，v_}]：=x^2+u*x*Sin[x]-v；
t=表[{u，v，x/.FindRoot[f[{x，u，v}]==0，{x，0，1}]}，{u，0，2.9}，}，[v，u，600}]；
|
|
|
交叉参考
|
|
|
|
关键字
|
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
|
|
A198361号
|
| 最小x的十进制展开式具有4*x^2+3x=cos（x）。 |
|
+10
4
|
|
|
|
9, 1, 6, 1, 5, 1, 0, 6, 1, 0, 9, 6, 8, 3, 5, 7, 7, 0, 0, 0, 1, 3, 5, 0, 7, 2, 8, 0, 3, 9, 4, 6, 3, 9, 1, 8, 9, 1, 2, 6, 5, 1, 0, 6, 8, 0, 9, 3, 7, 1, 6, 1, 7, 1, 8, 8, 4, 2, 5, 1, 7, 8, 5, 3, 2, 1, 3, 7, 6, 0, 0, 8, 0, 0, 5, 1, 4, 4, 9, 3, 8, 7, 1, 5, 7, 8, 9, 2, 0, 1, 9, 0, 1, 3, 3, 8, 3, 9, 8
(列表;常数;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
0,1
|
|
|
评论
|
请参见A197737号有关相关序列的指南。Mathematica程序包含一个图形。
|
|
|
链接
|
|
|
|
例子
|
最小x:-0.9615106109683577000135072803946391。。。
最大x：0.2440453226291355914668282939448079493。。。
|
|
|
数学
|
a=4；b=3；c=1；
f[x_]：=a*x^2+b*x；g[x_]：=c*Cos[x]
绘图[{f[x]，g[x]}，{x，-1，1}]
r1=x/。查找根[f[x]==g[x]，{x，-1，-.9}，工作精度->110]
r2=x/。查找根[f[x]==g[x]，{x，.24，.25}，工作精度->110]
|
|
|
交叉参考
|
|
|
|
关键字
|
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
| |
|
|
|
5, 5, 0, 0, 0, 9, 3, 4, 9, 9, 2, 7, 2, 6, 1, 5, 6, 6, 6, 6, 4, 9, 5, 3, 6, 1, 9, 4, 7, 1, 7, 2, 9, 2, 6, 1, 1, 6, 7, 2, 8, 5, 0, 9, 2, 4, 3, 5, 7, 9, 3, 7, 8, 4, 5, 7, 0, 9, 3, 9, 2, 2, 0, 4, 2, 5, 2, 6, 0, 4, 4, 5, 2, 5, 2, 4, 4, 5, 3, 3, 2, 8, 5, 3, 9, 2, 4, 4, 5, 4, 3, 1, 6, 4, 9, 6, 4, 4, 7
(列表;常数;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
0,1
|
|
|
评论
|
|
|
|
链接
|
|
|
|
例子
|
负数：-1.25115183522076481159287006878816185994。。。
阳性：0.550009349927261566649361947172926116。。。
|
|
|
数学
|
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]
|
|
|
交叉参考
|
|
|
|
关键字
|
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
搜索在0.032秒内完成
|
