This function builds a test vector of up to 1000 names.
Examples
x <- get_example_names( n=10 )
pn <- parse_names( x )
head( pn )
#> name salutation first_name middle_name last_name suffix status
#> 1 Michael VanDerhoef MICHAEL VANDERHOEF
#> 2 CHAD A WILKINS CHAD A WILKINS
#> 3 BARRY J BARRESI OD OD BARRY J BARRESI
#> 4 STEPHANIE FLOM STEPHANIE FLOM
#> 5 JOHN HARBUCK JOHN HARBUCK
#> 6 ANNE BOURDON ANNE BOURDON
#> gender gender_confidence
#> 1 M 99.5
#> 2 M 100
#> 3 M 100
#> 4 F 100
#> 5 M 99.6
#> 6 F 100
# micro-benchmark performance
x <- get_example_names( n=1000 )
start_time <- Sys.time()
pn <- parse_names( x )
end_time <- Sys.time()
end_time - start_time
#> Time difference of 6.170809 secs