Example 1: SparseMatrix

using System;
using Imsl.Math;

public class SparseMatrixEx1
{
	public static void  Main(String[] args)
	{
		SparseMatrix b = new SparseMatrix(6, 6);
		b.Set(0, 0, 10.0);
		b.Set(1, 1, 10.0);
		b.Set(1, 2, -3.0);
		b.Set(1, 3, -1.0);
		b.Set(2, 2, 15.0);
		b.Set(3, 0, -2.0);
		b.Set(3, 3, 10.0);
		b.Set(3, 4, -1.0);
		b.Set(4, 0, -1.0);
		b.Set(4, 3, -5.0);
		b.Set(4, 4, 1.0);
		b.Set(4, 5, -3.0);
		b.Set(5, 0, -1.0);
		b.Set(5, 1, -2.0);
		b.Set(5, 5, 6.0);
		
		SparseMatrix c = new SparseMatrix(6, 3);
		c.Set(0, 0, 5.0);
		c.Set(1, 2, -3.0);
		c.Set(2, 0, 1.0);
		c.Set(2, 2, 7.0);
		c.Set(3, 0, 2.0);
		c.Set(4, 1, -5.0);
		c.Set(4, 2, 2.0);
		c.Set(5, 2, 4.0);
		
		SparseMatrix A = SparseMatrix.Multiply(b, c);
		
		// Get the one norm of matrix A
		Console.Out.WriteLine("The 1-norm of the matrix is " 
            + A.OneNorm());
		SparseMatrix.SparseArray sa = A.ToSparseArray();
		
		// Print the matrix and its one norm
		Console.Out.WriteLine("row  column  value");
		for (int i = 0; i < sa.NumberOfRows; i++)
		{
			for (int j = 0; j < sa.Index[i].Length; j++)
			{
				int jj = sa.Index[i][j];
				Console.Out.WriteLine(" " + i + "     " + jj + "     " 
                    + sa.Values[i][j]);
			}
		}
	}
}

Output

The 1-norm of the matrix is 198
row  column  value
 0     0     50
 1     0     -5
 1     2     -51
 2     0     15
 2     2     105
 3     0     10
 3     1     5
 3     2     -2
 4     0     -15
 4     1     -5
 4     2     -10
 5     0     -5
 5     2     30