用R计算平均方向精度

用R计算平均方向精度,r,statistics,R,Statistics,我在R中使用一个数据框架,它有两个变量:股票的实际时间序列值和每日情绪分数,我想了解预测的准确性。 有没有办法用R计算平均方向精度?使用基本R函数计算滞后差(diff)、符号提取(sign)和Mean,您可以创建一个用户函数来为两个数据向量执行此操作: MDirAcc <- function(Actual, Forecast, lag=1) { return( mean(sign(diff(Actual, lag=lag))==sign(diff(Forecast, lag=lag

我在R中使用一个数据框架,它有两个变量:股票的实际时间序列值和每日情绪分数,我想了解预测的准确性。
有没有办法用R计算平均方向精度?

使用基本R函数计算滞后差(
diff
)、符号提取(
sign
)和
Mean
,您可以创建一个用户函数来为两个数据向量执行此操作:

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

mdirac使用用于滞后差(
diff
)、符号提取(
sign
)和
mean
)的基本R函数,您可以创建一个用户函数来为两个数据向量执行此操作:

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

mdirac您应该提供一小部分数据样本-这将有助于获得答案。您应该提供一小部分数据样本-这将有助于获得答案。