From 9921f92fbadacafb8599099f2deb6b8a4fe2f7f2 Mon Sep 17 00:00:00 2001 From: Tanushree Tunstall Date: Fri, 30 Oct 2020 13:30:58 +0000 Subject: [PATCH] saving work --- boxplot.R | 0 boxplot_linear.R | 0 boxplot_log.R | 8 ++++---- summary_stats_time_group_serum.R | 0 4 files changed, 4 insertions(+), 4 deletions(-) mode change 100644 => 100755 boxplot.R mode change 100644 => 100755 boxplot_linear.R mode change 100644 => 100755 boxplot_log.R mode change 100644 => 100755 summary_stats_time_group_serum.R diff --git a/boxplot.R b/boxplot.R old mode 100644 new mode 100755 diff --git a/boxplot_linear.R b/boxplot_linear.R old mode 100644 new mode 100755 diff --git a/boxplot_log.R b/boxplot_log.R old mode 100644 new mode 100755 index 7864180..a2eec57 --- a/boxplot_log.R +++ b/boxplot_log.R @@ -18,8 +18,8 @@ metadata_all$mosaic[metadata_all$adult==1 & metadata_all$age<=18] #============= # Output: #============= -outfile_bp = paste0("boxplots_log_", my_samples, ".pdf") -output_boxplot = paste0(outdir_plots, outfile_bp); output_boxplot +outfile_bp_log = paste0("boxplots_log_", my_samples, ".pdf") +output_boxplot_log = paste0(outdir_plots, outfile_bp_log); output_boxplot_log #=============================== # 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) ######################################################################## -cat("Output plots will be in:", output_boxplot) -pdf(output_boxplot, width = 20, height = 15) +cat("Output plots will be in:", output_boxplot_log) +pdf(output_boxplot_log, width = 20, height = 15) #======================================================================= # NPA diff --git a/summary_stats_time_group_serum.R b/summary_stats_time_group_serum.R old mode 100644 new mode 100755