Compare two language domains
textDomainCompare(train_language, assess_language)
List with similarity scores: overlapp_percentage, test_recall_percentage and cosine_similarity
if (FALSE) { # \dontrun{
train_language <- textTokenizeAndCount(Language_based_assessment_data_8["harmonytexts"])
assess_language <- textTokenizeAndCount(Language_based_assessment_data_8["satisfactiontexts"])
textDomainCompare(train_language, assess_language)
} # }