use("polmineR")
s_attributes("GERMAPARLMINI")
s_attributes("GERMAPARLMINI", "date") # dates of plenary meetings
s_attributes("GERMAPARLMINI", s_attribute = c("date", "party"))
s_attributes(corpus("GERMAPARLMINI"))
p <- partition("GERMAPARLMINI", date = "2009-11-10")
s_attributes(p)
s_attributes(p, "speaker") # get names of speakers
# Get s-attributes occurring in a call
s_attributes(quote(grep("Merkel", speaker)), corpus = "GERMAPARLMINI")
s_attributes(quote(speaker == "Angela Merkel"), corpus = "GERMAPARLMINI")
s_attributes(quote(speaker != "Angela Merkel"), corpus = "GERMAPARLMINI")
s_attributes(
quote(speaker == "Angela Merkel" & date == "2009-10-28"),
corpus = "GERMAPARLMINI"
)
# Get s-attributes from quosure
s_attributes(
rlang::new_quosure(quote(grep("Merkel", speaker))),
corpus = "GERMAPARLMINI"
)
Run the code above in your browser using DataLab