bettr | R Documentation |
Launch bettr app to explore and aggregate performance metrics
bettr(
df,
idCol = "Method",
metrics = setdiff(colnames(df), idCol),
initialWeights = NULL,
initialTransforms = list(),
metricInfo = NULL,
metricColors = NULL,
idInfo = NULL,
idColors = NULL,
weightResolution = 0.05,
bstheme = "darkly",
appTitle = "bettr",
bettrSE = NULL
)
df |
A |
idCol |
Character scalar, indicating the name of the column of |
metrics |
Character vector, indicating which of the
columns of |
initialWeights |
Named numeric vector providing initial weights for
each metric to use for aggregating them into a final score. Must contain
one entry per metric included in |
initialTransforms |
Named list with initial values of transformation parameters for each metric. Each list entry should correspond to one metric, and take the form of a list with up to four elements, named: * **flip**: Logical scalar; whether or not to flip the sign of the metric values. Defaults to `FALSE`. * **offset**: Numeric scalar; offset to add to the (flipped) metric values. Defaults to `0`. * **transform**: Character scalar; one of 'None', 'z-score', '\[0,1\]', '\[-1,1\]', 'Rank', 'Rank+\[0,1\]' or 'z-score+\[0,1\]', indicating which transform to apply to the metric values (after any flipping and/or adding the offset). Defaults to 'None'. * **cuts**: Numeric vector or `NULL`; the cut points that will be used to bin the metric values (after the other transformations). Defaults to `NULL`. Only values deviating from the defaults need to be explicitly specified, the others will be initialized to their default values. |
metricInfo |
|
metricColors |
Named list with colors used for columns of
|
idInfo |
|
idColors |
Named list with colors used for columns of |
weightResolution |
Numeric scalar in (0,1), giving the resolution at which weights can be specified using the sliders in the interface. |
bstheme |
Character scalar giving the bootswatch theme for the app (see https://bootswatch.com/). Default 'darkly'. |
appTitle |
Character scalar giving the title that will be used for the app. Defaults to 'bettr'. |
bettrSE |
A |
A shiny application
Charlotte Soneson
df <- data.frame(Method = c("M1", "M2", "M3"), metric1 = c(1, 2, 3),
metric2 = c(3, 1, 2), metric3 = factor(c("a", "a", "b")))
initialTransforms <- list(metric1 = list(flip = TRUE, offset = 4))
metricInfo <- data.frame(Metric = c("metric1", "metric2", "metric3"),
Group = c("G1", "G2", "G2"))
idInfo <- data.frame(Method = c("M1", "M2", "M3"),
Type = c("T1", "T1", "T2"))
metricColors <- list(Group = c(G1 = "red", G2 = "blue"))
if (interactive()) {
bettr(df = df, idCol = "Method",
metrics = c("metric1", "metric2", "metric3"),
initialTransforms = initialTransforms,
metricInfo = metricInfo, metricColors = metricColors,
idInfo = idInfo)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.