Displaying 1 result from an estimated 1 matches for "caritativa".
Did you mean:
caritative
2013 Sep 27
2
Ayuda erreficando un código
...n (comparten la misma
diagonal).
El código es el siguiente:
correcto <- function(p) {
n <- length(p)
for(i in 1:(n-1)) {
for(j in (i+1):n) {
if(abs(p[j] - p[i]) == abs(j – i))
return(FALSE)
}
}
return(TRUE)
}
Si algún alma caritativa de la lista me ayudase a "erreficar" el código le
quedaría muy agradecido. De hecho, en la reunión de usuarios se comentó que
seguramente sea posible escribir esta función con una única línea de código
R.
Muchas gracias a todos
Rafael García
Twitter: @rgarcialeiva
Blog: http://mundoalgo...