Guest User

Untitled

a guest
Jan 19th, 2019
88
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.17 KB | None | 0 0
  1. alphas <- rnorm(1000, mean = 0.8, sd = 1) #sample values for the alpha paramters
  2. pAlpha <- alphas[alphas>0]/sum(alphas[alphas>0])#make sure they are positive and sum to one.
Add Comment
Please, Sign In to add comment