R/eprint_list.R

In pik-piam/lucode: Code Manipulation and Analysis Tools

#' Extended list print
#' 
#' Same as \code{\link{eprint}}, but expecting a vector with variable names
#' 
#' 
#' @param var_list Vector containing names of several variables that should be
#' printed
#' @param envir environment from which the variable should be read (by default
#' the environment from which the function is called)
#' @author Jan Philipp Dietrich
#' @seealso \code{\link{eprint}}
#' @examples
#' 
#' a <- 1:3
#' b <- "blub"
#' lucode:::eprint_list(c("a","b"))
#' 
eprint_list <- function(var_list, envir=parent.frame()) {
  for(var_name in var_list) {
		eprint(var_name, envir=envir)
	}
}