Description Usage Format Details References Examples
This data is used to study the policy impact of social movements.
1 |
A data frame with 30 observations on the following 6 variables.
Case
a character vector
Protest
a numeric vector
Opinion
a numeric vector
Allies
a numeric vector
Parties
a numeric vector
Alliances
a numeric vector
PolicyChange
a numeric vector
This data was collected from a previous study on the policy impact of antinuclear,ecology, and peace movements in three countries. Giugni and Sakura replicated the analysis with QCA.
The example section also demonstrates the advantages of using R to do QCA, because it has strong capacity of data manipulation.
Giugni, Marco and Sakura Yamasaki. 2009. "The Policy Impact of Social Movements: A Replication Through Qualitative Comparative Analysis." Mobilization: An International Quarterly 14 (4) : 467 - 484.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 | ## ecology movement
ecology <- GiugniYamasaki2009[grep("-E",GiugniYamasaki2009$Case),]
ecology$opinion <- as.numeric(ecology$Opinion>63)
ecology$alliances <- as.numeric(ecology$Alliances>127)
cs_truthTable(ecology,"PolicyChange",c('Protest','opinion','alliances'),case="Case")
reduce(PolicyChange~Protest+opinion+alliances,ecology,case="Case")
## anti-nuclear movement
nuclear <- GiugniYamasaki2009[grep("-N",GiugniYamasaki2009$Case),]
nuclear$opinion <- as.numeric(nuclear$Opinion>51)
nuclear$alliances <- as.numeric(nuclear$Alliances>127)
reduce(PolicyChange~Protest+opinion+alliances,nuclear,case="Case")
## Peace movement
peace <- GiugniYamasaki2009[grep("-P",GiugniYamasaki2009$Case),]
peace$opinion <- as.numeric(peace$Opinion>40)
peace$alliances <- as.numeric(peace$Alliances>127)
reduce(PolicyChange~Protest+opinion+alliances,peace,case="Case")
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.