R/summary.ppm.R

Defines functions summary.ppm

#' @export
#'
summary.ppm<-function(object, ...){

  se <- object$se
  zval <- coef(object)/se
  TAB <- cbind(Estimate = coef(object), StdErr = se, z.value = zval,
               p.value = 2 * pnorm(-abs(zval), mean = 0, sd = 1))


  res <- list(call = object$call, coefficients = TAB, loglik = object$loglik,boundaryissue=object$boundaryissue,strictconcavity=object$strictconcavity)
  class(res) <- "summary.ppm"
  res
}

Try the lcpm package in your browser

Any scripts or data that you put into this service are public.

lcpm documentation built on Jan. 9, 2020, 9:07 a.m.