plotscatter_withthres: Scatter Plot with Thresholds and Quadrant Statistics

In chris-hsiung/bears01: What the Package Does (One Line, Title Case)

Scatter Plot with Thresholds and Quadrant Statistics

Description

This function creates a scatter plot using the ggplot2 package. The scatter plot is divided into four quadrants using specified x and y thresholds. The percentage of data points in each quadrant is calculated and displayed within the respective quadrant.

Usage

plotscatter_withthres(
  df,
  facetformula_var,
  x_var,
  y_var,
  xthres_var,
  ythres_var,
  quadrantx_var = c(4.5, 4.5, 2, 2),
  quadranty_var = c(5.2, 0.4, 0.4, 5.2),
  color_var,
  alpha_var = 0.2,
  basesize_var = 15,
  title_var = ""
)

Arguments

df	A data frame containing the data to be plotted.
facetformula_var	A character string specifying the faceting formula for the plot.
x_var	A character string specifying the column name for the x-axis variable in df.
y_var	A character string specifying the column name for the y-axis variable in df.
xthres_var	A character string specifying the column name for the x-axis threshold in df.
ythres_var	A character string specifying the column name for the y-axis threshold in df.
quadrantx_var	A numeric vector of length 4 specifying the x-coordinates for displaying quadrant statistics. Defaults to c(4.5, 4.5, 2, 2).
quadranty_var	A numeric vector of length 4 specifying the y-coordinates for displaying quadrant statistics. Defaults to c(5.2, 0.4, 0.4, 5.2).
color_var	A character string specifying the column name for point colors in df.
alpha_var	A numeric value between 0 and 1 specifying the transparency of the scatter points. Defaults to 0.2.
basesize_var	A numeric value greater than 0 specifying the base font size for the plot. Defaults to 15.
title_var	A character string specifying the title for the plot. Defaults to an empty string.

Value

A list containing:

• dfout: A data frame summarizing the percentage of points in each quadrant.

• plotout: The ggplot2 object of the scatter plot.

Examples

## Not run: 
  df <- data.frame(x = rnorm(100), y = rnorm(100), color = sample(c('red', 'blue'), 100, replace = TRUE))
  result <- plotscatter_withthres(df, "~.", "x", "y", "0", "0", color_var = "color")
  print(result$plotout)

## End(Not run)

chris-hsiung/bears01 documentation built on April 9, 2024, 2:01 a.m.