Krok 3: Organizace textu

Dolování textu metodou Bag-of-Words v R

Ted Kwartler

Instructor

Organizace textu pomocí qdap

# qdap cleaning function
qdap_clean <- function(x) {
  x <- replace_abbreviation(x)
  x <- replace_contraction(x)
  x <- replace_number(x)
  x <- replace_ordinal(x)
  x <- replace_symbol(x)
  x <- tolower(x)
  return(x)
}

Organizace textu pomocí tm

# tm cleaning function
tm_clean <- function(corpus) {
  tm_clean <- tm_map(corpus, removePunctuation)
  corpus <- tm_map(corpus, stripWhitespace)
  corpus <- tm_map(corpus, removeWords,
              c(stopwords("en"), "Google", "Amazon", "company"))
  return(corpus)
}

Čištění korpusů

Pojďme si procvičit!

Dolování textu metodou Bag-of-Words v R