# NOT RUN {
if(requireNamespace("INLA", quietly = TRUE)) {
require(INLA)
x<-seq(-3,3, by=.01)
xx<-cbind(x, dnorm(x))
xx2<-rescalemarg(xx, 3)
plot(xx, type="l", xlim=c(-9,9))
lines(xx2, col="red")
}
# }
Run the code above in your browser using DataLab