Rprofile

.First <- function() {
    # set location for R library
	.libPaths('~/R/library/')
	Sys.setenv(R_LIBS = .libPaths()[1])  
	if (interactive() & Sys.getenv("RSTUDIO") != 1) {
		# Git commands from the R console, see https://github.com/gaborcsardi/gitty
	    library("gitty")
	    # Dynamic R Prompt, see https://github.com/gaborcsardi/prompt
	    library("prompt")
	    library("clisymbols")
	    set_prompt(prompt_fancy)
	    library("prettycode")
	}
}

# set default CRAN mirror
options(repos = c(CRAN = "https://cran.rstudio.com/"))

# override q(), so that it doesn't ask to save workspace
library("utils")
assignInNamespace("q", 
	function(save = "no", status = 0, runLast = TRUE) {
		.Internal(quit(save, status, runLast))
	}, "base")