那位大哥知道7点5次平滑的方法和公式?(50分)

  • 主题发起人 主题发起人 nkdfz
  • 开始时间 开始时间
N

nkdfz

Unregistered / Unconfirmed
GUEST, unregistred user!
有没有代码可以借鉴:)。谢谢大家!
 
自己顶一下
 
我不知道你的应用,你测试过teechat的曲线平滑功能吗?说不定可以满足你的要求 。
 
谢谢。我已经搞定了。
提供给大家计算公式
y_3:=(923*s1.YValue[i-3]+6*s1.YValue[i-2]-15*s1.YValue[i-1]+20*s1.YValue-15*s1.YValue[i+1]+6*s1.YValue[i+2]-s1.YValue[i+3])/924;
y_2:=(6*s1.YValue[i-3]+888*s1.YValue[i-2]+90*s1.YValue[i-1]-120*s1.YValue+90*s1.YValue[i+1]-36*s1.YValue[i+2]+6*s1.YValue[i+3])/924;
y_1:=(-15*s1.YValue[i-3]+90*s1.YValue[i-2]+699*s1.YValue[i-1]+300*s1.YValue-255*s1.YValue[i+1]+90*s1.YValue[i+2]-15*s1.YValue[i+3])/924;
y3:=(-1*s1.YValue[i-3]+6*s1.YValue[i-2]-15*s1.YValue[i-1]+20*s1.YValue-15*s1.YValue[i+1]+6*s1.YValue[i+2]+923*s1.YValue[i+3])/924;
y2:=(6*s1.YValue[i-3]-36*s1.YValue[i-2]+90*s1.YValue[i-1]-120*s1.YValue+90*s1.YValue[i+1]+888*s1.YValue[i+2]+6*s1.YValue[i+3])/924;
y1:=(-15*s1.YValue[i-3]+90*s1.YValue[i-2]-225*s1.YValue[i-1]+300*s1.YValue+699*s1.YValue[i+1]+90*s1.YValue[i+2]-15*s1.YValue[i+3])/924;
y0:= (20*s1.YValue[i-3]-120*s1.YValue[i-2]+300*s1.YValue[i-1]+524*s1.YValue+300*s1.YValue[i+1]-120*s1.YValue[i+2]+20*s1.YValue[i+3])/924;
 
恭喜!
找本算法的书上面都有,但是大部分程序员用不到,还有什么傅立叶变换,曲线拟合等等,只有搞一些研究,特殊运用的才会用到。
 

Similar threads

回复
0
查看
832
不得闲
D
回复
0
查看
934
DelphiTeacher的专栏
D
D
回复
0
查看
727
DelphiTeacher的专栏
D
D
回复
0
查看
688
DelphiTeacher的专栏
D
后退
顶部