diff --git a/src/@dseries/nanstd.m b/src/@dseries/nanstd.m index 4f54afe6c94fe970f340d86d0100e5ff79327ce8..10cb5ab248311e94674694c855f38186d2855e24 100644 --- a/src/@dseries/nanstd.m +++ b/src/@dseries/nanstd.m @@ -8,7 +8,7 @@ function s = nanstd(o, geometric) % --*-- Unitary tests --*-- % - geometric logical [default is false], if true returns the geometric mean. % % OUTPUTS -% - m 1*vobs(o) vector of doubles. +% - s 1*vobs(o) vector of doubles. % Copyright © 2020 Dynare Team % @@ -49,7 +49,7 @@ end return %@test:1 % Define a dataset. -A = randn(10000000,2); +A = randn(1000000,2); A(3,1) = NaN; A(5,2) = NaN; @@ -63,8 +63,8 @@ catch end if t(1) - t(2) = dassert(isequal(size(m),[1, 2]), true); - t(3) = all(abs(s-ones(1, 2))<1e-2); + t(2) = dassert(isequal(size(s),[1, 2]), true); + t(3) = all(abs(s-ones(1, 2))<1e-3); end T = all(t); %@eof:1 \ No newline at end of file