Convert object of class pibblefit to a list

# S3 method for pibblefit
as.list(x, ...)

Arguments

x	an object of class pibblefit
...	currently unused

if (FALSE) {
fit <- pibble(Y, X)
as.list(fit)
}