diff --git a/R/rc.get.xmcs.data.R b/R/rc.get.xmcs.data.R
index 38d2847..c7ae9fe 100644
--- a/R/rc.get.xmcs.data.R
+++ b/R/rc.get.xmcs.data.R
@@ -196,7 +196,7 @@ rc.get.xcms.data <- function(xcmsObj = NULL,
     filepaths <- xcmsObj@filepaths
     filenames <- basename(filepaths)
     phenotype <- xcmsObj@phenoData[, 1]
-    phenotype <- data.frame(sample.names = phenotype, filenames, filepaths)
+    phenotype <- data.frame(phenotype, filenames, filepaths)
     if (mslev == 2) {
       phenotype <- phenotype[1:(nrow(phenotype) / 2), ]
     }