fix: as.matrix returns sparse by default, use as(x, 'dgTMatrix') for …

fix: as.matrix returns sparse by default, use as(x, 'dgTMatrix') for … #86