зеркало из https://github.com/microsoft/wpa.git
fix: patch create_dist()
Flagged by R CMD checks
This commit is contained in:
Родитель
4cb28baa4d
Коммит
8422a74f7d
|
@ -50,7 +50,8 @@ create_dist <- function(data,
|
|||
dist_colours = c("#facebc",
|
||||
"#fcf0eb",
|
||||
"#b4d5dd",
|
||||
"#bfe5ee")) {
|
||||
"#bfe5ee"),
|
||||
unit = "hours") {
|
||||
|
||||
## Check inputs
|
||||
required_variables <- c("Date",
|
||||
|
|
|
@ -11,8 +11,7 @@ create_dist(
|
|||
mingroup = 5,
|
||||
return = "plot",
|
||||
cut = c(15, 20, 25),
|
||||
dist_colours = c("#FE7F4F", "#ffdfd3", "#bed6f2", "#e9f1fb"),
|
||||
unit = "hours"
|
||||
dist_colours = c("#facebc", "#fcf0eb", "#b4d5dd", "#bfe5ee")
|
||||
)
|
||||
}
|
||||
\arguments{
|
||||
|
|
|
@ -10,7 +10,7 @@ create_stacked(
|
|||
metrics = c("Meeting_hours", "Email_hours"),
|
||||
mingroup = 5,
|
||||
return = "plot",
|
||||
stack_colours = c("#203864", "#5191DD", "darkgrey", "lightgrey"),
|
||||
stack_colours = c("#1d627e", "#34b1e2", "#b4d5dd", "#adc0cb"),
|
||||
plot_title = "Collaboration Hours",
|
||||
plot_subtitle = "Weekly collaboration hours"
|
||||
)
|
||||
|
|
|
@ -8,7 +8,7 @@ mgrrel_matrix(
|
|||
data,
|
||||
hrvar = NULL,
|
||||
return = "plot",
|
||||
plot_colors = c("#FE7F4F", "#C3E5FF", "#FFD4C4", "#FEAA8A"),
|
||||
plot_colors = c("#fe7f4f", "#b4d5dd", "#facebc", "#fcf0eb"),
|
||||
threshold = 15
|
||||
)
|
||||
}
|
||||
|
|
Загрузка…
Ссылка в новой задаче