An all-in-one R package for the assessment of linguistic matching and/or accommodation.
Download R from r-project.org, then install the package from an R console:
Release (version 1.0.6)
install.packages("lingmatch")
Development (version 1.0.7)
# install.packages("remotes")
remotes::install_github("miserman/lingmatch")
And load the package:
library(lingmatch)
Can make a quick comparison between two bits of text; by default this will give the cosine similarity between raw word-count vectors:
lingmatch("First text to look at.", "Text to compare that text with.")
Or, given a vector of texts:
text = c(
"Why, hello there! How are you this evening?",
"I am well, thank you for your inquiry!",
"You are a most good at social interactions person!",
"Why, thank you! You're not all bad yourself!"
)
Process the texts in one step:
# with a dictionary
inquirer_cats = lma_process(text, dict = "inquirer", dir = "~/Dictionaries")
# with a latent semantic space
glove_vectors = lma_process(text, space = "glove", dir = "~/Latent Semantic Spaces")
Or process the texts step by step, then measure similarity between each:
dtm = lma_dtm(text)
dtm_weighted = lma_weight(dtm)
dtm_categorized = lma_termcat(dtm_weighted, lma_dict(1:9))
similarity = lma_simets(dtm_categorized, metric = "canberra")
Or do that within a single function call:
similarity = lingmatch(
text, weight = "frequency", dict = lma_dict(1:9), metric = "canberra"
)$sim
Or, if you want a standard form (as in this example), specify a default:
similarity = lingmatch(text, type = "lsm")$sim
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.