Fixes to correlation toolkit suggested by Kyle Brill - see issue 51

geoscience-community-codes · Jul 9, 2016 · 3ab6dc9 · 3ab6dc9
1 parent 8582f5b
commit 3ab6dc9
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 2 deletions.
diff --git a/core/@correlation/private/dendrogramplot.m b/core/@correlation/private/dendrogramplot.m
@@ -32,7 +32,9 @@
 
 % SWITCH X AXIS LABELS
 set(gca,'XDir','reverse');
-label = 1- str2num(get(gca,'XTickLabel'));
+% Fix by GT based on email by Kyle Brill, July 2016, see Issue 51
+%label = 1- str2num(get(gca,'XTickLabel'));
+label = 1- str2double(get(gca,'XTickLabel'));
 set(gca,'XTickLabel',label);
 %xlabel('distance (dissimilarlity)','FontSize',16);
 xlabel('inter-cluster correlation','FontSize',16);

diff --git a/core/@correlation/stack.m b/core/@correlation/stack.m
@@ -50,7 +50,9 @@
 c1 = correlation;
 c1 = set(c1,'WAVEFORM', get(c,'WAVEFORM') );
 c1 = set(c1,'TRIG', get(c,'TRIG') );
-if exist('index')
+% Fix by GT based on email from Kyle Brill, July 2016. See issue 51
+% if exist('index')
+if exist('index', 'var')
    c1 = subset(c1,index); 
 end