Principal Component Analysis (PCA) in C# QuickStart Sample

Illustrates how to perform a Principal Components Analysis using classes in the Extreme.Statistics.Multivariate namespace in C#.

View this sample in: Visual Basic F# IronPython

using System;

using Extreme.Data.Text;
using Extreme.Statistics.Multivariate;

namespace Extreme.Numerics.Quickstart.CSharp
{
    /// <summary>
    /// Demonstrates how to use classes that implement
    /// Principal Component Analysis (PCA).
    /// </summary>
    class PCAnalysis
    {
        static void Main(string[] args)
        {
            // The license is verified at runtime. We're using
            // a demo license here. For more information, see
            // https://numerics.net/trial-key
            Extreme.License.Verify("Demo license");
            // This QuickStart Sample demonstrates how to perform
            // a principal component analysis on a set of data.
            //
            // The classes used in this sample reside in the
            // Extreme.Statistics.Multivariate namespace..

            // First, our dataset, 'depress.txt', which is from
            //     Computer-Aided Multivariate Analysis, 4th Edition
            //     by A. A. Afifi, V. Clark and S. May, chapter 16
            //     See https://stats.idre.ucla.edu/other/examples/cama4/

            // The data is in delimited text format. Use a matrix reader to load it into a matrix.
            var m = DelimitedTextFile.ReadMatrix<double>(@"..\..\..\..\Data\Depress.txt",
                new DelimitedTextOptions(columnHeaders: false,
                columnDelimiter:' ', mergeConsecutiveDelimiters: true));

            // The data we want is in columns 8 through 27:
            m = m.GetSubmatrix(0, m.RowCount - 1, 8, 27);

            // 
            // Principal component analysis
            //

            // We can construct PCA objects in many ways. Since we have the data in a matrix,
            // we use the constructor that takes a matrix as input.
            PrincipalComponentAnalysis pca = new PrincipalComponentAnalysis(m);
            // and immediately perform the analysis:
            pca.Fit();
            
            // We can get the contributions of each component:
            Console.WriteLine(" #    Eigenvalue Difference Contribution Contrib. %");
            for (int i = 0; i < 5; i++)
            { 
                // We get the ith component from the model...
                PrincipalComponent component = pca.Components[i];
                // and write out its properties
                Console.WriteLine("{0,2}{1,12:F4}{2,11:F4}{2,14:F3}%{3,10:F3}%",
                    i, component.Eigenvalue, component.EigenvalueDifference, 
                    100 * component.ProportionOfVariance,
                    100 * component.CumulativeProportionOfVariance);
            }

            // To get the proportions for all components, use the
            // properties of the PCA object:
            var proportions = pca.VarianceProportions;

            // To get the number of components that explain a given proportion
            // of the variation, use the GetVarianceThreshold method:
            int count = pca.GetVarianceThreshold(0.9);
            Console.WriteLine("Components needed to explain 90% of variation: {0}", count);
            Console.WriteLine();

            // The value property gives the components themselves:
            Console.WriteLine("Components:");
            Console.WriteLine("Var.      1       2       3       4       5");
            PrincipalComponentCollection pcs = pca.Components;
            for (int i = 0; i < pcs.Count; i++)
            {

                Console.WriteLine("{0,4}{1,8:F4}{2,8:F4}{3,8:F4}{4,8:F4}{5,8:F4}",
                    i, pcs[0].Value[i], pcs[1].Value[i], pcs[2].Value[i], pcs[3].Value[i], pcs[4].Value[i]);
            }
            Console.WriteLine();

            // The scores are the coefficients of the observations expressed as a combination
            // of principal components.
            var scores = pca.ScoreMatrix;

            // To get the predicted observations based on a specified number of components,
            // use the GetPredictions method.
            var prediction = pca.GetPredictions(count);
            Console.WriteLine("Predictions using {0} components:", count);
            Console.WriteLine("   Pr. 1  Act. 1   Pr. 2  Act. 2   Pr. 3  Act. 3   Pr. 4  Act. 4", count);
            for (int i = 0; i < 10; i++)
                Console.WriteLine("{0,8:F4}{1,8:F4}{2,8:F4}{3,8:F4}{4,8:F4}{5,8:F4}{6,8:F4}{7,8:F4}",
                    prediction[i, 0], m[i, 0],
                    prediction[i, 1], m[i, 1],
                    prediction[i, 2], m[i, 2],
                    prediction[i, 3], m[i, 3]);

            Console.Write("Press any key to exit.");
            Console.ReadLine();
        }
    }
}