vegtable (version 0.1.8)

cover_trans: Convert cover scales to percent cover

Description

Convert values of a categorical cover scale to percentage values.

This function requires as input a coverconvert object which contains the conversion tables.

Usage

# S4 method for character,coverconvert
cover_trans(x, conversion, from = NULL, rule = "top", zeroto = 0.1, ...)
# S4 method for factor,coverconvert
cover_trans(x, conversion, ...)
# S4 method for numeric,coverconvert
cover_trans(x, conversion, ...)
# S4 method for vegtable,missing
cover_trans(x, to, replace = FALSE, rule = "top", zeroto = 0.1, ...)

Value

Either a vector or a vegtable object.

Arguments

x

Either a factor or character vector, or a vegtable object.

conversion

An object of class vegtable.

from

Scale name of values in x as character value.

rule

A character value indicating the rule applied for cover transformation. Three rules are implemented for transformation, either top (values transformed to the top of the range), middle (transformation at the midpoint), and bottom (conversion at the lowest value of the range). In the later case, if the bottom is zero cover, a fictive bottom value can be set by 'zeroto'

zeroto

Value set for transformation of classes with bottom at 0% cover.

...

Further arguments passed from or to other methods.

to

Name of the column in slot samples for writing converted values.

replace

Logical value indicating whether existing cover values should be replaced by the new computed values or not.

Author

Miguel Alvarez

Examples

## Check the available scales
summary(Kenya_veg@coverconvert)

## Conversion by default 'top' rule
Kenya_veg <- cover_trans(Kenya_veg, to = "percent")
summary(as.factor(Kenya_veg@samples$percent))

## Conversion by 'middle' rule
Kenya_veg <- cover_trans(Kenya_veg, to = "percent", rule = "middle", replace = TRUE)
summary(as.factor(Kenya_veg@samples$percent))

## Conversion by 'bottom' rule
Kenya_veg <- cover_trans(Kenya_veg, to = "percent", rule = "bottom", replace = TRUE)
summary(as.factor(Kenya_veg@samples$percent))