R/effeihg.R

In CUB: A Class of Mixture Models for Ordinal Data

#' @title Auxiliary function for the log-likelihood estimation of IHG models without covariates
#' @description Compute the opposite of the log-likelihood function for an IHG model without covariates.  
#' @aliases effeihg
#' @usage effeihg(theta, m, freq)
#' @param theta Initial estimate for the parameter of the IHG distribution
#' @param m Number of ordinal categories
#' @param freq Vector of the absolute frequency distribution of the ordinal responses
#' @keywords internal 
#' @details It is called as an argument for "optim" within IHG function (when no covariate is specified)
#' as the function to minimize.


effeihg <-
function(theta,m,freq){-loglikihg(m,freq,theta)}