autoMixingMatrix Sound_to_MixingMatrix (Sound me, double startTime, double endTime, long ncovars, double lagStep, long maxNumberOfIterations, double tol, int method) {
try {
autoCrossCorrelationTables ccs = Sound_to_CrossCorrelationTables (me, startTime, endTime, lagStep, ncovars);
autoMixingMatrix thee = MixingMatrix_create (my ny, my ny);
MixingMatrix_and_CrossCorrelationTables_improveUnmixing (thee.peek(), ccs.peek(), maxNumberOfIterations, tol, method);
return thee;
} catch (MelderError) {
Melder_throw (me, U": no MixingMatrix created.");
}
}
CrossCorrelationTables EEG_to_CrossCorrelationTables (EEG me, double startTime, double endTime, double lagTime, long ncovars, const wchar_t *channelRanges) {
try {
// autowindow
if (startTime == endTime) {
startTime = my xmin; endTime = my xmax;
}
// don't allow times outside domain
if (startTime < my xmin) {
startTime = my xmin;
}
if (endTime > my xmax) {
endTime = my xmax;
}
autoEEG thee = my f_extractPart (startTime, endTime, true);
long numberOfChannels;
autoNUMvector <long> channels (NUMstring_getElementsOfRanges (channelRanges, thy d_numberOfChannels, & numberOfChannels, NULL, L"channel", true), 1);
autoSound soundPart = Sound_copyChannelRanges (thy d_sound, channelRanges);
autoCrossCorrelationTables him = Sound_to_CrossCorrelationTables (soundPart.peek(), startTime, endTime, lagTime, ncovars);
return him.transfer();
} catch (MelderError) {
Melder_throw (me, ": no CrossCorrelationTables calculated.");
}
}