Foro de debate

Función que entregue el i-ésimo decimal de un número

Función que entregue el i-ésimo decimal de un número

de Manuel Palacios -
Número de respuestas: 1

Buenas, no se si yo me estoy complicando demasiado, pero aquí va.

¿Cómo creo una función que tome un número "x", y un número natural "r"(que será la posición del decimal que quiero), y me arroje el r-ésimo decimal de "x"?

Por ejemplo:

x<-4.35498

r<-3

Entonces la función debería devolver "4"


De antemano, gracias


En respuesta a Manuel Palacios

Re: Función que entregue el i-ésimo decimal de un número

de Manuel Muñoz Márquez -

Buenas:

Creo que esto te sirve.

Un saludo.

> cifra <- function(x, n) {
+ x <- x * 10^(n-1)
+ x <- x - floor(x)
+ x <- floor(x * 10)
+ x
+ }
> cifra(12.468, 1)
[1] 4
> cifra(12.468, 2)
[1] 6
> cifra(12.468, 0)
[1] 2