what we got from harman’s “factor analysis” was his only example of principal component analysis. now let’s see what jolliffe’s “principal component analysis” has for us.

i’m going to work one example, but he did it two ways, and i’ll confirm both sets of calculations.

first, he gives us a correlation matrix. i note that he says who gave him the data, but there is no other detail. don’t plan on ever finding the data behind this. here is the correlation matrix.

we know what to do: get the eigenstructure.

here are the eigenvalues:

here is an eigenvector matrix; it is orthogonal:

here are just the 4 largest eigenvectors – of course, i mean the eigenvectors having the 4 largest eigenvalues (all of these eigenvectors are the same size, length 1):

he rounded things to the nearest .2 (this is where i saw this device, which i applied in harman). when i do it, i get:

this is not exactly what he had. the signs of eigenvectors are not unique; to match him, i need to take the negatives of the 1st and 3rd. this is very interesting, that the absolute signs of the factors are unknown, because in the course of my reading i’ve seen many comments about “all or most of the coefficients of the first eigenvector are positive”. but that’s not true. what was true is that all or most of the coefficients had the same sign, but it’s an indeterminate sign.

we could instruct Mathematica to change signs directly, but we can also do this using matrices. we want to change the signs of the 1st and 3rd columns, but not of the 2nd and 4th. we create a diagonal matrix whose diagonal entries are

i.e. -1 in the 1st and 3rd columns, +1 in the 2nd and 4th – and we compute

right? right. we get

that’s what he got. it’s worth mentioning that each of these 4 eigenvectors is a mixture of most of the original data: there are very zeroes in that matrix.

in keeping with “less is more”, we’ll pick this up next time.

Advertisements
(function(g,$){if("undefined"!=typeof g.__ATA){
g.__ATA.initAd({collapseEmpty:'after', sectionId:26942, width:300, height:250});
g.__ATA.initAd({collapseEmpty:'after', sectionId:114160, width:300, height:250});
}})(window,jQuery);
var o = document.getElementById('crt-230389815');
if ("undefined"!=typeof Criteo) {
var p = o.parentNode;
p.style.setProperty('display', 'inline-block', 'important');
o.style.setProperty('display', 'block', 'important');
Criteo.DisplayAcceptableAdIfAdblocked({zoneid:388248,containerid:"crt-230389815",collapseContainerIfNotAdblocked:true,"callifnotadblocked": function () {var o = document.getElementById('crt-230389815'); o.style.setProperty('display','none','important');o.style.setProperty('visbility','hidden','important'); } });
} else {
o.style.setProperty('display', 'none', 'important');
o.style.setProperty('visibility', 'hidden', 'important');
}
var o = document.getElementById('crt-1860326347');
if ("undefined"!=typeof Criteo) {
var p = o.parentNode;
p.style.setProperty('display', 'inline-block', 'important');
o.style.setProperty('display', 'block', 'important');
Criteo.DisplayAcceptableAdIfAdblocked({zoneid:837497,containerid:"crt-1860326347",collapseContainerIfNotAdblocked:true,"callifnotadblocked": function () {var o = document.getElementById('crt-1860326347'); o.style.setProperty('display','none','important');o.style.setProperty('visbility','hidden','important'); } });
} else {
o.style.setProperty('display', 'none', 'important');
o.style.setProperty('visibility', 'hidden', 'important');
}

## Leave a Reply

Fill in your details below or click an icon to log in:

You are commenting using your WordPress.com account. ( Log Out / Change )

You are commenting using your Twitter account. ( Log Out / Change )

You are commenting using your Facebook account. ( Log Out / Change )

You are commenting using your Google+ account. ( Log Out / Change )

Connecting to %s