inv.Rd
`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)
TO BE PRECISED