vanDeemter(col, ext, dead, length, A, B, C, Foley=FALSE, GG=FALSE,
    do.plot=TRUE)readChrom,
 processPeak,
 vanDeemterAlternativeggmetoxi <- vanDeemter(col = parameters_col_metoxi, ext = parameters_ext,
              dead = parameters_dead, length = 150, A = 6, B = 200, C = 0.04,
              GG = TRUE, Foley = FALSE, do.plot = TRUE)
foleymetoxi <- vanDeemter(col = parameters_col_metoxi, ext = parameters_ext,
              dead = parameters_dead, length = 150, A = 6, B = 200, C = 0.04,
              GG = FALSE, Foley = TRUE, do.plot = TRUE)
Run the code above in your browser using DataLab