QCA (version 1.0-4)

pof: Set-Relational Parameters of Fit

Description

This function computes three set-relational parameters of fit: inclusion, PRI and coverage scores.

Usage

pof(setms, mydata, outcome = "", neg.out = FALSE, relation = "necessity", ...)

Arguments

setms

Set membership scores, or a matrix with crisp-set representations, or a vector of line numbers

mydata

The original dataset

outcome

The name of the outcome set

neg.out

Logical, use negation of outcome set

relation

The set relation of the conditions to the outcome, either "necessity" or "sufficiency"

...

Other arguments from the generic print (not used in this function)

Details

The argument setms specifies a dataframe of set membership scores, where set refers to any kind of set, including original condition sets, conjunctive or disjunctive combinations returned by superSubset(), prime implicants returned by eqmcc() or any other compound set. It can also be a matrix with the crisp-set representation of the conditions, or even a vector of line numbers corresponding to those representations.

References

P. Emmenegger. Job Security Regulations in Western Democracies: A Fuzzy Set Analysis. European Journal of Political Research, 50(3):336-364, 2011.

M. L. Krook. Women's Representation in Parliament: A Qualitative Comparative Analysis. Political Studies, 58(5):886-908, 2010.

Examples

# csQCA using Krook (2010)
#-------------------------
data(Krook)
Krook
x <- Krook[,1:5]
 
# get necessity parameters of fit for all conditions
pof(x, Krook, outcome = "WNP")

# now for the negated outcome
pof(x, Krook, outcome = "WNP", neg.out = TRUE)

# get sufficiency parameters of fit for all original conditions
pof(x, Krook, outcome = "WNP", relation = "sufficiency") 

# now for the negated outcome
pof(x, Krook, outcome = "WNP", neg.out = TRUE, relation = "sufficiency")

# fsQCA using Emmenegger (2011)
#------------------------------
data(Emme)
Emme

# first test for necessary conditions with superSubset(), then 
# check whether the returned combinations are also necessary for 
# the negation of the outcome

EmmeNR <- superSubset(Emme, outcome = "JSR", incl.cut = 0.965, cov.cut = 0.6)
EmmeNR
pof(EmmeNR$coms, Emme, outcome = "JSR", neg.out = TRUE) 

# first derive the complex solution, then check whether the negations 
# of the prime implicants are also sufficient for the outcome 

EmmeSC <- eqmcc(Emme, outcome = "JSR", incl.cut1 = 0.9, details = TRUE)
EmmeSC
pof(1 - EmmeSC$pims$c.sol, Emme, outcome = "JSR", relation = "sufficiency")

# parameters of fit for any term, including configurations;
# use "-1" as a placeholder for a minimized condition;
# matrix representation of R*p*V and S*c*L*P*v:
#      "S"  "C"  "L"  "R"  "P"  "V"
#
#     [,1] [,2] [,3] [,4] [,5] [,6]
#[1,]   -1   -1   -1    1    0    1
#[2,]    1    0    1   -1    1    0

confs <- matrix(c(-1, -1, -1,  1, 0, 1, 
                   1,  0,  1, -1, 1, 0), nrow = 2, byrow = TRUE)
confs
pof(confs, Emme, outcome = "JSR", relation = "sufficiency")

# or even vectors of line numbers from the implicant matrix
pof(c(43, 57), Emme, "JSR", relation = "sufficiency")

# the line numbers 43 and 57 represent l*r*P and L*V:
#      "S"  "C"  "L"  "R"  "P"  "V"
#
#     [,1] [,2] [,3] [,4] [,5] [,6]
#[1,]   -1   -1    0    0    1   -1 
#[2,]   -1   -1    1   -1   -1    1  

getRow(rep(3, 6), c(43, 57)) - 1

# parameters of fit for a data frame
x <- data.frame(A = c(1,1,1,0,1), B = c(1,1,1,0,1),
                C = c(0,1,0,0,1), D = c(0,0,1,0,1),
                O = c(1,1,1,0,1))

pof(x[,-5], x, outcome = "O")

# for a single column from that data frame;
# requires special argument drop = FALSE to avoid
# dropping of dimensions and conversion to vector
pof(x[, "C", drop = FALSE], x, outcome = "O")

# for multiple columns from that data frame
pof(x[, 1:2], x[, 1:5], outcome = "O")