欧拉函数的计算

# 欧拉 函数是小于n的正整数中与n 互质 的数的数目 #判里两个数是不是互质 is.prime <- function(n,m) {   flag <- 1   temp1 <- min(m,n)   if(temp1 ==1)   {     flag <- 1   }   else if(temp1 == 2)   {     if(max(n,m)%%2 == 0)     {      

>>阅读原文<<