| gg_qq <- function(x, distribution = "norm", ..., line.estimate = NULL, conf = 0.95, | |
| labels = names(x)){ | |
| q.function <- eval(parse(text = paste0("q", distribution))) | |
| d.function <- eval(parse(text = paste0("d", distribution))) | |
| x <- na.omit(x) | |
| ord <- order(x) | |
| n <- length(x) | |
| P <- ppoints(length(x)) | |
| df <- data.frame(ord.x = x[ord], z = q.function(P, ...)) |
| source_https <- function(url, ...) { | |
| ## Function for sourcing individual R scripts from GitHub | |
| ## Author: Tony Breyal | |
| ## Contributions: Kay Cichini | |
| ## Original URL: http://tonybreyal.wordpress.com/2011/11/24/source_https-sourcing-an-r-script-from-github/ | |
| ## Load required package | |
| require(RCurl) | |
| ## Parse and evaluate each .R script | |
| sapply(c(url, ...), function(u) { | |
| eval(parse(text = getURL(u, followlocation = TRUE, |
Setup GitHub Pages "gh-pages" branch as a subfolder within the "master" project on your local checkout.
If you plan on switching between different branches (e.g. git checkout master-experiment
then revert back with git checkout master) you will loose your child folder from this tutorial (because it's in your
.gitignore and is not part of your master branch).
