Robochameleon  v1.0
colormapRGBmatrices.m
1 function mymap = colormapRGBmatrices( N, rm, gm, bm)
2  x = linspace(0,1, N);
3  rv = interp1( rm(:,1), rm(:,2), x);
4  gv = interp1( gm(:,1), gm(:,2), x);
5  mv = interp1( bm(:,1), bm(:,2), x);
6  mymap = [ rv', gv', mv'];
7  %exclude invalid values that could appear
8  mymap( isnan(mymap) ) = 0;
9  mymap( (mymap>1) ) = 1;
10  mymap( (mymap<0) ) = 0;
11 end