# NOT RUN {
# Data
word_embeddings <- word_embeddings_4
raw_data <- Language_based_assessment_data_8
# Pre-processing data for plotting
df_for_plotting <- textProjection(
words = raw_data$harmonywords,
word_embeddings = word_embeddings$harmonywords,
single_word_embeddings = word_embeddings$singlewords_we,
x = raw_data$hilstotal,
split = "mean",
Npermutations = 10,
n_per_split = 1
)
df_for_plotting
#' @seealso see \code{\link{textProjectionPlot}}
# }
Run the code above in your browser using DataLab