I\'m aware that this question already exists here: Creating an fts object in R with ftsa to functional data analysis of a time series
but reproducible example and answer
There are different packages that define a class "fts" and you are using the wrong one.
library(ftsa)
#see the link in the documentation for the correct constructor
fts1 <- rainbow::fts(x = data$date, y = as.matrix(data[,-1]))
#apparently colnames must be numbers of the given frequency
#this appears to be at least an documentation bug
#but I know nothing about this kind of analysis
colnames(fts1$y) <- seq_along(colnames(fts1$y))
ftsm(fts1, order=3)
#Functional time series model
#
#Call: ftsm(y = fts1, order = 3)
#
#Main effects: Mean
#Order of interaction: 3
# y: as.matrix(data[, -1])
# x: data$date