R/crnt_path.R

In freuerde/puzzle: Collection and customisation of pre-existing functions

#' Returns the path to folder of the current R-script
#'
#' Returns the current path to the folder, where the current R-script is stored.
#' @return Returns the current path as a string.
#' @author Dennis Freuer
#' @export
#'
crnt_path <- function(){ return(dirname(rstudioapi::getSourceEditorContext()$path)) }

#' @describeIn crnt_path Shorter notation.
#' current_path <- function(){ return(dirname(rstudioapi::getSourceEditorContext()$path)) }