% vectorize_logical.m
% 邏輯數組的向量化，求大于5000的元素的平方根
% 1.不預設數組比較程序的執行時間
max=10000;
disp('方法一：不預設數組比較執行時間')
tic;
for i=1:10
    clear sqr;
    for j=1:max
        if j>5000
            sqr=sqrt(j);
        end
    end
end
toc;
max=10000;
disp('方法二：通過數組比較執行時間')
tic;
for i=1:10
    clear sqr;
    a=1:max;
    b=a>5000;
    sqr(b)=sqrt(a(b));
end
toc;