Add a code line to Rprofile.site .First — add_to_.First_in

Goes through Rprofile.site text, finds the .First function - and add a line of code to the beginning of it.

add_to_.First_in_Rprofile.site(code, indent = "\t", ...)

Arguments

code	A character scalar with code to add at the beginning of the .First function in Rprofile.site
indent	a character scalar indicating the text to be added before code. Default is a tab.
...	not used.

References

https://stackoverflow.com/questions/1395301/how-to-get-r-to-recognize-your-working-directory-as-its-working-directory https://stackoverflow.com/questions/1189759/expert-r-users-whats-in-your-rprofile http://www.noamross.net/archives/2012-11-02-rprofile/ http://www.statmethods.net/interface/customizing.html

Examples

if (FALSE) {
is_in_.First_in_Rprofile.site("suppressMessages(library(installr))") # FALSE
add_to_.First_in_Rprofile.site("suppressMessages(library(installr))")
is_in_.First_in_Rprofile.site("suppressMessages(library(installr))") # TRUE
remove_from_.First_in_Rprofile.site("suppressMessages(library(installr))")
is_in_.First_in_Rprofile.site("suppressMessages(library(installr))") # FALSE
# this would still leave .First
}