15 lines
258 B
R
15 lines
258 B
R
init <- function() {
|
|
source(".init.R")
|
|
}
|
|
|
|
cat("\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n")
|
|
cat(" =================")
|
|
cat("\n\n")
|
|
cat(" WELCOME !\n")
|
|
cat("\n")
|
|
cat(" Type 'init()' to begin\n\n")
|
|
cat("\n")
|
|
cat(" =================")
|
|
cat("\n\n")
|
|
|