powered by
'mu'
'b'
dlaplace(x, mu=0, b=1) rlaplace(n, mu=0, b=1)
n
set.seed(1234) n=1000 x <- rchisq(n,3) b=0.4 e <- rlaplace(n, 0, b) y <- x + e #noisy observations with laplace noise
Run the code above in your browser using DataLab