Given a partial order (arguments profiles
and/or
zeta
) and a selected threshold
,
the function returns an object of S3 class parsec
.
In particular, the function returns the identification function and
different severity measures, computed by uniform sampling of the linear extensions of the poset, through a C implementation of the Bubley - Dyer (1999) algorithm.
evaluation(
profiles = NULL,
threshold,
error = 10^(-3),
zeta = getzeta(profiles),
weights = {
if (!is.null(profiles))
profiles$freq
else rep(1, nrow(zeta))
},
distances = {
n <- nrow(zeta)
matrix(1, n, n) - diag(1, n)
},
linext = lingen(zeta),
nit = floor({
n <- nrow(zeta)
n^5 * log(n) + n^4 * log(error^(-1))
}),
maxint = 2^31 - 1
)
an object of S3 class wprof
.
a vector identifying the threshold. It can be a vector of indexes (numeric), a vector of profile names (character) or a boolean vector of length equal to the number of profiles.
the "distance"" from uniformity in the sampling distribution of linear extensions.
the incidence matrix of the poset. An object of S3 class incidence
.
By default, extracted from profiles
and the order of variable modalities.
weights assigned to profiles. If the argument profiles
is not NULL
,
weights are by default set equal to profile frequencies, otherwise they are
set equal to 1.
matrix of distances between profiles. The matrix must be square, the dimensions must be equal to the number of profiles and complete. Even if the matrix is complete, the distance between two profiles profiles is considered only if one profile covers the other.
the linear extension initializing the sampling algorithm. By default, it is generated by lingen(zeta)
. Alternatively, it can be provided by
the user through a vector of profile positions.
Number Of Iterations in the Bubley-Dyer algorithm, by default evaluated from a formula of Karzanov and Khachiyan
based on the number of profiles and the argument error
(see Bubley and Dyer, 1999).
Maximum integer. By default the maximum integer obtainable in a 32bit system.
This argument is used to group iterations and run the compiled
C code more times, so as to avoid memory indexing problems. User can
set a lower value to maxint
in case of low RAM availability.
an object of S3 class wprof
reporting poset profiles
and their associated frequencies (number of statistical units in each profile).
number of profiles.
number of variables.
S3 class incidence
, incidence matrix of the poset.
S3 class cover
, cover matrix of the poset.
boolean vector specifying whether a profile belongs to the threshold.
number of iterations performed by the Bubley-Dyer algorithm.
matrix reporting by rows the relative frequency distribution of the poverty ranks of each profile, over the set of sampled linear extensions.
vector reporting the relative frequency a profile is used as threshold in the sampled linear extensions. This result is useful for a posteriori valuation of the poset threshold.
vector of weights assigned to each profile.
matrix of distances between profiles, used to evaluate the measures of gap.
vector reporting the identification function, computed as the fraction of sampled linear extensions where a profile is in the downset of the threshold.
vector reporting, for each profile, the average graph distance from the first profile above all threshold elements, over the sampled linear extensions. In each linear extension, the distance is set equal to 0 for profiles above the threshold.
equal to svr_abs divided by its maximum, that is svr_abs of the minimal element in the linear extension.
vector reporting, for each profile, the average graph distance from the maximum threshold element, over the sampled linear extensions. In each linear extension, the distance is set equal to 0 for profiles in the downset of threshold elements.
the previous absolute distance is divided by its maximum possible value, that is the absolute distance of the threshold from the maximal element in the linear extension.
Population mean of svr_rel
Population mean of wea_rel
%\item{inequality}{when the argument \code{inequality} is \code{TRUE}, the average value of the inequality index over the linear extensions (see Fattore and Arcagni, 2013).}
Bubley R., Dyer M. (1999), Faster random generation of linear extensions, Discrete Math., 201, 81-88.
Fattore M., Arcagni A. (2013), Measuring multidimensional polarization with ordinal data, SIS 2013 Statistical Conference, BES-M3.1 - The BES and the challenges of constructing composite indicators dealing with equity and sustainability
# NOT RUN {
profiles <- var2prof(varlen = c(3, 2, 2))
threshold <- c("311", "112")
res <- evaluation(profiles, threshold, maxint = 10^5)
summary(res)
plot(res)
# }
Run the code above in your browser using DataLab