Erf

ERF <!--cstransform awsenduser.xsl date 2006-12-10 --><!--csautotext date 2007-11-12 number --><!--csglossary date 2007-11-06 number --><!--csglobalstrings date 2007-11-11 number --><!-- defs in --><!-- META NAME="lcid" CONTENT="2052" --> 返回误差函数在上下限之间的积分。 如果该函数不可用，并返回错误值 #NAME?，请安装并加载“分析工具库”加载宏。 在“工具”菜单上，单击“加载宏”。 在“可用加载宏”列表中，选中“分析工具库”框，再单击“确定”。 如果必要，请遵循安装程序中的指示。 语法 ERF(lower_limit,upper_limit) Lower_limit ERF 函数的积分下限。 Upper_limit ERF 函数的积分上限。如果省略，ERF 将在零到下限之间进行积分。 说明 如果下限是非数值型，函数 ERF 返回错误值 #VALUE!。 如果下限是负值，函数 ERF 返回错误值 #NUM!。 如果上限是非数值型，函数 ERF 返回错误值 #VALUE!。 如果上限是负值，函数 ERF 返回错误值 #NUM!。 示例 如果您将示例复制到空白工作表中，可能会更易于理解该示例。 创建空白工作簿或工作表。 请在“帮助”主题中选取示例。不要选取行或列标题。 从帮助中选取示例。 按 Ctrl+C。 在工作表中，选中单元格 A1，再按 Ctrl+V。 若要在查看结果和查看返回结果的公式之间切换，请按 Ctrl+`（重音符），或在“工具”菜单上，指向“公式审核”，再单击“公式审核模式”。 1 2 3 A B 公式 说明（结果） =ERF(0.74500) 误差函数在 0 与 0.74500 之间的积分值 (0.707929) =ERF(1) 误差函数在 0 与 1 之间的积分值 (0.842701) VBA中使用时，可按下面方式调用： Sub macro1() MsgBox Application.Run("atpvbacs.xla!erf", 1) End Sub<!--@@FEEDBACKWIZ@@--> 对于X<=1，可使用如下自定义函数： Function erf(ByVal x As Single) As Single Dim i As Long, b(9) As Double b(0) = 1 erf = x For i = 1 To 9 b(i) = b(i - 1) * (2 * i + 1) erf = erf + 2 ^ i * x ^ (2 * i + 1) / b(i) Next erf = erf * Exp(-x * x) / Sqr(Atn(1)) End Function Sub macro1() MsgBox erf(1) End Sub 上述代码返回 0.8427008 if (typeof(FeedbackWizGenerateControl_Buttons) != 'undefined') FeedbackWizGenerateControl_Buttons('此信息有用吗?','是','否','我不知道','请告诉 Microsoft 此信息对您有什么帮助(可选):','请告诉 Microsoft 怎样才能让此信息更有帮助(可选):','请告诉 Microsoft 您想做什么(可选):','后退','提交','正在提交您的反馈。','感谢您向 Microsoft 提交反馈。','您需要支持，或者希望对某个产品提出一些建议吗? {0}。','与我们联系','http://office.microsoft.com/search/redir.aspx?assetid=FX101538732052','更改我的反馈','虽然我们不能对每条意见单独进行答复，但是 您的反馈将帮助我们不断改进我们提供的信息。','100%');

<meta content="Client" name="DCSext.oo_source"> <meta content="zh-CN" name="DCSext.oo_ul"> <meta content="Office+2003" name="DCSext.oo_offver"> <meta content="HP052090772052" name="DCSext.oo_assetid"> <meta content="client" name="WT.cg_n"> <meta content="zh-CN" name="DCSext.oo_market"> <meta content="ERF" name="WT.ti"> <meta content="" name="DCSext.oo_bc">var gProductionDomains="office.microsoft.com";var gLinkT="assetid=xt";var gDomain="m.webtrends.com";var gTrackEvents;if (((typeof(gTrackEventsOverride) != 'undefined') && gTrackEventsOverride) || false){gTrackEvents = 1;} else {gTrackEvents = 0;}var wt_a=gProductionDomains.split(',');var wt_b=0;for(var i=0;i<wt_a.length gdcsid='(wt_b!=0)?"dcs0junic89k7m2gzez6wz0k8_7v8n":"dcsz5rin010000slv86age17c_7z8n";var' gfpcdom=".microsoft.com" gfpc="WT_FPC" type="text/javascript" src="%22+window.location.protocol+%22//%22+gDomain+%22/%22+gDcsId+%22/wtid.js%22+%22">");} <div style="DISPLAY: none"> </div> <noscript><img alt="" border="0" id="DCSIMG" width="1" height="1" src="http://m.webtrends.com/dcs0junic89k7m2gzez6wz0k8_7v8n/njs.gif?dcsuri=/nojavascript&amp;WT.js=No"></noscript></wt_a.length>

<iframe id="submitTarget" style="BORDER-TOP-WIDTH: 0px; PADDING-RIGHT: 0px; DISPLAY: none; PADDING-LEFT: 0px; BORDER-LEFT-WIDTH: 0px; BORDER-BOTTOM-WIDTH: 0px; PADDING-BOTTOM: 0px; MARGIN: 0px; WIDTH: 1px; PADDING-TOP: 0px; HEIGHT: 1px; BORDER-RIGHT-WIDTH: 0px"></iframe>