TBI info

library(plotly)

## Loading required package: ggplot2

## 
## Attaching package: 'plotly'

## The following object is masked from 'package:ggplot2':
## 
##     last_plot

## The following object is masked from 'package:stats':
## 
##     filter

## The following object is masked from 'package:graphics':
## 
##     layout

library(heatmaply)

## Warning: package 'heatmaply' was built under R version 4.0.3

## Loading required package: viridis

## Loading required package: viridisLite

## 
## ======================
## Welcome to heatmaply version 1.1.1
## 
## Type citation('heatmaply') for how to cite the package.
## Type ?heatmaply for the main documentation.
## 
## The github page is: https://github.com/talgalili/heatmaply/
## Please submit your suggestions and bug-reports at: https://github.com/talgalili/heatmaply/issues
## Or contact: <tal.galili@gmail.com>
## ======================

TBI<- read.csv("C:/Users/u6032404/OneDrive/backup 9.9.19/MJ/heatmap/First.csv",header = T)


 cc<-plot_ly(z = ~TBI$Value, 
        x = ~TBI$First, 
        y = ~TBI$Second, 
        type = "heatmap")%>% 
  colorbar(title = 'Hazard Ratio',
           limits = c(0,2), 
           tickmode = 'array', 
           tickvals = c(0,0.5,1 ,1.5,2)) %>%
  layout(title = "TBI Burn",
         xaxis = list(title = '',
                      tickmode = 'array'
         ),
         yaxis = list(title = '',
                      tickmode = 'array'
         ))
 
 cc