From 8b96bb872dcd8c6488d50980ebb21bff3fc3d9c7 Mon Sep 17 00:00:00 2001 From: Jesse Marks <32715488+jaamarks@users.noreply.github.com> Date: Tue, 12 Dec 2023 15:20:54 -0500 Subject: [PATCH] Update unzip_extract_stats.R edit spacing - to get push to Docker Hub to work. --- multiqc_extract/v1.0/unzip_extract_stats.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/multiqc_extract/v1.0/unzip_extract_stats.R b/multiqc_extract/v1.0/unzip_extract_stats.R index eb0a53b..e0becc7 100644 --- a/multiqc_extract/v1.0/unzip_extract_stats.R +++ b/multiqc_extract/v1.0/unzip_extract_stats.R @@ -130,9 +130,9 @@ for (zip_file in zip_files){ ############################### # WRITE/APPEND TO CSV ############################### + output_data <- c(max_row + 1,zip_file, sample_name, total_sequences, read_length, max_per_seq_qual, per_base_seq_qual, seq_dup_level, per_base_n_content) column_names <- c("row_number","zip_file","sample_name","total_sequences","read_length","max_per_sequence_quality_scores","per_base_seq","sd_per_base_seq","sequence_duplication_levels","sd_sequence_duplication_levels","average_per_base_n_content","sd_per_base_n_content") - row <- data.frame(matrix(ncol = length(column_names), nrow=0)) colnames(row) <- column_names