r (Entero>0)