Script Use of Lexicometry in Sensometrics

4.2.3. Sub-tables

French panel

To obtain the French sub-table (8 rows-wines x 137 columns-different French words) we use the TextData function from Xplortext package:

sum.TD.Fr15 <- TextData(baseFr, var.text=c(1:ncol(baseFr)), Fmin=1,stop.word.user = str.Fr.stopworduser)
sum.TD.Fr15$DocTerm

<<DocumentTermMatrix (documents: 8, terms: 137)>>
Non-/sparse entries: 430/666
Sparsity           : 61%
Maximal term length: 13
Weighting          : term frequency (tf)

Catalan panel

To obtain the Catalan sub-table (8 rows-wines x 95 columns-different Catalan words):

sum.TD.Cat9 <- TextData(baseCat, var.text=c(1:ncol(baseCat)), Fmin=1,stop.word.user = str.Cat.stopworduser)
sum.TD.Cat9$DocTerm

<<DocumentTermMatrix (documents: 8, terms: 95)>>
Non-/sparse entries: 267/493
Sparsity           : 65%
Maximal term length: 14
Weighting          : term frequency (tf)