% Generated by roxygen2: do not edit by hand
% Please edit documentation in R/accrual.R
\docType{methods}
\name{estimateAccrualParameter}
\alias{estimateAccrualParameter}
\alias{estimateAccrualParameter,EventData-method}
\title{Generic function to estimate non-uniformity accrual 
parameter \code{k}}
\usage{
estimateAccrualParameter(object, ...)

\S4method{estimateAccrualParameter}{EventData}(object,
  start.date = min(object@subject.data$rand.date),
  end.date = max(object@subject.data$rand.date))
}
\arguments{
\item{object}{An \code{EventData} object}

\item{...}{Additional arguments to be passed to specific method}

\item{start.date}{The startdate for recruitment, by default the date 
the first subject is recruited. If subjects are recruited on start.date, it is
assumed they are recruited on the following day to avoid log(0) in the 
maximum likelihood estimate.}

\item{end.date}{The end date for recruitment, by default the date 
the last subject is recruited.}
}
\value{
A maximum likelihood estimate for k, see vignette 
for further details
}
\description{
Note The estimate produced assumes recruitment has completed.
}