Para obter o resto da divisão de dois números utilize o operador modulo `%`

Altere a condição para  

    while(Rnumber1 % Rnumber2 != 0)