Running examples in ‘inpdfr-Ex.R’ failed
The error most likely occurred in:

> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: doCA
> ### Title: Performs a correspondance analysis on the basis of the
> ###   word-occurrence data.frame.
> ### Aliases: doCA
> 
> ### ** Examples
> 
> data("loremIpsum")
> loremIpsum01 <- loremIpsum[1:100]
> loremIpsum02 <- loremIpsum[101:200]
> loremIpsum03 <- loremIpsum[201:300]
> loremIpsum04 <- loremIpsum[301:400]
> loremIpsum05 <- loremIpsum[401:500]
> subDir <- "RESULTS"
> dir.create(file.path(getwd(), subDir), showWarnings = FALSE)
> write(x = loremIpsum01, file = "RESULTS/loremIpsum01.txt")
> write(x = loremIpsum02, file = "RESULTS/loremIpsum02.txt")
> write(x = loremIpsum03, file = "RESULTS/loremIpsum03.txt")
> write(x = loremIpsum04, file = "RESULTS/loremIpsum04.txt")
> write(x = loremIpsum05, file = "RESULTS/loremIpsum05.txt")
> wordOccuDF <- getwordOccuDF(mywd = paste0(getwd(), "/RESULTS"), excludeSW = FALSE)
Warning in readChar(zz, file.info(filetxt)$size) :
  text connection used with readChar(), results may be incorrect
Warning in tm_map.SimpleCorpus(corpus, tm::removePunctuation) :
  transformation drops documents
Warning in readChar(zz, file.info(filetxt)$size) :
  text connection used with readChar(), results may be incorrect
Warning in tm_map.SimpleCorpus(corpus, tm::removePunctuation) :
  transformation drops documents
Warning in readChar(zz, file.info(filetxt)$size) :
  text connection used with readChar(), results may be incorrect
Warning in tm_map.SimpleCorpus(corpus, tm::removePunctuation) :
  transformation drops documents
Warning in readChar(zz, file.info(filetxt)$size) :
  text connection used with readChar(), results may be incorrect
Warning in tm_map.SimpleCorpus(corpus, tm::removePunctuation) :
  transformation drops documents
Warning in readChar(zz, file.info(filetxt)$size) :
  text connection used with readChar(), results may be incorrect
Warning in tm_map.SimpleCorpus(corpus, tm::removePunctuation) :
  transformation drops documents
> file.remove(list.files(full.names = TRUE, 
+   path = paste0(getwd(), "/RESULTS"), pattern = "loremIpsum"))
[1] TRUE TRUE TRUE TRUE TRUE
> doCA(wordF = wordOccuDF)

 Principal inertias (eigenvalues):
Error in print.default(xx, quote = quote, right = right, ...) : 
  invalid printing width
Calls: <Anonymous> -> print.ca -> print.table -> print -> print.default
Execution halted