GetCorrelation for methylbaseDB does not accept methods other than 'pearson'

[alexg9010]

Error:

library(methylKit)

?getCorrelation

data("methylKit")

mdb <- makeMethylDB(methylBase.obj)

lapply(c("pearson", "kendall", "spearman"), function(x) getCorrelation(methylBase.obj, method = x))
lapply(c("pearson", "kendall", "spearman"), function(x) getCorrelation(mdb, method = x))

Fix at

methylKit/R/methylDBFunctions.R

Lines 885 to 886 in 4735b6f

	setMethod("getCorrelation", "methylBaseDB",
	function(object,method,plot,nrow=2e6){

:

setMethod("getCorrelation", "methylBaseDB",
          function(object,method = c("pearson", "kendall", "spearman"),plot,nrow=2e6){