R: Sparse Matrix Multiplikation mit data.table und quanteda-Paket?

Question

Ich versuche, eine Matrix-Manipulation mit Sparse-Matrix und mit dem Paket namens Quanteda, mit data.table-Paket, im Zusammenhang mit diesem Thread here. Also

Wie können Sie die Matrix-Multiplikation hier mit Quanteda-Paket und dünn besetzten Matrizen arbeiten?

Answer 1

Dies funktioniert gut:

mytext <- c("Let the big dogs hunt", 
      "No holds barred", 
      "My child is an honor student")  
myMatrix <- dfm(mytext) 

myMatrix %*% t(myMatrix) 
## 3 x 3 sparse Matrix of class "dgCMatrix" 
##  text1 text2 text3 
## text1  5  .  . 
## text2  .  3  . 
## text3  .  .  6 

Keine Notwendigkeit zu einer dichten Matrix zu zwingen as.matrix() mit . Beachten Sie, dass es kein "dfmSparse" -Objekt mehr ist, da es nicht mehr eine Matrix von Dokumenten nach Features ist.

Answer 2

Verwenden t Befehl, nicht transpose Befehl, für die Matrixmultiplikation, so dass

as.matrix(myMatrix) %*% t(as.matrix(myMatrix)) 

auch kommentiert, as.matrix ist nicht spärlich, während Matrix :: Matrix spärlich ist aber nicht notwendig hier, also besser

myMatrix %*% t(myMatrix) 

und möglicherweise sogar besser

crossprod(myMatrix) 
tcrossprod(myMatrix) 

aber es numerisch/komplexe Matrix/Vektor Argumente erfordert, nicht mit dem Beispiel in der Frage arbeiten:

require(quanteda) 
mytext <- c("Let the big dogs hunt", "No holds barred", "My child is an honor student")  
myMatrix <-dfm(mytext, ignoredFeatures = stopwords("english"), stem = TRUE) 
crossprod(myMatrix) 
tcrossprod(myMatrix)