### Name: score_fun.cor
### Title: Scoring for MS/MS spectra Via correlation
### Aliases: score_fun.cor


### ** Examples

## Not run: 
##D score<-xcms:::score_fun.cor(rnorm(10), rnorm(10))
##D score
##D 
##D a<-abs(rnorm(5))
##D a[2]<-xcms:::ppmDev(a[2], 30)
##D score<-xmcs:::score_fun.cor()
##D score
## End(Not run)



