R中哪个函数可以实现计算两个整数的最大公约数

急，在线等

快呀！高人指导一下，谢谢

或者教教怎么去找可以实现这一功能的函数

看帖回帖，积累人品

循环取余，从两个整数a，b的最小值开始，x=min（a,b)，a,b对x分别取余，如果不都为零，x=x-1，循环重复上述步骤

于洁晨 发表于 2014-9-28 14:24
循环取余，从两个整数a，b的最小值开始，x=min（a,b)，a,b对x分别取余，如果不都为零，x=x-1，循环重复上述 ...

谢谢我想想

#include <stdio.h>
int max(int p_a,int p_b)
{
        if(p_b==0)
                return p_a;
        else
                return max(p_b,p_a%p_b);
}
void main()
{
        int a,b;
        printf("Input two numbers:\n");
        scanf("%d %d",&a,&b);
        if(b<a)
                printf("最大公约数为:%d\n",max(a,b));
        else
                printf("最大公约数为:%d\n",max(b,a));
}
已经调试过了，没有问题：
Input two numbers:
2 8
最大公约数为:2
Input two numbers:
3 9
最大公约数为:3

秋叶听雪愁此间 发表于 2014-9-28 17:18
#include
int max(int p_a,int p_b)
{

如果要实现循环呢，抽取a和b各10^6个，行不行呢