У меня есть два списка дат, которые я хотел бы применить к своему коду (первая дата в xx и первая дата в yy, затем вторая дата в xx и вторая дата в yy и т. Д.). (У меня есть краткий список дат для примера). trade1 пуст, поэтому я подхожу к этому неправильно.
xx= c('2018-06-28','2018-07-27')
yy= c('2018-07-12','2018-08-13')
for (xx in seq_along(yy))
{
entry_trades = filter(aa2, Date == xx )%>%
rename(entry_price = Price, entry_date = Date)
exit_trades = filter(aa2, Date == yy)%>%
rename(exit_price = Price, exit_date = Date)
trade1 = merge(entry_trades, exit_trades,by='ticker')
trade1 = mutate(trade1, Chg = exit_price - entry_price,
Chg_pct = round((Chg / entry_price)*100 ,1))%>%
arrange(desc(Chg_pct))
}