用R计算平均方向精度

Question

我在R工作的数据框有两个变量：股票的实际时间序列值及其每日情绪分数，我想了解预测的准确性。 有没有办法用R？

计算平均方向精度

Answer 1

使用基本R函数进行滞后差异（diff），符号提取（sign）和mean，您可以为两个数据向量创建用户函数：

MDirAcc <- function(Actual, Forecast, lag=1) {
    return( mean(sign(diff(Actual, lag=lag))==sign(diff(Forecast, lag=lag))) )
}

lag值允许您对其他时间间隔评估的每日数据执行此操作。