4.9 Saving Results

results_dir <- file.path(git_root, "results")
dir.create(results_dir, showWarnings = FALSE)

write.table(
  res_df,
  file      = file.path(results_dir, "DE_treatment_vs_control_all.tsv"),
  sep       = "\t",
  quote     = FALSE,
  row.names = FALSE
)

write.table(
  res_sig,
  file      = file.path(results_dir, "DE_treatment_vs_control_significant.tsv"),
  sep       = "\t",
  quote     = FALSE,
  row.names = FALSE
)

cat("Results saved to:", results_dir, "\n")

## Results saved to: /Users/jasge/Documents/GitHub/dsp_transcriptomics_training/results

---