results<-mrbin(silent=TRUE,setDefault=FALSE,parameters=list(dimension="2D",
binRegion=c(8,1,15,140),binwidth2D=0.2,binheight=4,solventRegion=c(5.5,4.2),
PQNScaling="No",noiseRemoval="Yes",trimZeros="Yes",tryParallel=TRUE,
fixNegatives="No",logTrafo="No",PCA="No",signal_to_noise2D=10,
NMRfolders=c(system.file("extdata/1/12/pdata/10",package="mrbin"),
system.file("extdata/2/12/pdata/10",package="mrbin"))))
plotResults(results)
Run the code above in your browser using DataLab