# NOT RUN {
library(TRES)
## Load data "bat"
data("bat")
x <- bat$x
y <- bat$y
fit <- TRR.fit(x, y, method="standard")
## Print cofficient
coef(fit)
## Print the summary
summary(fit)
## Make the prediction on the original dataset
predict(fit, x)
## Draw the plot of two-way coefficient tensor (i.e., matrix)
plot(fit)
# }
Run the code above in your browser using DataLab