Page 17 - MEDIATION & MODERATION
P. 17
3.1 مثال على بيانات الإشراف
قم بتعيين دليل عمل مناسب وقم بإنشاء مجموعة البيانات التالية.
سنقول إننا مهتمون بما إذا كانت العلاقة بين عدد ساعات النوم، ( في هذا المثالX) التي يتلقاها طالب ا
( لدراسات العليا والاهتمام الذي يولونه لهذا البرنامج التعليميY) ( تتأثر باستهلاكهم للقهوةZ) .
هنا نقوم بإنشاء تأثير الاعتدال من خلال جعلDV (Y) نتاج مستوياتIV (X) ( والمنسقZ).
#setwd("location") #Working directory
set.seed(123)#Standardizes the numbers generated by rnorm; see Chapter
5
N <- 100 #Number of participants; graduate students
X <- abs(rnorm(N, 6, 4)) #IV; Hours of sleep
X1 <- abs(rnorm(N, 60, 30)) #Adding some systematic variance for our DV
Z <- rnorm(N, 30, 8) #Moderator; Ounces of coffee consumed
Y <- abs((-0.8*X) * (0.2*Z) - 0.5*X - 0.4*X1 + 10 + rnorm(N, 0, 3)) #D
V; Attention Paid
Moddata <- data.frame(X, X1, Z, Y)
summary(Moddata) X1 ZY
## X
## Min. : 0.195 Min. : 1.597 Min. :15.95 Min. : 2.386
## 1st Qu.: 4.025 1st Qu.: 35.967 1st Qu.:25.75 1st Qu.: 30.155
## Median : 6.247 Median : 53.225 Median :30.29 Median : 47.761
17
