diff --git a/NAMESPACE b/NAMESPACE
index e4ab4e46..9344d6e4 100644
--- a/NAMESPACE
+++ b/NAMESPACE
@@ -245,7 +245,7 @@ export(PerformROIExtraction)
 export(PerformSignalDriftCorrection)
 export(PerformVoteCounting)
 export(Plot.Permutation)
-export(Plot.sampletrend)
+export(Plot.sample.trend)
 export(PlotANOVA)
 export(PlotANOVA2)
 export(PlotASCA.Permutation)
@@ -458,7 +458,7 @@ export(plotMSfeature)
 export(plotMirror)
 export(plotProfile)
 export(plotSingleTIC)
-export(plot_dist)
+export(Plot.sample.dist)
 export(processMSMSupload)
 export(savePeakListMetaData)
 export(setInclusionDataSets)
diff --git a/R/batch_effect_utils.R b/R/batch_effect_utils.R
index 360ae309..0b2931b9 100644
--- a/R/batch_effect_utils.R
+++ b/R/batch_effect_utils.R
@@ -747,7 +747,7 @@ PlotPCA.overview <- function(mSetObj, imgName, format="png", dpi=default.dpi, wi
 #'License: GNU GPL (>= 2)
 #'@export
 #'
-plot.sample.trend <- function(mSetObj, imgName, format="png", dpi=default.dpi, width=NA,method){
+Plot.sample.trend <- function(mSetObj, imgName, format="png", dpi=default.dpi, width=NA,method){
   
   #mSetObj <- .get.mSet(mSetObj)
   
@@ -797,7 +797,7 @@ plot.sample.trend <- function(mSetObj, imgName, format="png", dpi=default.dpi, w
 #'@param width width
 #'@param dpi dpi
 #'@export
-plot.sample.dist <- function(mSetObj=NA, imgName,format="png", width=NA, dpi=default.dpi){
+Plot.sample.dist <- function(mSetObj=NA, imgName,format="png", width=NA, dpi=default.dpi){
   library(ggplot2)
   imgName = paste(imgName, "dpi", dpi, ".", format, sep="");
   if(is.na(width)){