I'm trying to predict data on fitted gamlss model, and have an annoying issue,that i can't deal with.

```
 Error in data.frame(data, source = namelist) : 
   arguments imply differing number of rows: 3, 4

```

Code&data

```
library('gamlss')
asfr=c(0.0000000000,0.0001818271,0.0001818271,0.0228344684,0.0228344684)
ages=c(12:16) 
data=data.frame(y=asfr,x=ages)   
model=gamlss(y~x,data=data,method=mixed(1,20))
test=data.frame(x=c(12,13,14))
predict(model,newdata=test, type = "response")   

```

I searched for some similiar issues, but answers with reshape2 didn't work.

Also, as an example i used code on p.89 [up here](https://cran.r-project.org/web/packages/gamlss/gamlss.pdf)