-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy pathplotPubvPriv.m
More file actions
40 lines (39 loc) · 1.53 KB
/
plotPubvPriv.m
File metadata and controls
40 lines (39 loc) · 1.53 KB
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
function [hpriv, hpub, hpriv2, hpub2]= plotPubvPriv(h, T, tvarname, varnams, shading)
figure(h);
hold on
box on
allgains = table2array(unique(T(:,tvarname)));
gains = allgains(allgains>0);
privRepMean = zeros(1,length(gains));
pubRepMean = privRepMean;
privIntMean =privRepMean;
pubIntMean = privRepMean;
k=0;
for g = gains'
k=k+1;
again = T(table2array(T(:,tvarname))==g,:);
%plot(again.gain,table2array(again(:,varnams{1})),'ro','MarkerFaceColor','red')
%plot(again.gain,table2array(again(:,varnams{2})),'bo','MarkerFaceColor','blue')
if ~isempty(varnams{1})
privRepMean(k)=mean(table2array(again(:,varnams{1})));
else
privRepMean(k) = nan;
end
pubRepMean(k)=mean(table2array(again(:,varnams{2})));
if length(varnams)>2
if ~isnan(privRepMean(k))
privIntMean(k) = mean(table2array(again(:,varnams{3})));
else
privIntMean(k) = nan;
end
pubIntMean(k) = mean(table2array(again(:,varnams{4})));
end
end
plot(gains,privRepMean,'r-','LineWidth',shading*3);
hpriv=scatter(gains,privRepMean,shading*60,'MarkerFaceColor','red','MarkerEdgeColor','black');%,'MarkerFaceAlpha',shading,'MarkerEdgeAlpha',shading);
plot(gains,pubRepMean, 'b-','LineWidth',shading*3);
hpub=scatter(gains,pubRepMean,shading*60, 'MarkerFaceColor','blue','MarkerEdgeColor','black');%,'MarkerFaceAlpha',shading,'MarkerEdgeAlpha',shading);
if length(varnams)>2
hpriv2=plot(gains,privIntMean,'r--','LineWidth',shading);
hpub2=plot(gains,pubIntMean,'b--','LineWidth',shading);
end