前回の記事の続きです。 takehana13.hateblo.jp 今回はバックテストデータをパラメータの値ごとに分析することを考えます。まずストラテジー全体を関数化します。 strategy_ema <- function(data, n){ term1 <- data %>% group_by(symbol) %>% tq_mutate(sel…