diff_CKDEPIcr21_measured=mGFRadj-CKDEPIcr21,
diff_CKDEPIcysadj_measured=mGFRadj-CKDEPIcysadj,
diff_CKDEPIcrcys21_measured=mGFRadj-CKDEPIcrcys21,
diff_CKDEPIcysb2mbtpadj_measured=mGFRadj-CKDEPIcysb2mbtpadj,
diff_CKDEPI4mark_measured=mGFRadj-CKDEPI4mark,
diff_CGadj_measured=mGFRadj-CGadj,
diff_Cockcroft_measured=mGFRadj-Cockcroft
percentage_cys_cr=(CKDEPIcysadj-CKDEPIcr21)/CKDEPIcr21*100)
Body_plots Discrepency group,
master_30_group <- master %>% filter(eGFRCYS_lt_eGFRCRE_30==1)
master_30_group_male <- master_30_group %>% filter(male==1)
master_30_group_female <- master_30_group %>% filter(male==0)
Heat map diff_CKDEPIcr21_measured


Heat map diff_CKDEPIcysadj_measured


Heat map diff_CKDEPIcysb2mbtpadj_measured


Heat map diff_CKDEPI4mark_measured


Heat map diff_CGadj_measured


Heat map diff_Cockcroft_measured


Heat map diff_CKDEPIcrcys21_measured


Heat map diff_CKDEPIb2madj_measured


Correaltion BMI and TAI
