Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Diffuse := (t, x) -> 1/(2sqrt(Pi t))exp(-(x-v t)^2/4 t);
- plot([subs(v = 0, Diffuse(1, x)), subs(v = .1, Diffuse(1, x)), subs(v = 1, Diffuse(1, x))], x = -2 .. 2, colour = [red, blue, green])
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement