我正在尝试针对实际情况计算预测模型的准确性。在这种情况下，我正在使用线性回归来预测我的期望值。该图显示了预测模型与实际模型之间的良好准确性，但不如我对准确性的计算所表明的那样好。我正在使用以下代码来计算我在Rstudio中的模型的准确性：
predicted <- import.list$y1
actual <- import.list$T_stp_cool
comparison <- data.frame(actual,predicted)
difference <- ((actual-predicted)/actual)
accuracy=1-abs(mean(difference))
在这种情况下，大多数情况下准确度为99％，但是将实际情况的图与预测的图进行比较不会显示出99％的准确度。计算模型精度的最准确方法是什么？