# \donttest{
if (exists("topic_model") && exists("texts_cleaned")) {
document_info_df <- get_document_info_df(
model = topic_model,
texts = texts_cleaned,
drop_expanded_columns = TRUE
)
print(document_info_df)
} else {
message("No topic_model/texts_cleaned found. Please train or load a model first.")
}
# }
Run the code above in your browser using DataLab