fix running scripts for unit testing

Author: arnodelorme

eeglab_history.m

@@ -42,8 +42,8 @@
 eeglab redraw % Update the EEGLAB window to view changes
 
 [ALLEEG EEG CURRENTSET ALLCOM] = eeglab;
-EEG = pop_loadset( 'eeglab_data.set', '/data/matlab/eeglab/sample_data');
-EEG.chanlocs=pop_chanedit(EEG.chanlocs, 'load',{ '/data/matlab/eeglab/sample_data/eeglab_chan32.locs', 'filetype', 'autodetect'});
+EEG = pop_loadset( 'eeglab_data.set', fullfile(eeglab_path, 'sample_data')); 
+EEG.chanlocs=pop_chanedit(EEG.chanlocs, 'load',{ fullfile(eeglab_path, 'sample_data', 'eeglab_chan32.locs'), 'filetype', 'autodetect'});
 EEG = pop_eegfilt( EEG, 1, 0, [], [0]); 
 EEG = pop_reref( EEG, [], 'refstate',0);
 EEG.comments = pop_comments(EEG.comments,'','Dataset was highpass filtered at 1 Hz and rereferenced.',1);

make_eeg_movie.m

@@ -18,7 +18,11 @@
 seemovie(Movie,-5,Colormap);
 
 % save movie
-vidObj = VideoWriter('erpmovie2d.mp4', 'MPEG-4');
+if isunix && ~ismac
+   vidObj = VideoWriter('erpmovie2d.avi', 'Uncompressed AVI');
+else
+   vidObj = VideoWriter('erpmovie2d.mp4', 'MPEG-4');
+end
 open(vidObj);
 writeVideo(vidObj, Movie);
 close(vidObj);
@@ -39,13 +43,21 @@
 seemovie(Movie,-5,Colormap);
 
 % save movie
-vidObj = VideoWriter('erpmovie3d1.mp4', 'MPEG-4');
+if isunix && ~ismac
+    vidObj = VideoWriter('erpmovie3d1.avi', 'MPEG-4');
+else
+    vidObj = VideoWriter('erpmovie3d1.mp4', 'MPEG-4');
+end
 open(vidObj);
 writeVideo(vidObj, Movie);
 close(vidObj);
 
 %% Using topoplot to make movie frames
-vidObj = VideoWriter('erpmovietopoplot.mp4', 'MPEG-4');
+if isunix && ~ismac
+   vidObj = VideoWriter('erpmovietopoplot.avi', 'Uncompressed AVI');
+else
+   vidObj = VideoWriter('erpmovietopoplot.mp4', 'MPEG-4');
+end
 open(vidObj);
 counter = 0;
 for latency = -100:10:600 %-100 ms to 1000 ms with 10 time steps

study_script.m

@@ -12,16 +12,16 @@
         'task', 'Auditory task: Synonyms Vs. Non-synonyms, N400',...
         'filename', 'N400empty.study','filepath', './',...
         'commands', { ...
-        { 'index' 1 'load' fullfile(filepath, 'S02','syn02-S253-clean.set') 'subject' 'S02' 'condition' 'synonyms' }, ...
-        { 'index' 2 'load' fullfile(filepath, 'S05', 'syn05-S253-clean.set') 'subject' 'S05' 'condition' 'synonyms' }, ...
-        { 'index' 3 'load' fullfile(filepath, 'S07', 'syn07-S253-clean.set') 'subject' 'S07' 'condition' 'synonyms' }, ...
-        { 'index' 4 'load' fullfile(filepath, 'S08', 'syn08-S253-clean.set') 'subject' 'S08' 'condition' 'synonyms' }, ...
-        { 'index' 5 'load' fullfile(filepath, 'S10', 'syn10-S253-clean.set') 'subject' 'S10' 'condition' 'synonyms' }, ...
-        { 'index' 6 'load' fullfile(filepath, 'S02', 'syn02-S254-clean.set') 'subject' 'S02' 'condition' 'non-synonyms' }, ...
-        { 'index' 7 'load' fullfile(filepath, 'S05', 'syn05-S254-clean.set') 'subject' 'S05' 'condition' 'non-synonyms' }, ...
-        { 'index' 8 'load' fullfile(filepath, 'S07', 'syn07-S254-clean.set') 'subject' 'S07' 'condition' 'non-synonyms' }, ...
-        { 'index' 9 'load' fullfile(filepath, 'S08', 'syn08-S254-clean.set') 'subject' 'S08' 'condition' 'non-synonyms' }, ...
-        { 'index' 10 'load' fullfile(filepath, 'S10', 'syn10-S254-clean.set') 'subject' 'S10' 'condition' 'non-synonyms' }, ...
+        { 'index' 1 'load' fullfile(filepath, 's02','syn02-s253-clean.set') 'subject' 'S02' 'condition' 'synonyms' }, ...
+        { 'index' 2 'load' fullfile(filepath, 's05', 'syn05-s253-clean.set') 'subject' 'S05' 'condition' 'synonyms' }, ...
+        { 'index' 3 'load' fullfile(filepath, 's07', 'syn07-s253-clean.set') 'subject' 'S07' 'condition' 'synonyms' }, ...
+        { 'index' 4 'load' fullfile(filepath, 's08', 'syn08-s253-clean.set') 'subject' 'S08' 'condition' 'synonyms' }, ...
+        { 'index' 5 'load' fullfile(filepath, 's10', 'syn10-s253-clean.set') 'subject' 'S10' 'condition' 'synonyms' }, ...
+        { 'index' 6 'load' fullfile(filepath, 's02', 'syn02-s254-clean.set') 'subject' 'S02' 'condition' 'non-synonyms' }, ...
+        { 'index' 7 'load' fullfile(filepath, 's05', 'syn05-s254-clean.set') 'subject' 'S05' 'condition' 'non-synonyms' }, ...
+        { 'index' 8 'load' fullfile(filepath, 's07', 'syn07-s254-clean.set') 'subject' 'S07' 'condition' 'non-synonyms' }, ...
+        { 'index' 9 'load' fullfile(filepath, 's08', 'syn08-s254-clean.set') 'subject' 'S08' 'condition' 'non-synonyms' }, ...
+        { 'index' 10 'load' fullfile(filepath, 's10', 'syn10-s254-clean.set') 'subject' 'S10' 'condition' 'non-synonyms' }, ...
     { 'dipselect' 0.15 } });
 
 %% update graphical interface
@@ -76,7 +76,7 @@
 [STUDY] = pop_clust(STUDY, ALLEEG, 'algorithm','kmeanscluster', 'clus_num', 10);
 [STUDY] = std_topoplot(STUDY, ALLEEG, 'clusters', 2, 'mode', 'together');
 [STUDY] = std_topoplot(STUDY, ALLEEG, 'clusters', 2, 'mode', 'apart');
-[STUDY] = std_topoplot(STUDY, ALLEEG, 'clusters', 2, 'comps', 2);
+[STUDY] = std_topoplot(STUDY, ALLEEG, 'clusters', 2, 'comps', 1);
 
 %% Plot statistics
 STUDY = pop_statparams(STUDY, 'condstats', 'on');
@@ -109,4 +109,4 @@
 std_stat(erpdata, 'condstats', 'on', 'fieldtripmcorrect', 'cluster', 'fieldtripmethod', 'montecarlo', 'mode', 'fieldtrip')
 res = statcond(erpdata); size(res)
 
-res = statcond(erpdata); size(res)
+res = statcond(erpdata); size(res)