Nothing
# --------------------------------------------------------------------------------------------
# Copyright (c) Microsoft Corporation. All rights reserved.
# Licensed under the MIT License. See LICENSE.txt in the project root for license information.
# --------------------------------------------------------------------------------------------
#' @title Distribution of Collaboration Hours (Fizzy Drink plot)
#'
#' @description
#' Analyze weekly collaboration hours distribution, and returns
#' a 'fizzy' scatter plot by default.
#' Additional options available to return a table with distribution elements.
#'
#' @template ch
#'
#' @inheritParams create_fizz
#' @inherit create_fizz return
#'
#' @family Visualization
#' @family Collaboration
#'
#' @examples
#' # Return plot
#' collaboration_fizz(sq_data, hrvar = "Organization", return = "plot")
#'
#' # Return summary table
#' collaboration_fizz(sq_data, hrvar = "Organization", return = "table")
#'
#' @export
collaboration_fizz <- function(data,
hrvar = "Organization",
mingroup = 5,
return = "plot"){
## Handle variable name consistency
data <- qui_stan_c(data)
create_fizz(data = data,
metric = "Collaboration_hours",
hrvar = hrvar,
mingroup = mingroup,
return = return)
}
#' @rdname collaboration_fizz
#' @export
collab_fizz <- collaboration_fizz
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.