view general/arrutils/rotr.m @ 61:eff6bddf82e3 tip

Finally implemented perceptual brightness thing.

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

m=size(x,2);
if nargin<2, n=1; end
y = x(:,mod((0:m-1)-n,m)+1);