Analyzes text based on average word length and returns an animal picture representing language complexity.

animalType(species, text)

Arguments

species

A string representing species, must be one of "Duck", "Monkey", "Giraffe", "Whale"

text

A string of characters to be analyzed

Value

A jpeg of an animal

Examples

text <- "I like pie"
animal_rep <- animalType(animalClassifier(text), text)

text <- "Pie's abundantly awesome"
species <- "Duck"
animal_rep <- animalType(species, text)