From 4b1ab9fc9a8560594897b9e1ad60c4300a798ad4 Mon Sep 17 00:00:00 2001 From: Elias Projahn Date: Sun, 14 Nov 2021 17:49:16 +0100 Subject: [PATCH] correlation: Fix data preparation --- R/correlation.R | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/R/correlation.R b/R/correlation.R index bfcdddc..e0057a8 100644 --- a/R/correlation.R +++ b/R/correlation.R @@ -31,10 +31,10 @@ correlation <- function(preset, use_positions = FALSE, progress = NULL) { .(gene, distance) ] } - } - data <- merge(data, species_data, all.x = TRUE) - setnames(data, "distance", species_id) + data <- merge(data, species_data, all.x = TRUE) + setnames(data, "distance", species_id) + } # Transpose to the desired format. data <- transpose(data, make.names = "gene")