wiff <- exampleWiff
tic <- getTIC(wiff)
# Plot the first 60 seconds of the total ion chromatgram using [ggplot2]
ggplot2::ggplot(tic,ggplot2::aes(x=time,y=intensity))+
ggplot2::geom_line(color="red")+
ggplot2::xlim(0,60)
Run the code above in your browser using DataLab