Esta funcion permite limpiar por completo las notas eliminando codigos y secciones irrelevantes. Verifica que el input sea un data frame con una columna llamada `contenido`.

limpieza_notas(datos, sinonimos = c())

Arguments

datos

Data frame donde estan almacenadas las notas y con la funcion extraccion_parrafos ya operada.

sinonimos

Una lista de character

Value

Un dataframe con el contenido limpio en la columna contenido_limpio

Examples


# \donttest{
datos <- extraer_noticias_max_res("inteligencia artificial", max_results= 150, subir_a_bd = FALSE)
#> Error in extraer_noticias_max_res("inteligencia artificial", max_results = 150,     subir_a_bd = FALSE): unused argument (subir_a_bd = FALSE)
datos <- extraccion_parrafos(datos)
#> Error in extraccion_parrafos(datos): could not find function "extraccion_parrafos"
datos_proc <- limpieza_notas(datos, sinonimos = c("IA", "AI"))
#> Error in limpieza_notas(datos, sinonimos = c("IA", "AI")): could not find function "limpieza_notas"
# }