PageRenderTime 24ms CodeModel.GetById 21ms app.highlight 0ms RepoModel.GetById 2ms app.codeStats 0ms

/pkg/R/tableplot_checkScales.R

https://code.google.com/
R | 10 lines | 4 code | 0 blank | 6 comment | 1 complexity | 8916f18b9e5a3664a9a8a95968e5b13f MD5 | raw file
 1#' Function to check the tableplot argument: scales
 2#'
 3#' @aliases tableplot_checkScales
 4#' @param scales scales
 5#' @return scales
 6#' @export
 7tableplot_checkScales <- function(scales) {
 8	if (length(setdiff(scales, c("auto", "lin", "log")))>0) stop("<scales> should consist of auto, lin and log")
 9	return(scales)
10}