Add prerequisites to .Rprofile

[rknx]

Or better

source("c:\data\rprojects\functions\prereqs.R) to rprofile

[rknx]

Also add

.env <- new.env()

attach(.env)

.env$mutate =

[rknx]

options(stringsAsFactors=FALSE)

[rknx]

message("n Successfully loaded .Rprofile n")

[rknx]

.First <- function(){ if(interactive()){ library(utils) timestamp(,prefix=paste("##------ [",getwd(),"] ",sep="")) } }

.Last <- function(){ if(interactive()){ hist_file <- Sys.getenv("R_HISTFILE") if(hist_file=="") hist_file <- "~/.RHistory" savehistory(hist_file) } }

[rknx]

Set wd and proj name

[rknx]

options(​radian.prompt​ ​=​ ​"​\0​33[0;34mr$>​\0​33[0m ​"​)

Change to r:..AvrBsT >

where avrbst is project name

[rknx]

print.data.frame <- function(df) { if (nrow(df) > 10) { base::print.data.frame(head(df, 5)) cat("----\n") base::print.data.frame(tail(df, 5)) } else { base::print.data.frame(df) } }

[rknx]

All done except adding functions to .env

.env <- new.env() attach(.env) .env$mutate = ...