xpnorm(650, 500, 100)
xqnorm(.75, 500, 100)
## Not run:
# if (rstudio_is_available() & require(manipulate)) {
# manipulate(xpnorm(score, 500, 100, verbose=verbose),
# score = slider(200,800),
# verbose = checkbox(TRUE, label="Verbose Output")
# )
# }
# ## End(Not run)
Run the code above in your browser using DataLab