I'm currently using the following script
library(sentimentr)
decpir <- read.csv("decpir.csv", header = TRUE, stringsAsFactors = FALSE)
results <- sentiment(decpir$Text)
I'd like to write the results of the analysis to a csv or excel file AND include the text that it analyzed. is this possible?