Added 'full no surfaces' option to montage and canlab_results_fmridis…

…play
canlab · May 9, 2024 · 525069f · 525069f
1 parent fb6dd06
commit 525069f
Show file tree

Hide file tree

Showing 2 changed files with 31 additions and 1 deletion.
diff --git a/CanlabCore/@image_vector/montage.m b/CanlabCore/@image_vector/montage.m
@@ -64,7 +64,7 @@
             case 'scnmontage', meth = 'scnmontage';
 
             case {'trans', 'color' 'maxcolor', 'mincolor', 'transvalue', 'cmaprange', 'full', 'full2', ...
-                    'MNI152NLin6Asym white', 'MNI152NLin6Asym midthickness', 'MNI152NLin6Asym pial', ...
+                    'full no surfaces', 'MNI152NLin6Asym white', 'MNI152NLin6Asym midthickness', 'MNI152NLin6Asym pial', ...
                     'MNI152NLin2009cAsym white', 'MNI152NLin2009cAsym midthickness', 'MNI152NLin2009cAsym pial', ...
                     'MNI152NLin6Asym sphere', 'compact2', ...
                     'noverbose', 'indexmap'}

diff --git a/CanlabCore/Visualization_functions/canlab_results_fmridisplay.m b/CanlabCore/Visualization_functions/canlab_results_fmridisplay.m
@@ -185,6 +185,7 @@
             || strcmp(input_activation, 'multirow') || strcmp(input_activation, 'coronal') || strcmp(input_activation, 'sagittal') ...
             || strcmp(input_activation, 'full2') || strcmp(input_activation, 'full hcp')  || strcmp(input_activation, 'full hcp inflated') ...
             || strcmp(input_activation, 'hcp inflated') || strcmp(input_activation, 'freesurfer inflated') ... 
+            || strcmp(input_activation, 'full no surfaces') ...
             || strcmp(input_activation, 'freesurfer sphere') || strcmp(input_activation, 'freesurfer white') ...
             || strcmp(input_activation, 'MNI152NLin6Asym white') || strcmp(input_activation, 'MNI152NLin6Asym midthickness') ...
             || strcmp(input_activation, 'MNI152NLin6Asym pial') || strcmp(input_activation, 'MNI152NLin2009cAsym white') ...
@@ -276,6 +277,9 @@
 wh = strcmp(varargin, 'full hcp inflated');
 if any(wh), montagetype = varargin{find(wh)}; varargin(wh) = []; end
 
+wh = strcmp(varargin, 'full no surfaces');
+if any(wh), montagetype = varargin{find(wh)}; varargin(wh) = []; end
+
 wh = strcmp(varargin, 'hcp grayordinates');
 if any(wh), montagetype = varargin{find(wh)}; varargin(wh) = []; end
 
@@ -727,6 +731,32 @@
             wh_montages = [1 2 3 4];
             wh_surfaces = [1:8];
 
+        case 'full no surfaces'
+            % saggital
+            [o2, dat] = montage(o2, 'saggital', 'wh_slice', xyz, 'onerow', 'noverbose');
+            % shift_axes(-0.02, -0.04);
+
+            % coronal
+            axh = axes('Position', [-0.02 0.37 .17 .17]);
+            o2 = montage(o2, 'volume_data', dat, 'coronal', 'slice_range', [-40 50], 'onerow', 'spacing', 8, 'noverbose', 'existing_axes', axh);
+
+            % axial
+            axh = axes('Position', [-0.02 0.19 .17 .17]);
+            o2 = montage(o2, 'volume_data', dat, 'axial', 'slice_range', [-40 50], 'onerow', 'spacing', 8, 'noverbose', 'existing_axes', axh);
+
+            axh = axes('Position', [-0.02 0.01 .17 .17]);
+            o2 = montage(o2, 'volume_data', dat, 'axial', 'slice_range', [-44 50], 'onerow', 'spacing', 8, 'noverbose', 'existing_axes', axh);
+
+            allaxh = findobj(gcf, 'Type', 'axes');
+            disp(length(allaxh));
+            for i = 1:(length(allaxh)-36)
+                pos1 = get(allaxh(i), 'Position');
+                pos1(1) = pos1(1) - 0.03;
+                set(allaxh(i), 'Position', pos1);
+            end
+
+            wh_montages = [1 2 3 4];
+
         case 'hcp grayordinates'
             % saggital
             f1 = gcf;