@@ -410,7 +410,7 @@ function SWS_Analysis_BASICS_stereoplot(colmap)
410
410
disp(' ' )
411
411
plot_multi = input([' Plot multi-event-analysis results' ...
412
412
' (if available)? \n ' ...
413
- ' [0] no [1] stack [2] SIMW(NN)' ...
413
+ ' [0] no [1] stack [2] SIMW(NN)' ...
414
414
' [3] stack & SIMW(NN) | ' ]);
415
415
if plot_multi > 0
416
416
RES_multi = SWS_Analysis_BASICS_read_SSresults(...
@@ -660,19 +660,19 @@ function SWS_Analysis_BASICS_stereoplot(colmap)
660
660
plotannot = 2 ; % SE
661
661
end
662
662
663
- if plotannot == 1
663
+ if plotannot == 1 % NE
664
664
text(0.047 ,-0.047 , ' 5^\circ' , ' fontsize' ,12 , ' color' ,col_inc )
665
665
text(0.105 ,-0.105 , ' 10^\circ' , ' fontsize' ,12 , ' color' ,col_inc )
666
666
text(0.168 ,-0.168 , ' 15^\circ' , ' fontsize' ,12 , ' color' ,col_inc )
667
667
elseif plotannot == 2 % SE
668
668
text(0.040 ,0.056 , ' 5^\circ' , ' fontsize' ,12 , ' color' ,col_inc )
669
669
text(0.105 ,0.105 , ' 10^\circ' , ' fontsize' ,12 , ' color' ,col_inc )
670
670
text(0.175 ,0.145 , ' 15^\circ' , ' fontsize' ,12 , ' color' ,col_inc )
671
- elseif plotannot == 3
671
+ elseif plotannot == 3 % SW
672
672
text(-0.055 ,0.055 , ' 5^\circ' , ' fontsize' ,12 , ' color' ,col_inc )
673
673
text(-0.117 ,0.117 , ' 10^\circ' , ' fontsize' ,12 , ' color' ,col_inc )
674
674
text(-0.180 ,0.180 , ' 15^\circ' , ' fontsize' ,12 , ' color' ,col_inc )
675
- elseif plotannot == 4
675
+ elseif plotannot == 4 % NW
676
676
text(-0.055 ,-0.055 , ' 5^\circ' , ' fontsize' ,12 , ' color' ,col_inc )
677
677
text(-0.117 ,-0.117 , ' 10^\circ' , ' fontsize' ,12 , ' color' ,col_inc )
678
678
text(-0.180 ,-0.180 , ' 15^\circ' , ' fontsize' ,12 , ' color' ,col_inc )
@@ -687,14 +687,15 @@ function SWS_Analysis_BASICS_stereoplot(colmap)
687
687
688
688
if lowlim < upplim
689
689
if lowlim ~= 0 || upplim ~= 360
690
- % first plot whole range in gray as bottom layer
690
+ % first plot whole BAZ range in gray as bottom layer
691
691
startwedge = 0 ;
692
692
endwedge = 360 ;
693
693
plot_arc3D(deg2rad(startwedge - 90 ), deg2rad(endwedge - 90 ), ...
694
694
0 , 0 , lim_sector , ...
695
- colfill , colfill , 1 );
695
+ colfill , ...
696
+ colfill , 1 );
696
697
697
- % then plot modelled range again on top in white
698
+ % then plot considered BAZ range again on top in white
698
699
startwedge = lowlim ;
699
700
endwedge = upplim ;
700
701
plot_arc3D(deg2rad(startwedge - 90 ), deg2rad(endwedge - 90 ), ...
@@ -707,25 +708,29 @@ function SWS_Analysis_BASICS_stereoplot(colmap)
707
708
% and the other one in the SA region
708
709
elseif lowlim > upplim
709
710
if lowlim ~= 0 || upplim ~= 360
710
- % first plot whole range in gray as bottom layer
711
+ % first plot whole BAZ range in gray as bottom layer
711
712
startwedge = 0 ;
712
713
endwedge = 360 ;
713
714
plot_arc3D(deg2rad(startwedge - 90 ), deg2rad(endwedge - 90 ), ...
714
715
0 , 0 , lim_sector , ...
716
+ colfill , ...
715
717
colfill , 1 );
716
718
717
- % then plot modelled range again on top in white in two steps
719
+ % then plot considered BAZ range again on top in white
720
+ % in two steps
718
721
startwedge = 0 ;
719
722
endwedge = upplim ;
720
723
plot_arc3D(deg2rad(startwedge - 90 ), deg2rad(endwedge - 90 ), ...
721
- 0 , 0 , lim_sector , ...
722
- [white_value white_value white_value ]./256 , 1 );
724
+ 0 , 0 , lim_sector , ...
725
+ [white_value white_value white_value ]./256 , ...
726
+ [white_value white_value white_value ]./256 , 1 );
723
727
724
728
startwedge = lowlim ;
725
729
endwedge = 360 ;
726
730
plot_arc3D(deg2rad(startwedge - 90 ), deg2rad(endwedge - 90 ), ...
727
- 0 , 0 , lim_sector , ...
728
- [white_value white_value white_value ]./256 , 1 );
731
+ 0 , 0 , lim_sector , ...
732
+ [white_value white_value white_value ]./256 , ...
733
+ [white_value white_value white_value ]./256 , 1 );
729
734
end
730
735
end
731
736
@@ -737,11 +742,12 @@ function SWS_Analysis_BASICS_stereoplot(colmap)
737
742
for KK = 1 : 1 : length(RES_nulls )
738
743
if ~isempty(RES_nulls ) && fast_col == 0
739
744
plotm(90 - inc_nulls(KK ), bazi_nulls(KK ), ' o' , ...
740
- ' color' ,nullcol , ' MarkerSize' ,marks , ' linewidth' ,linewcirc );
745
+ ' color' ,nullcol , ' MarkerSize' ,marks , ...
746
+ ' linewidth' ,linewcirc , ' markerFacecolor' ,' w' );
741
747
elseif ~isempty(RES_nulls ) && fast_col == 1
742
748
plotm(90 - inc_nulls(KK ), bazi_nulls(KK ), ' o' , ...
743
- ' color' ,' k' , ' MarkerSize' ,marks , ' linewidth ' , linewcirc , ...
744
- ' markerFacecolor' ,' w' );
749
+ ' color' ,' k' , ' MarkerSize' ,marks , ...
750
+ ' linewidth ' , linewcirc , ' markerFacecolor' ,' w' );
745
751
cmap = usecmap ;
746
752
colormap(cmap );
747
753
end
@@ -850,7 +856,7 @@ function SWS_Analysis_BASICS_stereoplot(colmap)
850
856
end
851
857
end
852
858
853
- % no color-coding base on phi
859
+ % no color-coding based on phi
854
860
else
855
861
% single
856
862
set(hndl , ' color' ,splitcol , ' linewidth' ,linew )
0 commit comments