diff --git a/DESCRIPTION b/DESCRIPTION index 1d7cf975..11d02e31 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,6 +1,6 @@ Package: miaViz Title: Microbiome Analysis Plotting and Visualization -Version: 1.9.4 +Version: 1.9.5 Authors@R: c(person(given = "Tuomas", family = "Borman", role = c("aut", "cre"), email = "tuomas.v.borman@utu.fi", diff --git a/R/plotCCA.R b/R/plotCCA.R index dbcd2341..1ad2eec3 100644 --- a/R/plotCCA.R +++ b/R/plotCCA.R @@ -429,17 +429,11 @@ setMethod("plotRDA", signature = c(object = "matrix"), } } - # Create labels for axis - xlab <- paste0(dimred, " 1") - ylab <- paste0(dimred, " 2") - # Create a list to return result <- list( plot = plot, ellipse_data = ellipse_data, - vector_data = vector_data, - xlab = xlab, - ylab = ylab + vector_data = vector_data ) return(result) } @@ -584,7 +578,5 @@ setMethod("plotRDA", signature = c(object = "matrix"), } } - # Add axis labels - plot <- plot + xlab(plot_data$xlab) + ylab(plot_data$ylab) return(plot) }