cbk.lame.colMeans: Return mean of each chem
In misasa/chelyabinsk: Express geochemical datasets

Description Usage Arguments Value Examples

Return mean of each chem

1	cbk.lame.colMeans(pmlame, stonify_regexp = "@[[:digit:]]+$")

`pmlame`	A pmlame with row of stone and column of chem [g/g].
`stonify_regexp`	A regexp string to be stripped off to stonefy analyses. Matched string will be stripped off from acqlist to have stonelist.

A pmlame with mean value of each column

pmlfile <- cbk.path("20130528105235-594267.pml")
message(sprintf("The pmlfile is located at |%s|.",pmlfile))
pmlame  <- cbk.read.casteml(pmlfile)
pmlame0 <- cbk.lame.regulate(pmlame,mean=TRUE,error=FALSE,extra=FALSE)
pmlame1 <- cbk.lame.colMeans(pmlame0)