Coprimes: Difference between revisions

Content added Content deleted
No edit summary
mNo edit summary
Line 864: Line 864:


function coprimes = coprime(a,b)
function coprimes = coprime(a,b)
coprimes = cell(1,numel(a));
gcds = gcd(a,b) == 1;
coprimes(1,:) = a(gcds);
for i = 1:numel(a)
coprimes(2,:) = b(gcds);
if gcd(a(i),b(i)) == 1
coprimes{i}(1) = a(i);
coprimes{i}(2) = b(i);
end
end
not_coprimes = cellfun('isempty',coprimes);
coprimes(not_coprimes) = [];
end</syntaxhighlight>
end</syntaxhighlight>


{{out}}
{{out}}
<pre>{[17 23]} {[18 29]}</pre>
<pre> 17 18
23 29</pre>


=={{header|Nim}}==
=={{header|Nim}}==