Maintenance is scheduled between 16:00 and 23:59 CEST (14:00 and 21:59 UTC) on Thursday 2021-10-28. The system may be unavailable at any time during this timeframe. Please plan accordingly.

Commit 5b8fbe8a authored by jml's avatar jml
Browse files

typo

parent 38514adf
......@@ -21,7 +21,7 @@ basicr <- function(df,target,group="none"){
"none" = df %>% basic_(target=target),
"YEAR" = df %>% group_by(YEAR) %>% basic_(target=target),
"MONTH" = df %>% group_by(MONTH) %>% basic_(target=target),
"WDAY" = df %>% group_by(wday) %>% basic_(target=target),
"WDAY" = df %>% group_by(WDAY) %>% basic_(target=target),
"HOUR" = df %>% group_by(HOUR) %>% basic_(target=target),
"MINUTE" = df %>% group_by(MINUTE) %>% basic_(target=target),
"SECOND" = df %>% group_by(SECOND) %>% basic_(target=target),
......
......@@ -33,7 +33,7 @@ plot_tbl_basic <- function(df,target,group,path=tempdir(),name=NULL,DESKTOP=TRUE
p <- switch(group,
"YEAR" = ggplot2::ggplot(df) + ggplot2::geom_boxplot(ggplot2::aes(x = YEAR, y = targ)) + ggplot2::labs(x = group, y = target),
"MONTH" = ggplot2::ggplot(df) + ggplot2::geom_boxplot(ggplot2::aes(x = MONTH, y = targ)) + ggplot2::labs(x = group, y = target),
"WDAY" = ggplot2::ggplot(df) + ggplot2::geom_boxplot(ggplot2::aes(x = wday, y = targ)) + ggplot2::labs(x = group, y = target),
"WDAY" = ggplot2::ggplot(df) + ggplot2::geom_boxplot(ggplot2::aes(x = WDAY, y = targ)) + ggplot2::labs(x = group, y = target),
"HOUR" = ggplot2::ggplot(df) + ggplot2::geom_boxplot(ggplot2::aes(x = HOUR, y = targ)) + ggplot2::labs(x = group, y = target),
"MINUTE" = ggplot2::ggplot(df) + ggplot2::geom_boxplot(ggplot2::aes(x = MINUTE, y = targ)) + ggplot2::labs(x = group, y = target),
"SECOND" = ggplot2::ggplot(df) + ggplot2::geom_boxplot(ggplot2::aes(x = SECOND, y = targ)) + ggplot2::labs(x = group, y = target),
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment