[Pkg-octave-commit] [SCM] Debian packaging for octave-statistics branch, master, updated. upstream/1.1.0-21-g6f80f80

[Sébastien Villemot]

The following commit has been merged in the master branch:
commit b3155cf68609867fa42e944cf37ab8532c876770
Author: Sébastien Villemot <sebastien.villemot at ens.fr>
Date:   Tue Mar 13 20:27:34 2012 +0100

    debian/patches/remove-zscore.patch: new patch taken from upstream

diff --git a/debian/patches/remove-zscore.patch b/debian/patches/remove-zscore.patch
new file mode 100644
index 0000000..7ae7c48
--- /dev/null
+++ b/debian/patches/remove-zscore.patch
@@ -0,0 +1,58 @@
+Description: Remove zscore function since it is now part of GNU octave core
+Origin: upstream, commit: 9546
+Last-Update: 2012-03-13
+---
+This patch header follows DEP-3: http://dep.debian.net/deps/dep3/
+--- a/inst/zscore.m
++++ /dev/null
+@@ -1,50 +0,0 @@
+-## Copyright (C) 2001 Paul Kienzle
+-##
+-## This program is free software; you can redistribute it and/or modify
+-## it under the terms of the GNU General Public License as published by
+-## the Free Software Foundation; either version 2 of the License, or
+-## (at your option) any later version.
+-##
+-## This program is distributed in the hope that it will be useful,
+-## but WITHOUT ANY WARRANTY; without even the implied warranty of
+-## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+-## GNU General Public License for more details.
+-##
+-## You should have received a copy of the GNU General Public License
+-## along with this program; If not, see <http://www.gnu.org/licenses/>.
+-
+-## -*- texinfo -*-
+-## @deftypefn {Function File} {@var{A} =} zscore (@var{X})
+-## Compute the @math{z}-score.
+-##
+-## Compute the @math{z}-score of each element of @var{X} relative to the data in
+-## the columns of @var{X}.  The @math{z}-score for a single data point @math{x_i}
+-## is:
+-##
+-## @example
+-## (x_i - mean(x))/std(x)
+-## @end example
+-## @end deftypefn
+-
+-function [A, mu, sigma] = zscore(X,varargin)
+-  if (nargin != 1 && nargin != 2)
+-    print_usage;
+-  endif
+-  if (nargin == 2)
+-    dim = varargin{1}
+-  else
+-    dim = min(find(size(X)>1));
+-    if isempty(dim), dim=1; endif;
+-  endif
+-  
+-  sz = ones(1,length(size(X)));
+-  sz(dim) = size(X,dim);
+-  A = (X - repmat(mean(X,varargin{:}),sz)) ./ repmat(std(X,varargin{:}),sz);
+-  
+-  if (nargout > 1)
+-    mu = mean (X, dim);
+-  endif
+-  if (nargout > 2)
+-    sigma = std (X, 0, dim);
+-  endif
+-endfunction
diff --git a/debian/patches/series b/debian/patches/series
index 68a7154..d06deb4 100644
--- a/debian/patches/series
+++ b/debian/patches/series
@@ -1 +1,2 @@
 data-files-for-tests.diff
+remove-zscore.patch

-- 
Debian packaging for octave-statistics