Learn R Programming

correlation (version 0.8.0)

visualisation_recipe.easycor_test: Visualisation Recipe for 'correlation' Objects

Description

Visualisation Recipe for 'correlation' Objects

Usage

# S3 method for easycor_test
visualisation_recipe(
  x,
  show_data = "point",
  show_text = "subtitle",
  smooth = NULL,
  point = NULL,
  text = NULL,
  labs = NULL,
  ...
)

# S3 method for easycormatrix visualisation_recipe( x, show_data = "tile", show_text = "text", show_legend = TRUE, tile = NULL, point = NULL, text = NULL, scale = NULL, scale_fill = NULL, labs = NULL, type = show_data, ... )

# S3 method for easycorrelation visualisation_recipe(x, ...)

Arguments

x

A correlation object.

show_data

Show data. For correlation matrices, can be "tile" (default) or "point".

show_text

Show labels with matrix values.

...

Other arguments passed to other functions.

show_legend

Show legend. Can be set to FALSE to remove the legend.

tile, point, text, scale, scale_fill, smooth, labs

Additional aesthetics and parameters for the geoms (see customization example).

type

Alias for show_data, for backwards compatibility.

Examples

Run this code
# NOT RUN {
# ==============================================
# Correlation Test
# ==============================================
if (require("see")) {
  rez <- cor_test(mtcars, "mpg", "wt")

  layers <- visualisation_recipe(rez, labs = list(x = "Miles per Gallon (mpg)"))
  layers
  plot(layers)

  plot(rez,
    show_text = "label",
    point = list(color = "#f44336"),
    text = list(fontface = "bold"),
    show_statistic = FALSE, show_ci = FALSE, stars = TRUE
  )
}
# }
# NOT RUN {
# ==============================================
# Correlation Matrix
# ==============================================
if (require("see")) {
  rez <- correlation(mtcars)

  x <- cor_sort(as.matrix(rez))
  layers <- visualisation_recipe(x)
  layers
  plot(layers)

  #' Get more details using `summary()`
  x <- summary(rez, redundant = TRUE, digits = 3)
  plot(visualisation_recipe(x))

  # Customize
  x <- summary(rez)
  layers <- visualisation_recipe(x,
    show_data = "points",
    scale = list(range = c(10, 20)),
    scale_fill = list(
      high = "#FF5722",
      low = "#673AB7",
      name = "r"
    ),
    text = list(color = "white"),
    labs = list(title = "My Plot")
  )
  plot(layers) + theme_modern()
}
# }
# NOT RUN {
if (FALSE) {
  # ==============================================
  # Correlation Results (easycorrelation)
  # ==============================================
  if (require("see") && require("tidygraph") && require("ggraph")) {
    rez <- correlation(iris)

    layers <- visualisation_recipe(rez)
    layers
    plot(layers)
  }
}
# }

Run the code above in your browser using DataLab