Explicitar el paquet de rename

chromatoR/app.R

@@ -94,7 +94,7 @@ server <- function(input, output) {
                            Tpeaks[Tpeaks[,2] > peakthr,], 
                            Cpeaks[Cpeaks[,2] > peakthr,])
       
-      peakCusMatrix<-peakCusMatrix %>% as.data.frame() %>% rename(Int=V2) %>% group_by(indexes) %>% summarise(Int=max(Int)[1])
+      peakCusMatrix<-peakCusMatrix %>% as.data.frame() %>% dplyr::rename(Int=V2) %>% group_by(indexes) %>% summarise(Int=max(Int)[1])
       peakCusMatrix<-as.matrix(peakCusMatrix)
 
       pos1<-redDiffs(peakCusMatrix, input$dist1)