iemirror: iemirror

In anastasia-lucas/hudson: A mirrored Manhattan plot package

Description

Create mirrored Manhattan plots for EWAS Dependencies: ggplot2, gridExtra Suggested: ggrepel

Usage

iemirror(
  top,
  bottom,
  tline,
  bline,
  log10 = TRUE,
  yaxis,
  opacity = 1,
  toptitle = NULL,
  bottomtitle = NULL,
  annotate_var,
  annotate_p,
  highlight_var,
  highlight_p,
  highlighter = "red",
  color1 = "#AAAAAA",
  color2 = "#4D4D4D",
  groupcolors,
  rotatelabels = FALSE,
  labelangle,
  freey = FALSE,
  background = "variegated",
  grpblocks = FALSE,
  file = "emirror",
  hgtratio = 0.5,
  hgt = 7,
  wi = 12
)

Arguments

top	data frame, columns one and two must be Variable, pvalue, and Group; Shape, Color, Hover, Link optional
bottom	data frame, columns one and two must be Variable, pvalue, and Group; Shape, Color, Hover, Link optional
tline	list of pvalues to draw red threshold lines in top plot
bline	list of pvalues to draw red threshold lines in bottom plot
log10	plot -log10() of pvalue column, logical
yaxis	label for y-axis in the format c("top", "bottom"), automatically set if log10=TRUE
opacity	opacity of points, from 0 to 1, useful for dense plots
toptitle	optional string for plot title
bottomtitle	optional string for plot title
annotate_var	vector of variables to annotate
annotate_p	list of pvalue thresholds to annotate in the order of c(p_top, p_bottom)
highlight_var	vector of variables to highlight
highlight_p	list of pvalue thresholds to highlight in the order of c(p_top, p_bottom)
highlighter	color to highlight
color1	first alternating color
color2	second alternating color
groupcolors	named vector of colors where names correspond to data in 'Color' column
rotatelabels	logical, rotate axis labels?
labelangle	angle to rotate
freey	allow y-axes to scale with data
background	variegated or white
grpblocks	logical, turns on x-axis group marker blocks
file	file name of saved image
hgtratio	height ratio of plots, equal to top plot proportion
hgt	height of plot in inches
wi	width of plot in inches

Value

png image

Examples

data(ewas.t)
data(ewas.b)
ewas.t$Link <- paste0("https://www.google.com/search?q=", ewas.t$Variable)
ewas.b$Link <- paste0("https://www.google.com/search?q=", ewas.b$Variable)
iemirror(top=ewas.t, bottom=ewas.b, annotate_p = c(0.0001, 0.0005), 
         highlight_p=c(0.0001, 0.0005), highlighter="green", 
         toptitle = "EWAS Comparison Example: Data 1", 
         bottomtitle = "EWAS Comparison Example: Data 2")

anastasia-lucas/hudson documentation built on Nov. 18, 2021, 5:16 p.m.