# TREND 方法
TREND(known_y's,new_x's,const)
返回一条线性回归拟合线的值。即找到适合已知数组 known_y's 的直线（用最小二乘法），并返回指定数组 new_x's 在直线上对应的 y 值。 该函数返回趋势预测最近一个数值,其他后续预测值将在new_x's给予返回.有关对数据进行直线拟合的详细信息，请参阅 LINEST 函数。例如我们有一组数组B值为{133890,135000,135790,137300,138130,139100,139900,141120,141890,143230,144000,145290}, 执行TREND(B,D,1);后将返回 133953.3333;并将未来几个周期的预测值存放于数组D中。
参数
| 参数 | 说明 |
|---|---|
| Known_y's | 是关系表达式 y = mx + b 中已知的 y 值集合 |
| New_x's | 返回计算完毕最近几个趋势预测值数组,该参数必须为Array对象数组,此时系统将重置该数组大小并填充计算完毕后的数据 |
| Const | 为一逻辑值，用于指定是否将常量 b 强制设为 0 .如果 const 为 1，b 将按正常计算。如果 const 为 0，b 将被设为 0（零），m 将被调整以使 y = mx。 |
示例
Sub Test()
'创建一个变量
Dim b
'创建Array外部对象，将对象实例置变量d中
Set b = CreateObject("Stock.Array")
'创建完Array对象后往其内部插入两个数据
b.AddBack(133890)
b.AddBack(135000)
b.AddBack(135790)
b.AddBack(137300)
b.AddBack(138130)
b.AddBack(139100)
b.AddBack(139900)
b.AddBack(141120)
b.AddBack(141890)
b.AddBack(143230)
b.AddBack(144000)
b.AddBack(145290)
'创建数组d用于存放结果数据
Dim d
Set d = CreateObject("Stock.Array")
'显示统计值
application.MsgOut fun.TREND(b,d,1)
'显示统计完结果序列
for i = 0 to d.Count-1
Application.MsgOut d.Getat(i)
next
set b = nothing
set d = nothing
End Sub
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
应用于