This function accepts input from slab() along with a vector of horizon names, and returns a data.frame of the most likely horizon boundaries.

get.ml.hz(x, o.names)

Arguments

x

output from slab

o.names

an optional character vector of horizon designations that will be used in the final table

Details

This function is expecting that x is a data.frame generated by slab. If x was not generated by slab, then o.names is required.

Value

A dataframe with the following columns:

See also

slab

Examples

data(sp1)
depths(sp1) <- id ~ top + bottom

# normalize horizon names: result is a factor
sp1$name <- generalize.hz(sp1$name,
  new=c('O','A','B','C'),
  pat=c('O', '^A','^B','C'))

# compute slice-wise probability so that it sums to contributing fraction, from 0-150
a <- slab(sp1, fm= ~ name, cpm=1, slab.structure=0:150)

# generate table of ML horizonation
get.ml.hz(a, o.names=c('O','A','B','C'))