Foro de debate

Solución sin bucles

 
Imagen de Manuel Muñoz Márquez
Re: Solución sin bucles
de Manuel Muñoz Márquez - martes, 14 de febrero de 2017, 22:00
 

Hola:

No he pillado como pasas de 1 a 2.

De 2 a 4 es muy fácil, si m es una matriz (o un data.frame) con los precios como en 2, puedes hacer:

 m <- diag(5)
> m
     [,1] [,2] [,3] [,4] [,5]
[1,]    1    0    0    0    0
[2,]    0    1    0    0    0
[3,]    0    0    1    0    0
[4,]    0    0    0    1    0
[5,]    0    0    0    0    1
> m[,-1] - m[,-ncol(m)]
     [,1] [,2] [,3] [,4]
[1,]   -1    0    0    0
[2,]    1   -1    0    0
[3,]    0    1   -1    0
[4,]    0    0    1   -1
[5,]    0    0    0    1

Sólo faltaría multiplicar el resultado por 10000.

Un saludo.