Nothing
## ----setup, include=FALSE-----------------------------------------------------
knitr::opts_chunk$set(collapse=TRUE, comment="#>")
## -----------------------------------------------------------------------------
library('slanter')
data('meristems')
similarity <- meristems
similarity[similarity < 0] <- 0
## ---- fig.show='hold'---------------------------------------------------------
pheatmap::pheatmap(meristems, show_rownames=FALSE, show_colnames=FALSE)
## ---- fig.show='hold'---------------------------------------------------------
pheatmap::pheatmap(meristems, show_rownames=FALSE, show_colnames=FALSE, cluster_rows=FALSE, cluster_cols=FALSE)
## ---- fig.show='hold'---------------------------------------------------------
sheatmap(meristems, order_data=similarity, show_rownames=FALSE, show_colnames=FALSE, cluster_rows=FALSE, cluster_cols=FALSE)
## ---- fig.show='hold'---------------------------------------------------------
sheatmap(meristems, order_data=similarity, show_rownames=FALSE, show_colnames=FALSE, oclust_rows=FALSE, oclust_cols=FALSE)
## ---- fig.show='hold'---------------------------------------------------------
sheatmap(meristems, order_data=similarity, show_rownames=FALSE, show_colnames=FALSE)
## ---- fig.show='hold'---------------------------------------------------------
sheatmap(meristems, order_data=similarity, show_rownames=FALSE, show_colnames=FALSE, cutree_rows=5, cutree_cols=5)
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.