Random names
The package provides a programmatic interface to the Random Names API and returns 'sample' user data including fake first/last names, emails, SSNs, addresses, avatars and more. Search queries can be further filtered by gender and nationality.
Installation
install.packages("randNames")
or for the development version
devtools::install_github("karthik/randNames")
It queries a random name API and returns a whole bunch of useful fields.
library(dplyr)
library(randNames)
20 %>%
rand_names %>%
select(first = name.first, last = name.last)
#> Source: local data frame [20 x 2]
#>
#> first last
#> (chr) (chr)
#> 1 nalan demirbaş
#> 2 danielle lord
#> 3 nurdan sepetçi
#> 4 julie miles
#> 5 vedat akyürek
#> 6 doris jimenez
#> 7 cícero pinto
#> 8 salvador brooks
#> 9 florian leclercq
#> 10 wyatt harris
#> 11 caroline christensen
#> 12 علی رضا نكو نظر
#> 13 megan mitchell
#> 14 anthony ennis
#> 15 bryan cook
#> 16 jessie tucker
#> 17 mia ryan
#> 18 luis legrand
#> 19 iolene barbosa
#> 20 line david
Filter by nationality
15 %>%
# Available nationalities: AU, BR, CA, CH, DE, DK, ES, FI, FR, GB, IE, IR, NL, NZ, TR, US
# You can specify multiple nationalities. e.g. "gb, us"
rand_names(nationality = "GB") %>%
select(name.first, name.last)
#> Source: local data frame [15 x 2]
#>
#> name.first name.last
#> <chr> <chr>
#> 1 susan hernandez
#> 2 hector jenkins
#> 3 caitlin rhodes
#> 4 gregory jennings
#> 5 vicki fuller
#> 6 christian gibson
#> 7 riley holland
#> 8 ronald boyd
#> 9 sam jimenez
#> 10 ivan armstrong
#> 11 joey grant
#> 12 alice lawrence
#> 13 austin davies
#> 14 florence ward
#> 15 ruben meyer
Filter by gender
library(randNames)
15 %>%
rand_names(gender = "female") %>%
select(name.first, name.last)
#> Source: local data frame [15 x 2]
#>
#> name.first name.last
#> <chr> <chr>
#> 1 neline koebrugge
#> 2 kimberly marshall
#> 3 هلیا سلطانی نژاد
#> 4 zaza van vark
#> 5 heloísa moura
#> 6 andrea white
#> 7 maëline joly
#> 8 claudia santiago
#> 9 matilda lampo
#> 10 ruby jones
#> 11 nanna thomsen
#> 12 abigail wood
#> 13 lucile roux
#> 14 بیتا حیدری
#> 15 paige walker
Set seed
15 %>%
rand_names(seed = 'foobar') %>%
select(name.first, name.last)
#> Source: local data frame [15 x 2]
#>
#> name.first name.last
#> <chr> <chr>
#> 1 becky sims
#> 2 amelia anderson
#> 3 vilho lampinen
#> 4 maëlle robert
#> 5 kasper palo
#> 6 macit kılıççı
#> 7 alexis walker
#> 8 cléa rousseau
#> 9 allert thielen
#> 10 jasper li
#> 11 çetin adan
#> 12 ray cunningham
#> 13 lewis morris
#> 14 yann roche
#> 15 elli niskanen
Additional fields beyond first and last name
gender
email
registered"
dob
phone
cell
nat
name.title
name.first
name.last
location.street
location.city
location.state
location.postcode
login.username"
login.password
login.salt
login.md5
login.sha1
login.sha256
id.name
id.value
picture.large
picture.medium
picture.thumbnail