# NOT RUN {
library(dplyr)
hm =
tidyHeatmap::N52 %>%
tidyHeatmap::heatmap(
.row = symbol_ct,
.column = UBR,
.value = `read count normalised log`
)
hm %>% layer_arrow_up()
library(dplyr)
hm =
tidyHeatmap::N52 %>%
tidyHeatmap::heatmap(
.row = symbol_ct,
.column = UBR,
.value = `read count normalised log`
)
hm %>% layer_arrow_down()
library(dplyr)
hm =
tidyHeatmap::N52 %>%
tidyHeatmap::heatmap(
.row = symbol_ct,
.column = UBR,
.value = `read count normalised log`
)
hm %>% layer_point()
library(dplyr)
hm =
tidyHeatmap::N52 %>%
tidyHeatmap::heatmap(
.row = symbol_ct,
.column = UBR,
.value = `read count normalised log`
)
hm %>% layer_square()
library(dplyr)
hm =
tidyHeatmap::N52 %>%
tidyHeatmap::heatmap(
.row = symbol_ct,
.column = UBR,
.value = `read count normalised log`
)
hm %>% layer_diamond()
# }
Run the code above in your browser using DataLab