Learn R Programming

metaSEM (version 0.9.8)

Cheung00: Fifty Studies of Correlation Matrices used in Cheung and Chan (2000)

Description

This data set includes fifty studies of correlation matrices on theory of planned theory reported by Cheung and Chan (2000).

Usage

data(Cheung00)

Arguments

Source

Cheung, S.-F., & Chan, D. K.-S. (2000). The role of perceived behavioral control in predicting human behavior: A meta-analytic review of studies on the theory of planned behavior. Unpublished manuscript, Chinese University of Hong Kong.

Details

A list of data with the following structure:
data
A list of 50 studies of correlation matrices. The variables are attitude toward behavior att, subjective norm sn, behavioral intention bi, and behavior beh

n
A vector of sample sizes

References

Cheung, M.W.-L., & Cheung, S.-F. (in press). Random-effects models for meta-analytic structural equation modeling: Review, issues, and illustrations. Research Synthesis Methods.

Examples

Run this code
## Not run: 
# data(Cheung00)
# 
# ## Variable labels
# labels <- colnames(Cheung00$data[[1]])
# 
# ## Full mediation model
# S <- create.mxMatrix(c("1", 
#                        ".2*cov_att_sn", "1", 
#                        0, 0, ".2*e_bi", 
#                        0, 0, 0, ".2*e_beh"), 
#                      type="Symm", as.mxMatrix=FALSE, byrow=TRUE)
# dimnames(S) <- list(labels, labels)
# S
# 
# A <- matrix(c("0","0","0","0",
#               "0","0","0","0",
#               ".2*att2bi", ".2*sn2bi", "0", "0",
#               "0", "0", ".2*bi2beh", "0"),
#             byrow=TRUE, 4, 4)
# dimnames(A) <- list(labels, labels)
# A
# 
# #### Random-effects model
# 
# ## Stage 1 analysis
# random_1 <- tssem1(Cheung00$data, Cheung00$n, method="REM")
# summary(random_1)
# 
# ## Stage 2 analysis
# random_2 <- tssem2(random_1, Amatrix=A, Smatrix=S, intervals.type="LB", diag.constraints=TRUE)
# summary(random_2)
# 
# ## Load the library
# library("semPlot")
# 
# my.plot1 <- meta2semPlot(random_2)
# semPaths(my.plot1, whatLabels="est", col="yellow")
# ## End(Not run)

Run the code above in your browser using DataLab