Mercurial > octave
changeset 31372:c45fe7ea3153
var.m: Update sparse and diagonal inputs tests for two-outputs (bug #63291)
* var.m: Convert BISTs for sparse and diagonal inputs from one line tests for
variance to tests that check both variance and the optional median output.
| author | Nicholas R. Jankowski <jankowski.nicholas@gmail.com> |
|---|---|
| date | Mon, 31 Oct 2022 01:01:31 -0400 |
| parents | c549b2401c38 |
| children | f2515895e3b6 |
| files | scripts/statistics/var.m |
| diffstat | 1 files changed, 25 insertions(+), 6 deletions(-) [+] |
line wrap: on
line diff
--- a/scripts/statistics/var.m Mon Oct 31 00:09:01 2022 -0400 +++ b/scripts/statistics/var.m Mon Oct 31 01:01:31 2022 -0400 @@ -424,12 +424,31 @@ %! assert (m, [2, 4, NaN]); ## Test sparse/diagonal inputs -%!assert <*63291> (var (2 * eye (2)), [2, 2]) -%!assert <*63291> (var (4 * eye (2), [1, 3]), [3, 3]) -%!assert <*63291> (full (var (sparse (2 * eye (2)))), [2, 2]) -%!assert <*63291> (full (var (sparse (4 * eye (2)), [1, 3])), [3, 3]) -%!assert <63291> (issparse (var (sparse (2 * eye (2))))) -%!assert <63291> (issparse (var (sparse (4 * eye (2)), [1, 3]))) +%!test <*63291> +%! [v, m] = var (2 * eye (2)); +%! assert (v, [2, 2]); +%! assert (m, [1, 1]); +%!test <*63291> +%! [v, m] = var (4 * eye (2), [1, 3]); +%! assert (v, [3, 3]); +%! assert (m, [1, 3]); +%!test <*63291> +%! [v, m] = var (sparse (2 * eye (2))); +%! assert (full (v), [2, 2]); +%! assert (full (m), [1, 1]); +%!test <*63291> +%! [v, m] = var (sparse (4 * eye (2)), [1, 3]); +%! assert (full (v), [3, 3]); +%! assert (full (m), [1, 3]); + +%!test <63291> +%! [v, m] = var (sparse (eye (2))); +%! assert (issparse (v)); +%! assert (issparse (m)); +%!test <63291> +%! [v, m] = var (sparse (eye (2)), [1, 3]); +%! assert (issparse (v)); +%! assert (issparse (m)); ## Test input validation %!error <Invalid call> var ()