A method to calculate on shapes or on Coo truss measurements, which is all pairwise combinations of euclidean distances
a shape or an Ldk object
a named numeric or matrix
Mainly implemented for historical/didactical reasons.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
# example on a single shape data(shapes) cat <- coo_sample(shapes, 6) truss(cat) # example on wings dataset data(wings) tx <- truss(wings) dim(tx) # we normalize and plot an heatmap txn <- apply(tx$coe, 2, .normalize) # heatmap(txn) txp <- PCA(tx, scale. = TRUE, center=TRUE, fac=wings$fac) plot(txp, 1)