# NOT RUN {
directory <- data.frame(
page = c("71", "71"),
surname = c("ABOT ", " ABRCROMBIE"), forename = c("Wm.", "Alex"),
occupation = c("wine and spirit mercht", " bkr"),
addresses = c(
"depot -; 1820 London st. ; house, Mary hill.*",
"workshop,,12 &;Dixon st.; residence, Craigrownie, Cove.$ "
),
stringsAsFactors = FALSE
)
utils_format_directory_raw(directory, "1861-1862")
# }
Run the code above in your browser using DataLab