# NOT RUN {
theo_spectra <- simulate_theoretical_spectra(sequence = "LVRKDLQN",
charge = c(3, 5),
protection_factor = 100,
times = c(0.167, 5),
pH = 7.5,
temperature = 15,
n_molecules = 500,
time_step_const = 1,
use_markov = TRUE)
plot_spectra(theo_spectra)
# }
Run the code above in your browser using DataLab