ac_plot_lda_topics() gera um gráfico de barras com os termos de maior
probabilidade (beta) para cada tópico do modelo LDA.
Arguments
- lda_result
Objeto
ac_lda, saída deac_lda().- top_n
Número de termos por tópico. Padrão:
10.- ncol
Número de colunas nos facets. Padrão:
NULL(automático).- 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)
lda <- ac_lda(corpus, k = 2)
#> Ajustando LDA com k = 2 tópicos...
# Grafico com os 5 termos mais probabilisticos por tópico
ac_plot_lda_topics(lda, top_n = 5)
# }
