R/post_process_master_output.R

In naglemi/mtmcskat: Multi-Threaded Monte Carlo Sequence Kernel Association Test (MTMC-SKAT)

post_process_master_output <- function(master_output){
  master_output <- data.frame(master_output)
  colnames(master_output) <- c("Chr", "position", "SKAT_p-val", "SKAT_p-val_resampled")
  master_output$`SKAT_p-val` <- as.numeric(as.character(master_output$`SKAT_p-val`))
  master_output$`SKAT_p-val_resampled` <- as.numeric(as.character(master_output$`SKAT_p-val_resampled`))
  master_output
}