# \donttest{
# Simulate data
sim <- Simulate_bakRData(1000)
# Fit data with fast implementation
Fit <- bakRFit(sim$bakRData)
# L2FC(kdeg) heatmap matrix
L2FC_kdeg_heat <- Heatmap_kdeg(Fit$Fast_Fit)
# }
Run the code above in your browser using DataLab