example("phenoFinder")
pdat1 <- pData(esets2[[1]])
pdat2 <- pData(esets2[[2]])
## Use phenoDist() to calculate a weighted distance matrix
distmat <- phenoDist(as.matrix(pdat1), as.matrix(pdat2))
## Note outliers with identical clinical data, these are probably the same patients:
graphics::boxplot(distmat)
Run the code above in your browser using DataLab