view general/arrutils/rotl.m @ 54:9bcf5e133bf0

Added from old stats library.

function y=rotl(x,n)
% rotl - rotate columns of array to left
%
% rotl :: [[N,M]] -> [[N,M]].
% rotl :: [[N,M]], natural -> [[N,M]].

if nargin<2, n=1; end
y = x(:,[n+1:size(x,2),1:n]);