library(gnafr)
con <- gnaf_connect(":memory:")
gnaf_init(con)
gnaf_add(con, data.table::data.table(
address_label = "10 MUSGRAVE ROAD, RED HILL QLD 4059",
number_first = 10L, street_name = "MUSGRAVE", street_type = "ROAD",
locality_name = "RED HILL", state = "QLD", postcode = 4059L
))
results <- gnaf_match(
c("10 Musgrave Road, Red Hill QLD 4059", "1 Nowhere Street, Fakesuburb QLD 9999"),
con, verbose = FALSE
)
results[, .(input_raw, matched, match_status, total_score)] input_raw matched match_status total_score
<char> <lgcl> <char> <int>
1: 10 Musgrave Road, Red Hill QLD 4059 TRUE matched 100
2: 1 Nowhere Street, Fakesuburb QLD 9999 FALSE no_candidate NA