Incorrect number of dimensions with yeojohnson

Hiya! I'm getting the following error when attempting to reverse a yeo-johnson transform:  

```
power_transform <- yeojohnson(c(1,2,3))
test <- predict(power_transform)
predict(power_transform, newdata=test, inverse = TRUE)
```

```
Error in newdata[, who] : incorrect number of dimensions
```

Not sure if it's on my end, but can't seem to use it