Audit site / station information in the master table – sanity v1.

Flags rows with the FIRST applicable reason: StationVs30 NA, below low cutoff, or above high cutoff. Coord checks live in auditDistances.

Usage

auditSite(DT, vs30Low = 50, vs30High = 3000)

Arguments

DT

master data.table.

vs30Low

lower physical cutoff for StationVs30 (m/s).

vs30High

upper physical cutoff (m/s).

Value

data.table of flagged rows with column Reason.

Examples

x <- data.table::data.table(StationVs30 = c(30, 760, NA))
auditSite(x)
#>    StationVs30  Reason
#>          <num>  <char>
#> 1:          30 vs30Low
#> 2:          NA  vs30NA