trend_friend <- asset_allocations$tactical$trend_friend
reb_date <- as.Date("2022-03-31")
tactical_TrendFriend_RP(trend_friend,
reb_date,
ETFs$Prices[, trend_friend$tickers],
ETFs$Returns[, trend_friend$tickers]
)
Run the code above in your browser using DataLab