Node Stats: IDT of Synaptome data (FoTD)

Continuing from yesterday’s figure (20161214), for each node in the denoising tree we plot the means and correlation matrices. require(meda) source("~/neurodata/synaptome-stats/Code/doidt.r") load('~/neurodata/synaptome-stats/Code/cleanDataWithAttributes.RData') load("~/neurodata/FOTD/code/IDTrun20161214_2.RData") idtlab <- out$class idtall <- out$idtall leaves <- which(sapply(idtall, function(x) x$isLeaf)) bn <- sapply(idtall, '[[', 2) obn...

IDT run on Synaptome data.

Here we select a random half of the synaptome data, different from the half we have been using. The data are then z-scored and principal components are computed to the 3rd elbow by Z-G. supressMessages(require(meda)) source("~/neurodata/synaptome-stats/Code/doidt.r") load('~/neurodata/synaptome-stats/Code/cleanDataWithAttributes.RData') ### Setting a...

FoTD

Here we select a random half of the synaptome data, different from the half we have been using. The data are then z-scored and principal components are computed to the 3rd elbow by Z-G. require(meda) source("~/neurodata/synaptome-stats/Code/doidt.r") load('~/neurodata/synaptome-stats/Code/cleanDataWithAttributes.RData') ### Setting a...