diff --git a/chromatoR/app.R b/chromatoR/app.R
index d5a9310..714ee5d 100644
--- a/chromatoR/app.R
+++ b/chromatoR/app.R
@@ -220,7 +220,7 @@ server <- function(input, output) {
       
       ranPeaks<-range(picks$rows)
       
-      obj$plot<-obj_ab@traceMatrix %>% as.data.frame() %>% rename(A=V1,C=V2,G=V3,T=V4) %>% add_column(rows=1:nrow(.)) %>% 
+      obj$plot<-obj_ab@traceMatrix %>% as.data.frame() %>% dplyr::rename(A=V1,C=V2,G=V3,T=V4) %>% add_column(rows=1:nrow(.)) %>% 
         filter(rows >= ranPeaks[1] & rows <= ranPeaks[2]) %>% gather(Base, Value, -rows) %>% 
         mutate(Base=factor(Base, levels=c("G","A","T","C"))) %>% 
         ggplot(aes(rows, Value))+