Advertisement
Guest User

Untitled

a guest
Dec 18th, 2014
149
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.20 KB | None | 0 0
  1. d1 = NormalDistribution[];
  2. d2 = NormalDistribution[1, 1];
  3. d3 = TransformedDistribution[3 x y, {Distributed[x, d1], Distributed[y, d2]}];
  4.  
  5. data = RandomVariate[d3, 100];
  6. Histogram[data, 10, "PDF"]
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement