euler.m

来自「RSA encrption algorithms」· M 代码 · 共 11 行

%%%%%%%%%%%%%%%%%%
% Euler function  %
%%%%%%%%%%%%%%%%%%
function [out]=Euler(in)
count=0;
for i=1:1:in-1
    if(gcd(i,in)==1)
        count=count+1;
    end
end
out=count;