Updates for upcoming Matrix release (#218)

* Updates for upcoming Matrix release

* Update NEWS

Author: juliasilge

NEWS.md

@@ -1,5 +1,7 @@
 # tidytext (development version)
 
+* Updated the tidy method for a quanteda `dfm` because of the upcoming release of Matrix (#218)
+
 # tidytext 0.3.3
 
 * `scale_x/y_reordered()` now uses a function `labels` as its main input (#200)

R/sparse_tidiers.R

@@ -44,7 +44,7 @@ tidy.TermDocumentMatrix <- function(x, ...) {
 #' @rdname tdm_tidiers
 #' @export
 tidy.dfm <- tidy.dfmSparse <- function(x, ...) {
-  triplets <- Matrix::summary(methods::as(x, "dgTMatrix"))
+  triplets <- Matrix::summary(methods::as(x, "TsparseMatrix"))
   ret <- tidy_triplet(x, triplets)
   colnames(ret) <- c("document", "term", "count")
   ret

tests/testthat/test-sparse-casters.R

@@ -75,3 +75,4 @@ test_that("Can cast tables into a sparse dfm", {
   expect_equal(as.numeric(d[1, 1]), 1)
   expect_equal(as.numeric(d[2, 3]), 4)
 })
+

tidytext.Rproj

@@ -17,6 +17,5 @@ StripTrailingWhitespace: Yes
 
 BuildType: Package
 PackageUseDevtools: Yes
-PackageCleanBeforeInstall: Yes
 PackageInstallArgs: --no-multiarch --with-keep.source
 PackageRoxygenize: rd,collate,namespace