作者：乔山办公网日期：
返回目录：excel表格制作
EXCEL函数GAMMADIST返回伽e799bee5baa6e58685e5aeb9336玛分布。可以使用此函数来研究具有偏态分布的变量。伽玛分布通常用于排队分析。语法GAMMADIST(x,alpha,beta,cumulative)X为用来计算伽玛分布的数值。Alpha分布参数。Beta分布参数。如果beta=1，函数GAMMADIST返回标准伽玛分布。Cumulative为一逻辑值，决定函数的形式。如果cumulative为TRUE，函数GAMMADIST返回累积分布函数；如果为FALSE，则返回概率密度函数。说明如果x、alpha或beta为非数值型，函数GAMMADIST返回错误值#VALUE!。如果x<0，函数GAMMADIST返回错误值#NUM!。如果alpha≤0或beta≤0，函数GAMMADIST返回错误值#NUM!。伽玛概率密度函数的计算公式如下：标准伽玛概率密度函数为：当alpha=1时，函数GAMMADIST返回如下的指数分布：对于正整数n，当alpha=n/2，beta=2且cumulative=TRUE时，函数GAMMADIST以自由度n返回(1-CHIDIST(X))。当alpha为正整数时，函数GAMMADIST也称为爱尔朗(Erlang)分布。示例如果您将示例复制到空白工作表中，可能会更易于理解该示例。操作方法创建空白工作簿或工作表。请在“帮助”主题中选取示例。不要选取行或列标题。从帮助中选取示例。按Ctrl+C。在工作表中，选中单元格A1，再按Ctrl+V。若要在查看结果和查看返回结果的公式之间切换，请按Ctrl+`（重音符），或在“工具”菜单上，指向“公式审核”，再单击“公式审核模式”。1234AB数据说明10用来计算伽玛分布的数值9Alpha分布参数2Beta分布参数公式说明（结果）=GAMMADIST(A2,A3,A4,FALSE)在上述条件下的概率伽玛分布(0.032639)=GAMMADIST(A2,A3,A4,TRUE)在上述条件下的累积伽玛分布(0.068094)
EXCEL函数GAMMADIST 返回伽玛分布。可以使用此函数来研究具有偏态分布的变量。伽玛分布通常用于排队分析。语法GAMMADIST(x,alpha,beta,cumulative)X 为用来计算伽玛分布的数值。Alpha 分布参数。Beta 分布参数。如果 beta = 1，函数 GAMMADIST 返回标准伽玛分布。Cumulative 为一逻辑值，决定函数的形式。如果 cumulative 为 TRUE，函数 GAMMADIST 返回累积分布函数；如果为 FALSE，则返回概率密度函数。说明如果 x、alpha 或 beta 为非数值型，函数 GAMMADIST 返回错误值 #VALUE!。 如果 x < 0，函数 GAMMADIST 返回错误值 #NUM!。 如果 alpha ≤ 0 或 beta ≤ 0，函数 GAMMADIST 返回错误值 #NUM!。 伽玛概636f7079e799bee5baa6e997aee7ad94330率密度函数的计算公式如下： 标准伽玛概率密度函数为：当 alpha = 1 时，函数 GAMMADIST 返回如下的指数分布： 对于正整数 n，当 alpha = n/2，beta = 2 且 cumulative = TRUE 时，函数 GAMMADIST 以自由度 n 返回 (1-CHIDIST(X))。 当 alpha 为正整数时，函数 GAMMADIST 也称为爱尔朗 (Erlang) 分布。 示例如果您将示例复制到空白工作表中，可能会更易于理解该示例。操作方法创建空白工作簿或工作表。 请在“帮助”主题中选取示例。不要选取行或列标题。 从帮助中选取示例。 按 Ctrl+C。 在工作表中，选中单元格 A1，再按 Ctrl+V。 若要在查看结果和查看返回结果的公式之间切换，请按 Ctrl+`（重音符），或在“工具”菜单上，指向“公式审核”，再单击“公式审核模式”。 1234AB数据说明10用来计算伽玛分布的数值9Alpha 分布参数2Beta 分布参数公式说明（结果）=GAMMADIST(A2,A3,A4,FALSE)在上述条件下的概率伽玛分布 (0.032639)=GAMMADIST(A2,A3,A4,TRUE)在上述条件下的累积伽玛分布 (0.068094)
第1步 在Excel单元格中输入自变量，直接借用上一步输百入完毕的A列的这些数据，作为随机变量χ的取值。
第2步 在单元格C2中输入计算t分布的积累的概率密度函数的公式。
自变量χ就是单元格A2的值，度所以按Excel相对引用的规则，χ由A2代入即可，于是单元格C2内容是=GAMMA.DIST(A2,11/2,2, TRUE)。
第3步 复制公式
按住单元格C2右下角的填充控制点，向下一直拖曳到C102，将C2的公式填充复制到C列的相问应的单元格。
第4步 作卡方分布概率密度函数图表
由于图形右端答与,y=1渐近，变化极细微，故只选择选择A1：回A72和C2：C72单元格区域，选“插入”-“图表”-“散点图”-“带平滑线的散点图”，输入标答题，调整字号、线型等格式，完成卡方分布积累的概率密度函数图，如图-4所示：
图-4
如将上图的图表类型换成二维面积图，则如图-5-1(2003版)和图-5-2（2010版）所示：
图-5-1(2003版)
图-5-2(2010版)
如将上图的图表类型换成三维面积图，则如图-6-1（2003版）和图-6-2（2010版）所示：
图-6-1(2003版)
图-6-2（2010版）
简单的方法就是添加excel引用，然后e69da5e887aae799bee5baa6362：
dim xlApp as Excel.Application
Set xlApp = New Excel.Application
rt=xlApp.WorksheetFunction.GammaDist(x,alpha,beta,cumulative)
另外一种，从网上抄袭的哈，未验证：
Public Function GamCdf(x, a, b) '对应excel中GammaDist(x,a,b,true)函数
If a <= 0 Or b <= 0 Then GammCdf = "NaN"
GamCdf = GAMMAINC(x / b, a)
p = IIf(p > 1, 1, p)
End Function
Public Function GAMMAINC(x, a)
Dim amax As Double
amax = 2 ^ 20
ascalar = 1
If a <= amax Then
If a <> 0 And x <> 0 And x < a + 1 Then
xk = x
ak = a
ap = ak
Sum = 1 / ap
del = Sum
Dim i As Double
For i = 1 To 10000
ap = ap + 1
del = xk * del / ap
Sum = Sum + del
Next
GAMMAINC = Sum * Exp(-xk + ak * Log(xk) - GAMMALN(ak))
ElseIf a <> 0 And x <> 0 And x >= a + 1 Then
xk = x
a0 = 1
a1 = x
b0 = 0
b1 = a0
ak = a
fac = 1
n = 1
g = b1
gold = b0
For i = 1 To 10000
gold = g
ana = n - ak
a0 = (a1 + a0 * ana) * fac
b0 = (b1 + b0 * ana) * fac
anf = n * fac
a1 = xk * a0 + anf * a1
b1 = xk * b0 + anf * b1
fac = 1 / a1
g = b1 * fac
n = n + 1
Next
GAMMAINC = 1 - Exp(-xk + ak * Log(xk) - GAMMALN(ak)) * g
End If
Else
GAMMAINC="NaN"
End If
End Function
Public Function GAMMALN(XX)
Dim COF(6) As Double, stp As Double, half As Double, one As Double
Dim fpf As Double, x As Double, tmp As Double, ser As Double
Dim j As Integer
COF(1) = 76.18009173
COF(2) = -86.50532033
COF(3) = 24.01409822
COF(4) = -1.231739516
COF(5) = 0.00120858003
COF(6) = -0.00000536382
stp = 2.50662827465
half = 0.5
one = 1#
fpf = 5.5
x = XX - one
tmp = x + fpf
tmp = (x + half) * Log(tmp) - tmp
ser = one
For j = 1 To 6
x = x + one
ser = ser + COF(j) / x
Next j
GAMMALN = tmp + Log(stp * ser)
End Function