I forgot - see attached file called "MAC Data Plywood 18.txt"
Modal Assurance Criterion - scale bar
7 次查看(过去 30 天)
显示 更早的评论
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
0 个评论
回答(1 个)
另请参阅
类别
在 Help Center 和 File Exchange 中查找有关 Graphics Object Properties 的更多信息
产品
Community Treasure Hunt
Find the treasures in MATLAB Central and discover how the community can help you!
Start Hunting!