Example with textreg

textreg_example.R

library(textreg)
library(tm)
library(dplyr)
library(wrapr)   # for dot-pipe

df_mi <- df0 %.>% 
  filter(., !is.na(mostimportant))

corp_mi <- df_mi %.>%
  pull(., mostimportant) %.>%
  VectorSource %.>%
  VCorpus

corp_mi.clean <- clean.text(corp_mi)
corp_mi.stemmed <- stem.corpus(corp_mi.clean, verbose = FALSE)

textreg(corp_mi.stemmed, df_mi$experience %in% 5, verbosity = 0, C=1, gap = 1, min.pattern = 2, min.support = 4,
        step.verbosity = 0)