Question

我有Mathematica表达式涉及特殊函数Erf[x]和Erfc[x]，但我想用缩放和翻译版本表达它们

F[x_] := CDF[NormalDistribution[0,1]][x]

整个笔记本电脑。这是因为F[x]在我的问题背景下有一个简单的解释。

Answer 1

不确定我是否理解你的问题，但我试图回答我对你所说的话的解释。

所以你在erf和erfc中有一个表达式，就像这个

expr = Erf[x] + 1/Erfc[x] + Sin[Erf[x]] + Cos[Erfc[x]]

用F替换erf和erfc只需要：

 expr //. {Erfc[x_] -> 2 F[-(x) Sqrt[2]], Erf[x_] -> 1 - Erfc[x]}

 (* ==>  1 + Cos[2 F[-Sqrt[2] x]] + 1/(2 F[-Sqrt[2] x]) -
         2 F[-Sqrt[2] x] + Sin[1 - 2 F[-Sqrt[2] x]]
 *)

与你对F [x]的定义确实相同：

1 + Cos[2 F[-Sqrt[2] x]] + 1/(2 F[-Sqrt[2] x]) - 2 F[-Sqrt[2] x] + 
  Sin[1 - 2 F[-Sqrt[2] x]] /. F[x_] -> CDF[NormalDistribution[0, 1]][x]

(* ==> 1 + Cos[Erfc[x]] + 1/Erfc[x] - Erfc[x] + Sin[1 - Erfc[x]] *)

在简化和扩展中使用替代特殊功能

1 个答案: