数学建模社区-数学中国

标题: Mathematica可以根据点坐标求解析式吗？具体实现步骤？ [打印本页]

---

作者: qtdfyz    时间: 2013-5-7 23:32
标题: Mathematica可以根据点坐标求解析式吗？具体实现步骤？
如题，可以使用Mathematica根据点坐标求解析式吗？比如根据两点求直线解析式，根据三点求解抛物线解析式？

---

作者: Valentiner    时间: 2013-5-8 12:39
用插值函数InterpolatingPolynomial[data, Table[x^i, {i, 0, m}], x]
$ Z1 o' H. t* U& G- o; Om，为你所需要的最高次数，data微数据列表，当然m的取值与data中数据的个数有关
* I/ l) T$ M; v3 Q- X+ k2 k

---

作者: Valentiner    时间: 2013-5-8 12:41
InterpolatingPolynomial[data, Table[x^i, {i, 0, m}], x]
( W& J; A; u6 b7 ^) `8 @! L0 Ddata为数据列表，m为你所需的最高次数，当然m与你data中数据的个数有关

---

作者: joy81890    时间: 2013-5-23 03:04
用fit函数好了。

---

作者: 谦冲自牧    时间: 2013-6-7 11:27
用函数1+2*e^(-x/3)随机生成1~10个数然后拟合曲线得到原函数
ft=Table[N[1+2*Exp[-x/3]],{x,10}]
{2.43306,2.02683,1.73576,1.52719,1.37775,1.27067,1.19394,1.13897,1.09957,1.07135}
; o; }  W" c4 N2 Q3 T  r% O3 M( EListPlot[ft, PlotRange -> {0, 4}]
可以得到打点图
然后
* [" k/ E0 g& |! \! wfft=Fit[ft,{1,Exp[-x/3]},x]
7 W4 O5 ~( z9 k" _1 b# d2 ]+ ]就可以得到原函数
4 ^8 U3 T, g+ q2 jPlot[fft,{x,0,10},PlotRange->{0,4}]
/ x$ |, N6 @2 i0 T9 s
- v$ d- `& M* x5 j你就可以看到拟合完成的曲线了

---

作者: 谦冲自牧    时间: 2013-6-7 11:32
用一些点拟合一个二次函数

MX@]L{66OGW~O)D(}W9}(FG.jpg (47.59 KB, 下载次数: 118)

2013-6-7 11:31 上传

点击文件名下载附件

---

欢迎光临 数学建模社区-数学中国 (http://www.madio.net/)

Powered by Discuz! X2.5