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