diff --git a/DESCRIPTION b/DESCRIPTION index c218b13..ed3ac1b 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -3,7 +3,7 @@ Type: Package Title: Performs shiny application on bfabric data Author: Christian Trachsel [cre, aut], Christian Panse [cre, aut] Maintainer: Christian Trachsel -Version: 0.1.49 +Version: 0.1.50 Description: provides access modules and functions to interact with the FGCZ's bfabric system. The package contains shiny applications, e.g., to allow the FGCZ user to automatically generate a certain set of queues for thermo instruments. diff --git a/R/rawFileQC.R b/R/rawFileQC.R index 45352d1..4505d30 100644 --- a/R/rawFileQC.R +++ b/R/rawFileQC.R @@ -200,9 +200,9 @@ figure <- ggplot(x, aes(x = StartTime, y = IonInjectionTimems)) + geom_hline(data = maxtimes, aes(yintercept = maxima), colour = "red3", linetype = "longdash") + + geom_point(shape = ".") + geom_line(stat = "smooth", method = "gam", formula = y~s(x), colour = "deepskyblue3", se = FALSE) + facet_grid(MSOrder~., scales = "free") + - geom_point(shape = ".") + scale_y_continuous(breaks = scales::pretty_breaks((n = 8))) + scale_x_continuous(breaks = scales::pretty_breaks((n = 8))) + labs(title = "Injection time plot", subtitle = "Plotting injection time against retention time for MS and MSn level") +