Create de base 10 a base r