[R-br] sparsematrix

Bom dia. Gente, alguem sabe como transformar objetos do tipo sparseMatrix em matrizes porem com zeros onde tem pontos, veja exemplo abaixo. Obs: tem de ser como classe matriz, ou seja, class(A) tem de retornar matriz. i <- c(1,3:8); j <- c(2,9,6:10); x <- 7 * (1:7)(A <- sparseMatrix(i, j, x = x))