1try 2 load test_write_sparse.mat 3 expdata = zeros(5,10); 4 expdata(1:4:end,1:2:end) = 1; 5 expdata(2:4,2:2:end) = 1; 6 expdata = expdata.*reshape(1:50,5,10); 7 pass = true; 8 pass = pass && isa(sparse_matrix,class(expdata)); 9 pass = pass && issparse(sparse_matrix); 10 pass = pass && all(size(sparse_matrix)==size(expdata)); 11 pass = pass && all(sparse_matrix(:)==expdata(:)); 12catch me 13 pass = false; 14end 15if pass 16 fprintf('PASSED\n'); 17else 18 fprintf('FAILED\n'); 19end 20exit; 21