remove $

fgcz · Mar 19, 2021 · ced9a70 · ced9a70
1 parent 194531e
commit ced9a70
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/rawDiag.R b/R/rawDiag.R
@@ -1189,7 +1189,7 @@ PlotMzDistribution <- function(x, method='trellis'){
 PlotMassDistribution <- function(x, method = 'trellis'){ 
   res <- x %>% dplyr::filter_at(vars("MSOrder"), any_vars(. == "Ms2")) %>% 
     dplyr::select_at(vars("ChargeState", "PrecursorMass", "filename"))
-  res$deconv <-  round((res$PrecursorMass -1.00782) * res$ChargeState, 0)$
+  res$deconv <-  round((res$PrecursorMass -1.00782) * res$ChargeState, 0)
   res <- dplyr::mutate_at(res, vars("ChargeState"), list(~ factor(.)))  
   #res <- dplyr::mutate_at(res, vars("ChargeState"), funs(factor(.)))