# NOT RUN {
data(act_29pt)
data(clinic_29pt_ahi)
data <- act_29pt
ahi <- clinic_29pt_ahi
matchid <- fda.matchid(data, ahi, "contin")
FDcont <- fda.smoothdata(matchid)
geftFDcont <- flm_cate(FDcont)
# }
Run the code above in your browser using DataLab