Получение сообщения об ошибке при расчете rmse в анализе временных рядов

Question

Я пытаюсь воспроизвести этот пример анализа временных рядов в R, используя Keras (см. Здесь ), и, к сожалению, я получаю сообщение об ошибке при вычислении первого среднего числа

coln <- colnames(compare_train)[4:ncol(compare_train)]
cols <- map(coln, quo(sym(.)))
rsme_train <-
  map_dbl(cols, function(col)
    rmse(
      compare_train,
      truth = value,
      estimate = !!col,
      na.rm = TRUE
    )) %>% mean()

rsme_train

Сообщение об ошибке:

Ошибка в is_symbol (x): объект '.' не найдено

В нижней части поста есть несколько полезных комментариев, но новая версия dplyr действительно не помогает. Любое предложение, как обойти это?