matlab实现RSA公钥密码体制

function [cm1]=RSA（mn）
%RSA公钥密码体制求明文m的密文c并通过解密得明文m1验证
B=15;
[flagpq]=factors_resolve（nB） ;
if flag==0
    error（‘n不能分解成两个素数的乘积‘）;
else
    phi_n=（p-1）*（q-1）;
    
    e=2;%求加密密钥e
    while e      if gcd（ephi_n）~=1  %求最小公子
          e=e+1;
      else