inst/examples/ex-scale.R

In tesselle/nexus: Sourcing Archaeological Materials by Chemical Composition

## Data from Aitchison 1986
data("hongite")

## Coerce to compositional data
coda <- as_composition(hongite)

## Center and scale
scaled <- scale(coda, center = TRUE, scale = TRUE)
mean(scaled)
head(scaled)