mu <- 3.0 # Media sigma <- 1.2 # Desviación estándar x <- 3 cdf_value <- pnorm(x) print(cdf_value)
## [1] 0.9986501