fix formatting for loadLm

se.fit, se.pred, etc. options are getting ignored in `predictSolute(loadLm, lin.or.log='log')`. Need to fix.

```r
> preds_lin <- predictSolute(load.model, "conc", newdata=newdata, se.pred=TRUE, date=TRUE, lin.or.log='linear')
> preds_log <- predictSolute(load.model, "conc", newdata=newdata, se.pred=TRUE, date=TRUE, lin.or.log='log')
> head(preds_lin)
date fit se.pred
1 1999-10-01 01:00:00 0.1728017 0.06321744
2 1999-10-01 07:00:00 0.1721623 0.06297673
3 1999-10-01 13:00:00 0.1717108 0.06280702
4 1999-10-01 19:00:00 0.1720093 0.06291919
5 1999-10-02 01:00:00 0.1721623 0.06297673
6 1999-10-02 07:00:00 0.1723180 0.06303529
> head(preds_log)
date fit se.fit se.pred
1 1999-10-01 01:00:00 -1.818414 0.02119104 0.3544120
25 1999-10-01 07:00:00 -1.822109 0.02058311 0.3543761
49 1999-10-01 13:00:00 -1.824727 0.02016426 0.3543521
73 1999-10-01 19:00:00 -1.822995 0.02044014 0.3543679
97 1999-10-02 01:00:00 -1.822109 0.02058311 0.3543761
121 1999-10-02 07:00:00 -1.821208 0.02072957 0.3543847
```