saving work

This commit is contained in:
Tanushree Tunstall 2020-10-30 13:30:58 +00:00
parent ff1de17718
commit 9921f92fba
4 changed files with 4 additions and 4 deletions

0
boxplot.R Normal file → Executable file
View file

0
boxplot_linear.R Normal file → Executable file
View file

8
boxplot_log.R Normal file → Executable file
View file

@ -18,8 +18,8 @@ metadata_all$mosaic[metadata_all$adult==1 & metadata_all$age<=18]
#============= #=============
# Output: # Output:
#============= #=============
outfile_bp = paste0("boxplots_log_", my_samples, ".pdf") outfile_bp_log = paste0("boxplots_log_", my_samples, ".pdf")
output_boxplot = paste0(outdir_plots, outfile_bp); output_boxplot output_boxplot_log = paste0(outdir_plots, outfile_bp_log); output_boxplot_log
#=============================== #===============================
# data assignment for plots # data assignment for plots
@ -60,8 +60,8 @@ lf_fp_serum$timepoint = as.factor(lf_fp_serum$timepoint)
lf_fp_serum$obesity = as.factor(lf_fp_serum$obesity) lf_fp_serum$obesity = as.factor(lf_fp_serum$obesity)
######################################################################## ########################################################################
cat("Output plots will be in:", output_boxplot) cat("Output plots will be in:", output_boxplot_log)
pdf(output_boxplot, width = 20, height = 15) pdf(output_boxplot_log, width = 20, height = 15)
#======================================================================= #=======================================================================
# NPA # NPA

0
summary_stats_time_group_serum.R Normal file → Executable file
View file