平均函數的標準誤差

Question

如何計算MS Access中平均值的標準誤差？以下是我心目中：

SELECT 
Avg(qryAvgGROP.PctGROP_MCAR) AS AvgAvgGROP_MCAR 
StandardError(qryAvgGROP.PctGROP_MCAR) AS SemAvgGROP_MCAR 
FROM qryAvgGROP; 

在這個例子中，qryAvgGROP返回一組平均值，這是再次平均在上面的代碼中。因此，我需要平均值的標準誤差，而不是標準偏差，所以我不能使用StDev（）函數。

Answer 1

好的。那麼這裏有一個VBA函數來計算標準偏差。正如你意識到方程的不同，也許你可以編輯這個來適應你的需求。如果你不知道如何在訪問中使用你自己的VBA功能，那裏有很多資源，或者我很樂意提供幫助。

Function StdDev(k As Long, Arr() As Single) 
Dim i As Integer 
Dim avg As Single, SumSq As Single 

avg = Mean(k, Arr) 
For i = 1 To k 
     SumSq = SumSq + (Arr(i) - avg)^2 
Next i 

StdDev = Sqr(SumSq/(k - 1)) 

端功能