1d:T518,# Smooth the concurrent effects functions in a `ptFCReg` object using local linear regression. The local linear regression is implemented using the function `Lwls1D`. ```r smPtFCRegCoef(object, bw, kernel_type) ``` ## Arguments - `object`: An object of class `ptFCReg` returned by the function `ptFCReg`. - `bw`: Scalar holding the bandwidth. - `kernel_type`: Character holding the kernel type (see `Lwls1D` for supported kernels). ## Returns An object of class `ptFCReg`, where the fields `beta0` and `beta` hold the smoothed intercept functions and concurrent effects functions, respectively. See `ptFCReg` for a complete list of the fields. ## Examples ```r set.seed(1) n <- 50 nGridIn <- 101 tGrid <- seq(0, 1, length.out=nGridIn) # Functional data support muX1 <- tGrid * 2 # mean function for X_1 sigma <- 1 beta0 <- 0 beta <- rbind(cos(tGrid), 1.5 + sin(tGrid)) Z <- MASS::mvrnorm(n, rep(0, 2), diag(2)) X_1 <- Z[, 1, drop=FALSE] %*% matrix(1, 1, nGridIn) + matrix(muX1, n, nGridIn, byrow=TRUE) epsilon <- rnorm(n, sd=sigma) Y <- t(sapply(seq_len(n), function(i) { beta0 + beta[1,] * X_1[i, ] + beta[2,] * Z[i, 2] + epsilon[i] })) dat <- list(X1=X_1, Z1=Z[, 2], Y=Y) res <- ptFCReg(tGrid = tGrid, dat = dat) smres <- smPtFCRegCoef(res, bw = 2.5 / (nGridIn-1), kernel_type = 'epan') ```1e:T49a,M7.49933 0.25C3.49635 0.25 0.25 3.49593 0.25 7.50024C0.25 10.703 2.32715 13.4206 5.2081 14.3797C5.57084 14.446 5.70302 14.2222 5.70302 14.0299C5.70302 13.8576 5.69679 13.4019 5.69323 12.797C3.67661 13.235 3.25112 11.825 3.25112 11.825C2.92132 10.9874 2.44599 10.7644 2.44599 10.7644C1.78773 10.3149 2.49584 10.3238 2.49584 10.3238C3.22353 10.375 3.60629 11.0711 3.60629 11.0711C4.25298 12.1788 5.30335 11.8588 5.71638 11.6732C5.78225 11.205 5.96962 10.8854 6.17658 10.7043C4.56675 10.5209 2.87415 9.89918 2.87415 7.12104C2.87415 6.32925 3.15677 5.68257 3.62053 5.17563C3.54576 4.99226 3.29697 4.25521 3.69174 3.25691C3.69174 3.25691 4.30015 3.06196 5.68522 3.99973C6.26337 3.83906 6.8838 3.75895 7.50022 3.75583C8.1162 3.75895 8

smPtFCRegCoef function