歐拉函數的計算

# 歐拉 函數是小於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)     {      

>>阅读原文<<