ac_plot_lda_tune() gera um gráfico de linha da perplexidade (ou outras
métricas) em função do número de tópicos k, auxiliando na escolha do k
ideal para o modelo LDA.
Arguments
- tune_result
Tibble retornado por
ac_lda_tune().- title
Título. Padrão:
NULL.- ...
Ignorado.
Examples
# \donttest{
# Corpus sintético com dois blocos tematicos
df <- data.frame(
id = paste0("d", 1:8),
texto = c(
"democracia participacao voto cidadania",
"cidadania direitos participacao democracia",
"voto direitos liberdade cidadania",
"democracia voto participacao popular",
"mercado economia eficiência privatizacao",
"privatizacao mercado livre eficiência",
"economia crescimento investimento mercado",
"eficiência mercado economia livre"
),
stringsAsFactors = FALSE
)
corpus <- ac_corpus(df, text = texto, docid = id)
# Testar k de 2 a 4 e visualizar a curva de perplexidade
# (ponto de inflexao/"cotovelo" sugere um bom k)
tune <- ac_lda_tune(corpus, k_range = 2:4)
#> Testando k = 2 a 4...
#> ℹ Perplexidade fora da amostra: validação cruzada em 5 partes.
ac_plot_lda_tune(tune)
# }
