Modal Assurance Criterion - scale bar

Hi,

How to change scale bar for percentage?

function MAC = autoMAC(modeShape)

clc

close all

clear

modeShape=load("MAC Data Plywood 18.txt");

[~, numMode]= size(modeShape);

MAC = zeros(numMode,numMode,'double'); % Initialize MAC matrix

for mode1 = 1:numMode

for mode2 = 1:numMode

MAC(mode1,mode2) = abs(modeShape(:,mode1)'*modeShape(:,mode2))/ ...

sqrt(abs((modeShape(:,mode1)'*modeShape(:,mode1))*(modeShape(:,mode2)'*modeShape(:,mode2))));

end

end

% ---------------------- Plot MAC

figure

barMAC = bar3(MAC);

set(gca,'XTick',[],'YTick',[],'Visible', 'off')

for k = 1:length(barMAC)

zdata = barMAC(k).ZData;

barMAC(k).CData = zdata;

barMAC(k).FaceColor = 'interp';

end

colormap(jet)

cH = colorbar;

set(cH,'FontSize',15,'fontname','Times New Roman')

view([-90 90])

box on

end

Answer 1

[Arkadiusz Charuk]

I forgot - see attached file called "MAC Data Plywood 18.txt"