as.TermDocumentMatrix: Generate TermDocumentMatrix / DocumentTermMatrix.

Description

Method for type conversion, to generate the classes "TermDocumentMatrix" or "DocumentTermMatrix" contained in the "tm" package. The classes inherit from the "simple_triplet_matrix"-class defined in the "slam"-package. A "DocumentTermMatrix" is required as input by the "topicmodels" package, for instance.

Usage

as.TermDocumentMatrix(x, ...)
# S4 method for character
as.TermDocumentMatrix(x, pAttribute, sAttribute,
  verbose = TRUE)
# S4 method for character
as.DocumentTermMatrix(x, pAttribute, sAttribute,
  verbose = TRUE)
# S4 method for bundle
as.TermDocumentMatrix(x, col, pAttribute = NULL,
  verbose = TRUE)
# S4 method for bundle
as.DocumentTermMatrix(x, col)
# S4 method for partitionBundle
as.TermDocumentMatrix(x, pAttribute = NULL,
  col = NULL, verbose = TRUE)
# S4 method for partitionBundle
as.DocumentTermMatrix(x, pAttribute = NULL,
  col = NULL, verbose = TRUE)
# S4 method for context
as.DocumentTermMatrix(x, pAttribute, verbose = TRUE)
# S4 method for context
as.TermDocumentMatrix(x, pAttribute, verbose = TRUE)

Arguments

some object

...

to make the check happy

pAttribute

the p-attribute

sAttribute

the s-attribute

verbose

bla

col

the column to use of assembling the matrix

Value

a TermDocumentMatrix

Details

The type conversion-method can be applied on object of the class "bundle", or classes inheriting from the "bundle" class. If counts or some other measure is present in the "stat" slots of the objects in the bundle, then the values in the column indicated by "col" will be turned into the values of the sparse matrix that is generated. A special case is the generation of the sparse matrix based on a "partitionBundle" that does not yet include counts. In this case, a "pAttribute" needs to be provided, then counting will be performed, too.

Examples

Run this code

# NOT RUN {
use("polmineR.sampleCorpus")
 
# do-it-yourself 
p <- partition("PLPRBTTXT", text_date=".*", regex=TRUE)
pB <- partitionBundle(p, sAttribute="text_date")
pB <- enrich(pB, pAttribute="word")
tdm <- as.TermDocumentMatrix(pB, col = "count")
   
 # leave the counting to the as.TermDocumentMatrix-method
pB2 <- partitionBundle(p, sAttribute = "text_date")
tdm <- as.TermDocumentMatrix(pB2, pAttribute = "word", verbose = TRUE)
   
# diretissima
tdm <- as.TermDocumentMatrix("PLPRBTTXT", pAttribute = "word", sAttribute = "text_date")
# }