matchTolerance: Helper function for value matching with tolerance
In 0liver0815/onc-crmpack-test: Object-Oriented Implementation of CRM Designs

Description Usage Arguments Value Functions Examples

This is a modified version of match that supports tolerance.

1
2
3

matchTolerance(x, table)

x %~% table

`x`	the values to be matched
`table`	the values to be matched against

A vector of the same length as x or empty vector if table is empty.

%~%: Helper function for checking inclusion in a table with tolerance

myDose <- c(rep(0.030, 6), rep(0.050, 3), rep(0.075, 4), rep(0.1, 9), rep(0.15, 7))
doseGrid <- seq(from = .025, to = .15, by = .005)

myDose %in% doseGrid
matchTolerance(myDose, doseGrid)
myDose %~% doseGrid

matchTolerance(c(myDose, 500), doseGrid)
c(myDose, 500) %~% doseGrid