powered by
SPECT.drive(Xamp, DT = 0.008, NEW = TRUE, STAMP = NULL)
data(CE1) ######### Xamp = CE1$y[CE1$x>5.443754 & CE1$x<5.615951] Xamp = CE1$y plot(Xamp, type='l') DT = CE1$dt SPECT.drive(Xamp, DT = DT, NEW = TRUE, STAMP = NULL)
Run the code above in your browser using DataLab