ggheat: ggheat

In tinyarray: Expression Data Analysis and Visualization

ggheat

Description

draw heatmap plot with annotation by ggplot2

Usage

ggheat(
  dat,
  group,
  cluster = FALSE,
  color = c("#2874C5", "white", "#f87669"),
  legend_color = c("#2874C5", "#f87669", "#e6b707", "#868686", "#66C2A5", "#FC8D62",
    "#8DA0CB", "#E78AC3", "#A6D854", "#FFD92F", "#E5C494", "#B3B3B3"),
  show_rownames = TRUE,
  show_colnames = TRUE,
  cluster_rows = FALSE,
  cluster_cols = FALSE,
  groupname = "group",
  expname = "exp",
  fill_mid = TRUE
)

Arguments

dat	expression matrix for plot
group	group for expression colnames
cluster	logical,cluster in both rows and column or not, default F,now replaced by cluster_rows and cluster_cols.
color	color for heatmap
legend_color	color for legend
show_rownames	logical,show rownames in plot or not, default T
show_colnames	logical,show colnames in plot or not, default T
cluster_rows	logical, if rows (on the plot) should be clustered, default F
cluster_cols	logical, if column (on the plot) should be clustered, default F
groupname	name of group legend
expname	name of exp legend
fill_mid	use median value as geom_tile fill midpoint

Value

a ggplot object

Author(s)

Xiaojie Sun

Examples

exp_dat = matrix(sample(100:1000,40),ncol = 4)
exp_dat[1:(nrow(exp_dat)/2),] =  exp_dat[1:(nrow(exp_dat)/2),]-1000
rownames(exp_dat) = paste0("sample",1:nrow(exp_dat))
colnames(exp_dat) = paste0("gene",1:ncol(exp_dat))
group = rep(c("A","B"),each = nrow(exp_dat)/2)
group = factor(group,levels = c("A","B"))
ggheat(exp_dat,group)
ggheat(exp_dat,group,cluster_rows = TRUE)
ggheat(exp_dat,group,cluster_rows = TRUE,show_rownames = FALSE,
       show_colnames = FALSE,groupname = "risk",expname = "expression")

tinyarray documentation built on Aug. 18, 2023, 9:07 a.m.