-
Notifications
You must be signed in to change notification settings - Fork 0
/
cm_load.m
55 lines (45 loc) · 1.27 KB
/
cm_load.m
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
% Lims --- [0 1] or [0.1 0.8] ...
% ncolor --- the color number
function cm = cm_load(cm_name, varargin)
varargin = read_varargin(varargin, {'Lims'}, {[0 1]});
varargin = read_varargin(varargin, {'Ncolor'}, {[]});
varargin = read_varargin2(varargin, {'Flip'});
if endsWith(cm_name, '.rgb')
cm = cm_read_ncl(cm_name);
else
cm_path = fundir('cm_load');
MAT = [cm_path 'cm/' lower(cm_name) '.mat'];
data = load(MAT);
cm = data.cm;
end
n = size(cm,1);
Lims = round(Lims*(n-1)+1);
if Lims(1)<Lims(2)
cm = cm(Lims(1) : Lims(2), :);
elseif Lims(1)>Lims(2)
cm = cm(Lims(2) : Lims(1), :);
else
error('Only one color left')
end
if ~isempty(Ncolor)
cm0 = cm;
n = size(cm,1);
k = round(linspace(1, n, Ncolor));
a = mod(n, Ncolor);
b = floor(n/Ncolor);
cm = [];
% for i = 1 : Ncolor
% if i <= a
% cm = [cm; repmat(cm0(k(i),:), b+1, 1)];
% else
% cm = [cm; repmat(cm0(k(i),:), b, 1)];
% end
% end
for i = 1 : Ncolor
cm = [cm; cm0(k(i),:)];
end
end
if Flip
cm = flip(cm, 1);
end
end