marcelcosta/chromatoR
1
0
Fork 0
Code Issues 1 Pull Requests Projects Releases Wiki Activity

Explicitar el paquet dplyr per a rename.

Browse Source
This commit is contained in:
marcelcosta
2022-07-08 10:45:20 +02:00
parent 8d221d6898
commit cf8d95a695
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files
chromatoR/app.R
+1 -1
View File
@@ -220,7 +220,7 @@ server <- function(input, output) {
ranPeaks<-range(picks$rows) 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) %>% filter(rows >= ranPeaks[1] & rows <= ranPeaks[2]) %>% gather(Base, Value, -rows) %>%
mutate(Base=factor(Base, levels=c("G","A","T","C"))) %>% mutate(Base=factor(Base, levels=c("G","A","T","C"))) %>%
ggplot(aes(rows, Value))+ ggplot(aes(rows, Value))+