# NOT RUN {
data(rksp.0)
ftable <- frequencytable(rksp.0,
byCharacter = TRUE)
filtered <- filterByDictionary(ftable,
fieldnames=c("Krieg", "Familie"))
data(rksp.0)
st <- frequencytable(rksp.0)
# }
# NOT RUN {
stylo(gui=FALSE, frequencies = st)
# }
Run the code above in your browser using DataLab