R包安装 install.packages('heatmaply') ##或者从github安装 install.packages.2 <- function (pkg) if (! ') 可视化介绍 01 基础绘图 首先让我们试试默认的绘图 library("heatmaply") heatmaply(mtcars) 相关性热图 heatmaply 包括 heatmaply_cor #两个颜色设置的例子 heatmaply( percentize(mtcars), colors = heat.colors(100) ) # heatmaply( mtcars, scale_fill_gradient_fun # The default of heatmaply: heatmaply( percentize(mtcars)[1:10, ], seriate = "OLO" #seriate = " ("folder") heatmaply(mtcars, file = "folder/heatmaply_plot.html") browseURL("folder/heatmaply_plot.html
02 heatmaply包 library(heatmaply) data(mtcars) 数据iris: ? ① heatmaply(iris[,-5], k_row = 3, k_col = 2) ? ② heatmaply(mtcars, k_row = 3, k_col = 2, grid_gap = 1) ?
hc_add_series(name = "value", data = ds) hc_colorAxis(hc, minColor = "#FFFFFF", maxColor = "#434348") 02 heatmaply 包 library(heatmaply) data(mtcars) 数据iris: ① heatmaply(iris[,-5], k_row = 3, k_col = 2) ② heatmaply
res_cir_plot[,-1] heat_col <- viridis::viridis(n = 256, alpha = 1, begin = 0, end = 1, option = "D") heatmaply ::heatmaply(x = as.matrix(res_cir_plot), colors = heat_col, limits = c(0,1),dendrogram = "none", margins
图 8. d3heatmap 绘制的交互式热图 六、heatmaply 包里面的 heatmaply 函数 heatmaply 也是交互式的。尝试以下代码: 图 9. 用 heatmaply 绘制的热图 这里新出现的 fontsize_row、fontsize_col 和 margins 参数分别表示行标签字体大小、列标签字体大小以及边界(下、左、上、右)。
对于更大的图形,你可以使用d3heatmap或heatmaply包,这两个包都可以生成有交互功能的图形。 ?
:heatmap(基本热图) gplots::heatmap.2 (基本增强热图) ComplexHeatmap (适用于基因组分析的复杂热图) ggplot2::ggplot(ggplot可视化) heatmaply ::heatmaply(交互式) ......
shinydashboardPlus shinyjs shinyWidgets shinycssloaders shinyalert shinydisconnect shinybusy DT waiter slickR plotly heatmaply