You signed in with another tab or window. Reload to refresh your session.You signed out in another tab or window. Reload to refresh your session.You switched accounts on another tab or window. Reload to refresh your session.Dismiss alert
plot(t1_scaled$x, t1_scaled$z, type="l", col="blue", xlab="Narrative Time", ylab="Emotional Valence", main = "Pride and PortraitV1 with Rolling Means")
t1_rolled
In running this code, I get the following message right at the end:
I have just run the following code in RStudio:
install.packages("syuzhet")
install.packages("zoo")
rm(list = ls())
library(syuzhet)
library(zoo)
t1 <- get_text_as_string(path_to_file = "Pride.txt")
get_sentiment(t1)
t1_sentences <- get_sentences(t1)
t1_sentiments <- get_sentiment(t1_sentences)
str(t1_sentiments)
head(t1_sentiments)
#t1_sentences[c(550)]
#options(max.print=1000000)
par(mar=c(2,2,1,1))
simple_plot(t1_sentiments, title = "Pride Sentiments")
t1_window <- round(length(t1_sentiments)*.1)
t1_rolled <- rollmean(t1_sentiments, k = t1_window)
t1_scaled <- rescale_x_2(t1_rolled)
plot(t1_scaled$x, t1_scaled$z, type="l", col="blue", xlab="Narrative Time", ylab="Emotional Valence", main = "Pride and PortraitV1 with Rolling Means")
t1_rolled
In running this code, I get the following message right at the end:
[986] 0.7185185 0.7185185 0.7191919 0.7239899 0.7267677
[991] 0.7313131 0.7302189 0.7348485 0.7389731 0.7388889
[996] 0.7414983 0.7425084 0.7404040 0.7395623 0.7382997
[ reached getOption("max.print") -- omitted 4345 entries ]
Can anyone suggest a modification to the code so that the getOption does not omit any entries and the data frame includes every single entry, please?
The text was updated successfully, but these errors were encountered: