Insertion de retours de données

Question

Je tente d'insérer une colonne dans une base de données nommée Reference avec des retours de stocks obtenus à partir d'une autre base de données appelée Quotes.

Quotes <- data.frame (Ticker = c("Petr4","Petr4","Petr4","Abev3","Abev3","Petr4","Petr4","Abev3","Abev3","Abev3"), 
        Close = c(15.80,15.55,15.90,18.52,19.57,16.25,16.50,19.20,19.18,19.7)) 

Reference <- aggregate(cbind(Close) ~ Ticker, data = (Quotes), FUN = last) 

Voici comment la colonne insérée aimerait (dernier retour N Jours):

Reference$Return <- c(0.044303797,0.063714903) 

Je utilise Quantmod FUN Dernière pour obtenir la dernière citation, toute autre idée?

Answer 1

La valeur sur Référence est divisée par la valeur retardée sur le devis. Dans le premier cas 16.50 (Dernière valeur de Petr4 divisé par sa valeur décalée (-5) de 15.8 moins 1.