reformatted to generate outfile_name for flu stats

This commit is contained in:
Tanushree Tunstall 2020-10-26 16:12:51 +00:00
parent 61fbb2f8d6
commit 6e54f339d1
3 changed files with 17 additions and 13 deletions

View file

@ -20,10 +20,12 @@ rm(colnames_sam_df, expected_rows_sam_lf
rm(pivot_cols)
my_sample_type = "npa"
#=============
# Output: unpaired analysis of time for npa
#=============
stats_time_unpaired_flu_npa = paste0(outdir_stats, "flu_stats_time_unpaired_npa.csv")
outfile_name = paste0("flu_stats_time_unpaired_", my_sample_type, ".csv")
flu_stats_time_unpaired = paste0(outdir_stats, outfile_name)
#%%========================================================
# data assignment for stats
@ -316,5 +318,5 @@ colnames(combined_unpaired_stats_f)
#******************
# write output file
#******************
cat("UNpaired stats for groups will be:", stats_time_unpaired_flu_npa)
write.csv(combined_unpaired_stats_f, stats_time_unpaired_flu_npa, row.names = FALSE)
cat("UNpaired stats for groups will be:", flu_stats_time_unpaired)
write.csv(combined_unpaired_stats_f, flu_stats_time_unpaired, row.names = FALSE)