已知部分由x对应y的值如下:
x y
0 823
29 825
223 830
514 835
692 838
1270 845
1910 850
2470 855
2820 860
2950 862
3140 865
3430 870
3720 875
3860 877
4000 880
4270 885如何生成一个函数或用其他办法,使得输入x(0到4270之间)返回y的值(823到885之间)?
x y
0 823
29 825
223 830
514 835
692 838
1270 845
1910 850
2470 855
2820 860
2950 862
3140 865
3430 870
3720 875
3860 877
4000 880
4270 885如何生成一个函数或用其他办法,使得输入x(0到4270之间)返回y的值(823到885之间)?
解决方案 »
- 求delphi如何知道word执行了一次保存
- 如何求得当前天为该年中的第几周,该周中第几天?
- DOA使用问题
- dxDBTreeList1顯示的列是否有修改功能!
- 我想做一个效果,不知道怎么弄? 就是获得鼠标位值的信息。比如 像右键弹出菜单那样的效果,但我项显示的是表单,它姚显示的时候,位置随
- 高手给我看看这段程序为什么执行时非常慢,cpu达到100%
- 简单问题!
- 毕业学什么好?找工作让人头痛!谁帮我推荐一下?
- table控键可以只插入,一条记录的部分字段吗!
- 招聘!熟悉DELPHI,有多层分布式数据库应用程序开发经验,学历不限,专业不限,年龄不限,待遇从优。
- Delphi连接Oracle的问题
- 请给以下DELPHI代码意见
望高手不吝赐教!
x1<x<x2,则y=y2-(x2-x)*(y2-y1)/(x2-x1)
/******************************************************
* 用牛顿插值法依据N个已知数据点即使函数值
* 输入: n--已知数据点的个数N-1
* x--已知数据点第一坐标的N维列向量
* y--已知数据点第二坐标的N维列向量
* xx-插值点第一坐标
* 输出: 函数返回值所求插值点的第二坐标
******************************************************/
double newton(int n,double x[N],double y[N],double xx)
{
double d[N],b;
int i,j; for(i=0;i<=n;i++)
d=y;
for(i=n-1;i>=0;i--) /*求差商*/
for(j=i+1;j<=n;j++)
{
if(fabs(x-x[j])<EPS)
return 0;
d[j]=(d[j-1]-d[j])/(x-x[j]);
}
b=d[n];
for(i=n-1;i>=0;i--)
b=d+(xx-x)*b;
return b;
}