speakerSplit function

Break and Stretch if Multiple Persons per Cell

Look for cells with multiple people and create separate rows for each person.

speakerSplit(
  dataframe,
  person.var = 1,
  sep = c("and", "&", ","),
  track.reps = FALSE
)

Arguments

• dataframe: A dataframe that contains the person variable.
• person.var: The person variable to be stretched.
• sep: The separator(s) to search for and break on. Default is: c("and", "&", ",")
• track.reps: logical. If TRUE leaves the row names of person variable cells that were repeated and stretched.

Returns

Returns an expanded dataframe with person variable stretched and accompanying rows repeated.

Examples

## Not run:

DATA$person <- as.character(DATA$person)
DATA$person[c(1, 4, 6)] <- c("greg, sally, & sam", 
    "greg, sally", "sam and sally")

speakerSplit(DATA)
speakerSplit(DATA, track.reps=TRUE)

DATA$person[c(1, 4, 6)] <- c("greg_sally_sam", 
    "greg.sally", "sam; sally")

speakerSplit(DATA, sep = c(".", "_", ";"))

DATA <- qdap::DATA  #reset DATA
## End(Not run)