`inv()` tests if i in names of x. If Test is true calculate return 1 - x[[i]] Else return NULL (and so can be used not to add a column to a data.frame Called in `calculate_damaging()`.

inv(x, i)

Arguments

x

TO BE PRECISED

i

TO BE PRECISED

Value

TO BE PRECISED