Stat_ANOVA2.m 1.4 KB

123456789101112131415161718192021222324252627282930313233
  1. function [Pvalue, result, gnames] = Stat_ANOVA2(Y,GROUP,NAME)
  2. % Example 1
  3. % a=[1;2;3;4;5]
  4. % b=[2;2;3;4;4]
  5. % c=[1;3;3;2;2]
  6. % d=[2;3;4;4;1]
  7. % A=[1;2;3;4;5]
  8. % B=[2;2;3;4;4]
  9. % C=[1;3;3;2;2]
  10. % D=[2;3;4;4;1]
  11. % Y = [a; b; c; d;...
  12. % A; B; C; D];
  13. % Species = [GetGroupingVar(a,1); GetGroupingVar(b,1); GetGroupingVar(c,1); GetGroupingVar(d,1); ...
  14. % GetGroupingVar(A,2); GetGroupingVar(B,2); GetGroupingVar(C,2); GetGroupingVar(D,2)];
  15. % Block = [GetGroupingVar(a,1); GetGroupingVar(b,2); GetGroupingVar(c,3); GetGroupingVar(d,4); ...
  16. % GetGroupingVar(A,1); GetGroupingVar(B,2); GetGroupingVar(C,3); GetGroupingVar(D,4)];
  17. % NAME = {'Species', 'Block'};
  18. % [Pvalue, result, gnames] = Stat_ANOVA2(Y,[Species Block],NAME)
  19. % Example 2
  20. % Y = [dHP_Odd; dHP_Even; iHP_Odd; iHP_Even];
  21. % Region = [GetGroupingVar(dHP_Odd,1); GetGroupingVar(dHP_Even,1); ...
  22. % GetGroupingVar(iHP_Odd,2); GetGroupingVar(iHP_Even,2)];
  23. % Trajectory = [GetGroupingVar(dHP_Odd,1); GetGroupingVar(dHP_Even,2);...
  24. % GetGroupingVar(iHP_Odd,1); GetGroupingVar(iHP_Even,2)];
  25. % NAME = {'Region', 'Trajectory'};
  26. % [Pvalue, result, gnames] = Stat_ANOVA2(Y,[Region Trajectory],NAME)
  27. [Pvalue.Main_TwoWay,result,stats] = anovan(Y,GROUP,'model','interaction','varnames',NAME,'display','off');
  28. [Pvalue.MultipleComparison, ~, ~, gnames] = multcompare(stats,'Dimension',[1,2],'display','off');
  29. end