# Load example objects
examples <- readRDS(system.file("extdata", "example_objects.rds", package = "quallmer"))
coded <- examples$example_coded_sentiment
# Extract inputs
texts <- inputs(coded)
texts
Run the code above in your browser using DataLab