This function calculates log-likelihood for "hpaBinary" object
## S3 method for class 'hpaBinary' logLik(object, ...)
object
Object of class "hpaBinary"
...
further arguments (currently ignored)