# NOT RUN {
#make matrix
my_matrix <- rep(0, 100)
my_matrix[c(1, 11, 22, 33, 44, 54, 65, 76, 87, 97)] <- 1
my_matrix <- matrix(data = my_matrix, nrow = 10, ncol = 10)
#convert to sparsematrix
sparsematrix_from_matrix(adj_mat = my_matrix)
# }
Run the code above in your browser using DataLab