R 计算工具的日记收入

我想用一种工具的价格来计算日记收入

instrument=c(1,2,3,4,5,1,2,3,4,5,1,2,3,4,5)
price=c(12,13,29,20,87,24,14,78,46,98,23,67,25,88,27)
date=c("2019-04-01","2019-04-01","2019-04-01","2019-04-01","2019-04-01","2019-04-02","2019-04-02","2019-04-02","2019-04-02","2019-04-02","2019-04-03","2019-04-03","2019-04-03","2019-04-03","2019-04-03")
tabla1=data.frame(instrument,price,date)

---

我想知道如何计算我在2019-04-01和2019-04-02之间从工具1中赚取的钱，如果您希望每日回报为

p（t）/p（t-1）-1

，那么：

library(data.table)

dt <- as.data.table(tabla1)
dt[, return := price / shift(price) - 1, by = .(instrument)]

库（data.table）
你是说每天？在任何情况下，请展示一个您尝试过的示例以及失败的原因。有许多问题可以达到同样的效果<代码>集体娱乐

风格。你能用一个计算示例来澄清这个问题吗？