% Generated by roxygen2: do not edit by hand
% Please edit documentation in R/amaretto_preprocess.R
\name{aprior}
\alias{aprior}
\title{aprior}
\usage{
aprior(gamma.hat)
}
\value{
result
}
\description{
Following four find empirical hyper-prior values
}
\keyword{internal}