powered by
HMdata
clr(x, ...)## S3 method for class 'HMdata': clr(x, ...)
## S3 method for class 'HMdata': clr(x, ...)
fname <- system.file("Major.csv",package="provenance") Major <- read.HMdata(fname) clrdat <- clr(Major)$x diss <- dist(clrdat) plot(getMDS(diss,classical=TRUE))
Run the code above in your browser using DataLab