Substitute proper names/entities spaces with underscore in the text.

Source: R/entity_link.R

given a text and a vector of entities, it substitutes the spaces with underscores, so the entities are identified.

subs_ppn(text, entities, method = "normal")

Arguments

text

an input text

entities

an input vector, as exported by `extract_entity()`

Examples

texto_teste <- "José da Silva e Fulano de Tal foram, bla Maria Silva. E depois disso, bla Joaquim José da Silva Xavier no STF"
ppn <- texto_teste |> extract_entity(connectors("pt"), sw = gen_stopwords("pt"))
#> Error in ls2v(yaml::read_yaml(yaml_file_path)): could not find function "ls2v"
texto_teste |> subs_ppn(ppn)
#> Error: object 'ppn' not found
texto_teste |> subs_ppn(ppn, method = "loop")
#> Error: object 'ppn' not found
text <- texto_teste |> subs_ppn(ppn)
#> Error: object 'ppn' not found
texd
#> Error: object 'texd' not found