In R programming use Laplace approximation to find mean and standard deviation. data = rexp(20, rate=0.5) . Suppose you model this data as following an Exponential( p ) distribution, where the prior is that p ~ Normal(0,1). Use Laplace's approximation to estimate the posterior for p , what is the mean and standard deviation?