R/diffDist.R

In RFLPtools: Tools to Analyse RFLP Data

Defines functions diffDist

Documented in diffDist

diffDist <- function(x, method = "euclidean", diag = FALSE, upper = FALSE, p = 2){ 
    x.diff <- t(diff(t(as.matrix(x)))) 
    res <- dist(x.diff, method = method, diag = diag, upper = upper, p = p)
    attr(res, "call") <- match.call()
    res
}

Try the RFLPtools package in your browser