# load reg_af data
regpi_af <- read.csv("D:/01_Projects/R-PredictiveMiantenance/regpi_af.csv")

# load library forvision 
library(forvision)
acc <-  calculateRMSE(reg_af)
acc$accuracy
acc$plot
acc$rank


forvis/forvision documentation built on April 30, 2020, 3:28 a.m.