library(rflashtext)
processor <- keyword_processor$new()
processor$add_keys_words(keys = c("NY", "LA"), words = c("New York", "Los Angeles"))
processor$contain_keys(keys = "NY")
processor$get_words(keys = "LA")
processor$find_keys(sentence = "I live in LA but I like NY")
processor$replace_keys(sentence = "I live in LA but I like NY")
## ------------------------------------------------
## Method `keyword_processor$new`
## ------------------------------------------------
library(rflashtext)
processor <- keyword_processor$new(ignore_case = FALSE, word_chars = letters)
processor
## ------------------------------------------------
## Method `keyword_processor$show_attrs`
## ------------------------------------------------
library(rflashtext)
processor <- keyword_processor$new()
processor$add_keys_words(keys = c("NY", "LA"), words = c("New York", "Los Angeles"))
processor$show_attrs(attrs = "dict_size")
processor$show_attrs(attrs = "dict")
## ------------------------------------------------
## Method `keyword_processor$add_keys_words`
## ------------------------------------------------
library(rflashtext)
processor <- keyword_processor$new()
processor$add_keys_words(keys = c("NY", "LA"), words = c("New York", "Los Angeles"))
correct <- processor$add_keys_words(keys = c("NY", "CA"), words = c("New York City", "California"))
# To check if there are duplicate keys
correct
## ------------------------------------------------
## Method `keyword_processor$contain_keys`
## ------------------------------------------------
library(rflashtext)
processor <- keyword_processor$new()
processor$add_keys_words(keys = c("NY", "LA"), words = c("New York", "Los Angeles"))
processor$contain_keys(keys = c("NY", "LA", "TX"))
## ------------------------------------------------
## Method `keyword_processor$get_words`
## ------------------------------------------------
library(rflashtext)
processor <- keyword_processor$new()
processor$add_keys_words(keys = c("NY", "LA"), words = c("New York", "Los Angeles"))
processor$get_words(keys = c("NY", "LA", "TX"))
## ------------------------------------------------
## Method `keyword_processor$find_keys`
## ------------------------------------------------
library(rflashtext)
processor <- keyword_processor$new()
processor$add_keys_words(keys = c("NY", "LA"), words = c("New York", "Los Angeles"))
words_found <- processor$find_keys(sentence = "I live in LA but I like NY")
do.call(rbind, words_found)
## ------------------------------------------------
## Method `keyword_processor$replace_keys`
## ------------------------------------------------
library(rflashtext)
processor <- keyword_processor$new()
processor$add_keys_words(keys = c("NY", "LA"), words = c("New York", "Los Angeles"))
new_sentence <- processor$replace_keys(sentence = "I live in LA but I like NY")
new_sentence
Run the code above in your browser using DataLab