R/guide.sys.R

Defines functions guide.sys

Documented in guide.sys

#' Sabali Guide: System
#'
#' This function activates the Sabali Help Guide for Operators
#' @param activate Do you need help? Defaults to TRUE.
#' @keywords help
#' @export
#' @examples
#' guide.sys()
 
guide.sys <- function(activate = TRUE){
if(activate == TRUE){

guide.clear <- data.frame("Description" = c("Get System Info", "Get System Username", "Get Working Directory",  "Set Working Directory", "List Files in Working Directory"), "Command" = c(paste0("Sys.info()"), paste0("Sys.getenv('LOGNAME')"), paste0("getwd()"), paste0("setwd('..')"), paste0("list.files()")))

print(guide.clear)

} else {

print("Cannot Access Guide")

}
}
sabalicodev/sabali documentation built on Jan. 13, 2020, 2:22 p.m.