resetEnv()
results<-mrbin(silent=TRUE,
parameters=list(dimension="2D",binwidth2D=1,binheight=4,cropHSQC="No",PCA="No",
PQNScaling="No",noiseRemoval="No",removeSolvent="No",verbose=TRUE,tryParallel=TRUE,
NMRfolders=c(system.file("extdata/1/12/pdata/10",package="mrbin"))))
cropNMR()
Run the code above in your browser using DataLab