搜索： a197138-编号：a197138
|
| |
|
|
A197032号
|
| 从正x轴通过（2,1）到直线y=x的最短线段的x截距的十进制展开。 |
|
+10
26
|
|
|
|
2, 3, 5, 3, 2, 0, 9, 9, 6, 4, 1, 9, 9, 3, 2, 4, 4, 2, 9, 4, 8, 3, 1, 0, 1, 3, 3, 2, 5, 7, 7, 3, 8, 8, 4, 5, 7, 2, 7, 0, 7, 0, 5, 6, 1, 3, 8, 5, 6, 8, 4, 6, 8, 2, 6, 8, 0, 6, 6, 9, 3, 0, 4, 2, 6, 5, 1, 5, 1, 8, 9, 7, 2, 3, 2, 2, 0, 9, 2, 0, 8, 5, 9, 1, 6, 5, 8, 0, 3
(列表;常数;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,1
|
|
|
评论
|
从正x轴到（h，k）到y线的Philo线=mx：
m…h…k…x截距。。。。。距离
|
|
|
链接
|
|
|
|
公式
|
x=2+tan phi，其中1+2 tan phi=1/（sin phi+cos phi），其中x=1+A357469飞机=x^3-4*x^2+6*x-5的唯一实根-M.F.哈斯勒2022年11月8日
|
|
|
示例
|
x轴上的端点：（2.35321…，0）
y上的端点=x：（1.73898，1.73898）
|
|
|
MAPLE公司
|
数字：=140；
x^3-4*x^2+6*x-5；
|
|
|
数学
|
f[t]：=（t-k*t/（k+m*t-m*h））；
g[t]：=D[f[t]，t]；系数[g[t]]
p[t_]：=h^2 k+k^3-h^3 m-h k^2 m-3 h k t+3 h ^2 m t+2 k t^2-3 h m t^2+m t^3（*p[t]的根使f*最小化）
m=1；h=2；k=1；（*m=斜率；（h，k）=点*）
t=t1/。查找根[p[t1]==0，{t1，1，2}，工作精度->100]
{N[t]，0}（*最小段的下端点[Philo线]*）
{N[k*t/（k+m*t-m*h）]，
N[m*k*t/（k+m*t-m*h）]}（*上端点*）
d=N[Sqrt[f[t]]，100]
显示[绘图[{k*（x-t）/（h-t），m*x}，{x，0，2.5}]，
等高线图[（x-h）^2+（y-k）^2==.003，{x，0，3}，{y，0，3}]，绘图范围->{0，2}，纵横比->自动]
|
|
|
黄体脂酮素
|
（PARI）求解（x=2，3，x^3-4*x^2+6*x-5）
|
|
|
交叉参考
|
|
|
|
关键词
|
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
|
|
A197139号
|
| 从x轴到（3,2）到y=x线的最短距离的十进制展开式。 |
|
+10
三
|
|
|
|
2, 8, 8, 6, 1, 1, 7, 1, 0, 5, 8, 9, 8, 0, 0, 1, 2, 9, 1, 5, 3, 6, 7, 2, 6, 5, 3, 2, 0, 0, 9, 5, 1, 1, 4, 1, 4, 5, 1, 7, 1, 7, 7, 6, 1, 7, 4, 7, 7, 3, 9, 4, 8, 5, 3, 3, 8, 8, 0, 7, 7, 5, 4, 2, 9, 4, 9, 9, 1, 5, 0, 7, 4, 1, 3, 0, 8, 4, 2, 4, 6, 6, 2, 4, 9, 4, 9, 2, 7, 6, 4, 3, 9, 9, 0, 1, 8, 3, 2
(列表;常数;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,1
|
|
|
评论
|
任何菲罗线都可以用圆和双曲线的交点来构造。在这种情况下，菲罗线穿过圆（x-3/2）^2+（y-1）^2=13/4和双曲线x*y-y^2=2相交的两点。圆的直径为OP段，其中O（0,0）是原点，P是点（3,2）。双曲线的渐近线是x轴和y=x线。点P是圆和双曲线相交的两点之一-劳尔·普里萨卡里奥2024年4月6日
|
|
|
链接
|
|
|
|
示例
|
菲罗线长度：2.8861171058980012915367。。。
第y行上的端点=x：（2.80376，2.80376）
|
|
|
数学
|
f[t]：=（t-k*t/（k+m*t-m*h））；
g[t]：=D[f[t]，t]；系数[g[t]]
p[t]：=h^2 k+k^3-h^3 m-h k^2 m-3 h k t+3 h ^2 m t+2 k t^2-3 h m t^2+m t^3
m=1；h=3；k=2；（*斜率m；点（h，k）*）
t=t1/。查找根[p[t1]==0，{t1，1，2}，工作精度->100]
{N[t]，0}（*x轴上的端点*）
{N[k*t/（k+m*t-m*h）]，
N[m*k*t/（k+m*t-m*h）]}（*线y=x*上的端点）
d=N[Sqrt[f[t]]，100]
RealDigits[d]（*此序列*）
显示[绘图[{k*（x-t）/（h-t），m*x}，{x，0，4}]，
等高线图[（x-h）^2+（y-k）^2==0.003，{x，0，4}，{y，0，3}]，
PlotRange->｛0，3｝，AspectRatio->自动]
|
|
|
交叉参考
|
|
|
|
关键词
|
|
|
|
作者
|
|
|
|
扩展
|
删除的最后一个数字（代表被截断，不向上取整）R.J.马塔尔2022年11月8日
|
|
|
状态
|
经核准的
|
| |
|
搜索在0.006秒内完成
|
