mathematica

题目

mathematica
有三个作图的程序,如下：
g[t_] := Plot[E^(-x^2/2)/Sqrt[2*Pi],{x,-t,t}];
g[6]
g[t_] := Plot[E^(-x^2/8)/(Sqrt[2*Pi]*2),{x,-t,t}];
g[6]
g[t_] := Plot[E^(-x^2/32)/(Sqrt[2*Pi]*4),{x,-t,t}];
g[6]
我想问的是,如何合并这三个程序为一个,然后出现的图就可以在一个坐标系上了.

答案

mathematica 数学实验!问个简单的问题
100 - 离问题结束还有 14 天 23 小时
有三个作图的程序,如下：
g[t_] := Plot[E^(-x^2/2)/Sqrt[2*Pi],{x,-t,t}];
g[6]
g[t_] := Plot[E^(-x^2/8)/(Sqrt[2*Pi]*2),{x,-t,t}];
g[6]
g[t_] := Plot[E^(-x^2/32)/(Sqrt[2*Pi]*4),{x,-t,t}];
g[6]
我想问的是,如何合并这三个程序为一个,然后出现的图就可以在一个坐标系上了.请大家帮帮忙啊,
改成下面的写法
g1[t_] := Plot[E^(-x^2/2)/Sqrt[2*Pi],{x,-t,t}];
g2[t_] := Plot[E^(-x^2/8)/(Sqrt[2*Pi]*2),{x,-t,t}];
g3[t_] := Plot[E^(-x^2/32)/(Sqrt[2*Pi]*4),{x,-t,t}];
Show[g1[6],g2[6],g3[6]]
肯定行的.试试
分一定要给我哦.