Giriş

Bu çalışmada, algılanan ebeveyn akademik desteğini ölçmeye yönelik 8 maddelik ölçek, farklı Madde Tepki Kuramı (MTK) modelleri çerçevesinde incelenmiştir. Değerlendirilen modeller arasında Aşamalı Tepki Modeli (Graded Response Model, GRM), Kısmi Kredi Modeli (Partial Credit Model, PCM), Genelleştirilmiş Kısmi Kredi Modeli (Generalized PCM, GPCM) ve Dereceli Puanlama Modeli (Rating Scale Model, RSM) bulunmaktadır. Modellerin veriyle uyumu log-olabilirlik (log-likelihood) değerlerine göre değerlendirilmiş; ayrıca model karmaşıklığını dikkate alan Akaike Bilgi Ölçütü (AIC) ve Bayesyen Bilgi Ölçütü (BIC) gibi bilgi kriterleriyle karşılaştırılmıştır. Bu doğrultuda, uyum indeksleri temel alınarak en uygun model belirlenmiştir.

Seçilen model doğrultusunda, her bir maddeye ilişkin parametre kestirimleri gerçekleştirilmiştir. Bu kapsamda, modelin doğasına bağlı olarak maddelere ait ayırt edicilik katsayıları (a parametreleri) ve kategori eşik değerleri (b parametreleri) elde edilmiştir. Elde edilen bu parametreler, maddelerin ölçme duyarlılığı ve ölçeğin psikometrik özellikleri hakkında ayrıntılı yorumlara olanak tanımıştır.

Veri ve Ölçek

Analizlerde, Kırklareli ilindeki çeşitli liselerde öğrenim gören toplam 849 öğrenciden elde edilen veriler kullanılmıştır. Veriler, öğrencilerin algıladıkları ebeveyn akademik desteğini değerlendirmek amacıyla geliştirilmiş 8 maddelik bir Likert tipi ölçek aracılığıyla toplanmıştır. Ölçekte yer alan her bir madde, öğrencinin ailesinden aldığı akademik desteğin düzeyini 5’li Likert tipi bir değerlendirme ile ifade etmektedir (1 = “Hiç katılmıyorum” ile 5 = “Tamamen katılıyorum” arası). Ölçek puanları, sıralı kategorik yapıdadır ve her bir öğrenci için sekiz ayrı madde puanı mevcuttur.

Veriler SPSS formatında (eak.sav) kayıt altına alınmış ve analiz süreçleri için R 4.3.0 ortamına aktarılmıştır. Veri seti üzerinde gerçekleştirilen ön işlemler sonucunda, analizlerde kullanılmak üzere eksik veri içermeyen ve istatistiksel analiz için uygun yapıya sahip bir çalışma dosyası elde edilmiştir. Tüm maddelerin çok kategorili sıralı (ordinal) yapıda olduğu belirlenmiş ve analizler bu veri yapısına uygun modellerle gerçekleştirilmiştir.

Modeller

Samejima (1969) tarafından geliştirilen bu model, iki parametreli lojistik modelin sıralı kategorilere uyarlanmış halidir. GRM’de her madde için bir ayırt edicilik (eğim) parametresi ve her puan kategorisi eşiği için ayrı zorluk parametreleri tahmin edilir. Bu model, Likert tipi tutum maddelerinin analizinde yaygın olarak kullanılmaktadır.

Rasch’ın tek parametreli modelinin uzantısı olup Masters (1982) tarafından önerilmiştir. PCM’de tüm maddelerin ayırt edicilik parametreleri 1’e sabitlenir (tüm maddelerin ayırt edicilikleri eşit varsayılır) ve her madde için puan kategorisi eşikleri tahmin edilir. Bu model, maddelerin kısmi kredi (partial credit) şeklinde puanlandığı durumlara uygundur.

Muraki (1992) tarafından geliştirilen bu model, PCM’nin ayırt edicilik parametresini serbest bırakarak genelleştirilmiş halidir. Her madde için hem bir ayırt edicilik parametresi hem de kendi puan eşiği parametreleri tahmin edilir.

Andrich (1978) tarafından önerilen bu modelde, tüm maddelerin aynı kategori eşiklerine sahip olduğu varsayılır. Bu model, her madde için ayırt edicilik parametresini sabit alır ve tüm maddelerde ortak eşikler kullanır. Yapı bakımından PCM’ye benzese de kategori eşikleri maddeye özel değil, geneldir.

Veri Analizi Süreci

Veri analizi sürecinde öncelikle veri R ortamına aktarılmış ve uygun formatta düzenlenmiştir. Ardından farklı MTK modelleri uygulanarak log-likelihood, AIC ve BIC değerleri hesaplanmıştır. Model uyum istatistikleri karşılaştırılarak en uygun model belirlenmiştir. Seçilen model üzerinden madde parametreleri (ayırt edicilik ve eşik değerleri) tahmin edilmiştir. Ayrıca, her bir maddenin karakteristik eğrileri (ICC) ve madde bilgi fonksiyonları hesaplanmış; test bilgi fonksiyonu ile birlikte grafiksel olarak sunulmuştur.

library(mirt)
library(ltm)
library(psych)
library(dplyr)
library(haven)
library(knitr)
library(kableExtra)
library(eRm)

Varsayımların Kontrol Edilmesi

1) Tek Boyutluluk Varsayımı

Tek boyutluluk varsayımını test etmek için iki yöntem kullanılmıştır: Temel bileşenler analizi (PCA) ve Ağ Tabanlı Faktör Analizi (EGA). Bu yöntemler, veri setinin tek boyutlu bir yapıya sahip olup olmadığını değerlendirmek için kullanılır.

Temel Bileşenler Analizi (PCA)

Temel bileşenler analizi sonucunda, tek bir bileşenin toplam varyansın %70’ini açıkladığı görülmüştür. Bileşen yüklerinin ortalaması yüksek (SS loadings = 5.58) olup, madde karmaşıklığı düşük (1.00) seviyededir. Modelin uyumu, artıkların kök ortalama kareleri (RMSR = 0.08) ve yüksek uyum indeksine (off-diagonal fit = 0.99) dayanarak oldukça iyidir. Tek bileşenli yapının yeterliliği hipotezi, anlamlı bir düzeyde (χ² = 275.29, p < .001) reddedilse de, pratikte modelin güçlü bir açıklayıcılığa sahip olduğu anlaşılmaktadır.

pc <- principal(veri_mtk, nfactors = 1, rotate = "none")
kable(pc$loadings, digits = 2, caption = "PCA Sonuçları") %>%
  kable_styling(full_width = TRUE)
PCA Sonuçları
PC1
k1 0.70
k2 0.86
k3 0.90
k4 0.89
k5 0.86
k6 0.85
k7 0.87
k8 0.72

EGA Analizi

EGA analizi sonucunda tüm maddelerin tek bir toplulukta toplandığı ve yapının tek boyutlu olduğu belirlenmiştir. Bu bulgular, ölçeğin tutarlı ve tek boyutlu bir yapıya sahip olduğu kanıtını güçlendirmiştir.

library(EGAnet)
EGA(veri_mtk, nFactors = 1:5, graph = TRUE)

## Model: GLASSO (EBIC with gamma = 0.5)
## Correlations: auto
## Lambda: 0.0898819622938011 (n = 100, ratio = 0.1)
## 
## Number of nodes: 8
## Number of edges: 21
## Edge density: 0.750
## 
## Non-zero edge weights: 
##      M    SD   Min   Max
##  0.173 0.128 0.008 0.418
## 
## ----
## 
## Algorithm:  Louvain
## 
## Number of communities:  1
## 
## k1 k2 k3 k4 k5 k6 k7 k8 
##  1  1  1  1  1  1  1  1 
## 
## ----
## 
## Unidimensional Method: Louvain
## Unidimensional: Yes
## 
## ----
## 
## TEFI: 0

Yerel Bağımsızlık Varsayımı

Yerel bağımsızlık varsayımını test etmek için Yen’in Q3 istatistiği kullanılmıştır. Bu istatistik, her bir madde çifti arasındaki bağımlılığı ölçer. Madde çifti düzeyinde incelenen Q3 artık korelasyonları, modele göre açıklanamayan ortak varyans hakkında bilgi sunmaktadır. Q3 değerleri genel olarak düşük olup, medyan değer -0.158 ve ortalama -0.118 olarak bulunmuştur. Belirlenen eşik değerine göre (Q3 > 0.20), yalnızca sınırlı sayıda madde arasında anlamlı artık ilişki (yerel bağımlılık) gözlenmiştir. Bu durum, tek boyutlu modelin büyük ölçüde geçerli olduğunu ve maddeler arasında ciddi bir yerel bağımlılık sorunu bulunmadığını göstermektedir.

mod_tek <- mirt(veri_mtk, 1)
## Iteration: 1, Log-Lik: -8370.816, Max-Change: 2.30492Iteration: 2, Log-Lik: -7653.446, Max-Change: 2.37787Iteration: 3, Log-Lik: -7508.510, Max-Change: 0.84888Iteration: 4, Log-Lik: -7455.608, Max-Change: 0.39580Iteration: 5, Log-Lik: -7431.399, Max-Change: 0.19475Iteration: 6, Log-Lik: -7414.593, Max-Change: 0.23657Iteration: 7, Log-Lik: -7398.482, Max-Change: 0.16777Iteration: 8, Log-Lik: -7389.820, Max-Change: 0.12503Iteration: 9, Log-Lik: -7383.939, Max-Change: 0.09204Iteration: 10, Log-Lik: -7379.774, Max-Change: 0.08137Iteration: 11, Log-Lik: -7377.037, Max-Change: 0.07050Iteration: 12, Log-Lik: -7375.057, Max-Change: 0.06045Iteration: 13, Log-Lik: -7373.637, Max-Change: 0.05208Iteration: 14, Log-Lik: -7372.745, Max-Change: 0.03768Iteration: 15, Log-Lik: -7371.974, Max-Change: 0.03235Iteration: 16, Log-Lik: -7371.300, Max-Change: 0.02727Iteration: 17, Log-Lik: -7370.846, Max-Change: 0.02886Iteration: 18, Log-Lik: -7370.476, Max-Change: 0.02523Iteration: 19, Log-Lik: -7369.196, Max-Change: 0.01210Iteration: 20, Log-Lik: -7369.124, Max-Change: 0.00836Iteration: 21, Log-Lik: -7369.065, Max-Change: 0.00790Iteration: 22, Log-Lik: -7368.862, Max-Change: 0.00914Iteration: 23, Log-Lik: -7368.829, Max-Change: 0.00687Iteration: 24, Log-Lik: -7368.805, Max-Change: 0.00598Iteration: 25, Log-Lik: -7368.772, Max-Change: 0.00598Iteration: 26, Log-Lik: -7368.752, Max-Change: 0.00499Iteration: 27, Log-Lik: -7368.734, Max-Change: 0.00506Iteration: 28, Log-Lik: -7368.651, Max-Change: 0.00364Iteration: 29, Log-Lik: -7368.643, Max-Change: 0.00351Iteration: 30, Log-Lik: -7368.637, Max-Change: 0.00327Iteration: 31, Log-Lik: -7368.623, Max-Change: 0.00310Iteration: 32, Log-Lik: -7368.618, Max-Change: 0.00306Iteration: 33, Log-Lik: -7368.614, Max-Change: 0.00246Iteration: 34, Log-Lik: -7368.609, Max-Change: 0.00326Iteration: 35, Log-Lik: -7368.606, Max-Change: 0.00223Iteration: 36, Log-Lik: -7368.603, Max-Change: 0.00205Iteration: 37, Log-Lik: -7368.599, Max-Change: 0.00340Iteration: 38, Log-Lik: -7368.596, Max-Change: 0.00185Iteration: 39, Log-Lik: -7368.594, Max-Change: 0.00169Iteration: 40, Log-Lik: -7368.591, Max-Change: 0.00177Iteration: 41, Log-Lik: -7368.589, Max-Change: 0.00129Iteration: 42, Log-Lik: -7368.588, Max-Change: 0.00111Iteration: 43, Log-Lik: -7368.584, Max-Change: 0.00145Iteration: 44, Log-Lik: -7368.583, Max-Change: 0.00106Iteration: 45, Log-Lik: -7368.582, Max-Change: 0.00079Iteration: 46, Log-Lik: -7368.580, Max-Change: 0.00105Iteration: 47, Log-Lik: -7368.580, Max-Change: 0.00108Iteration: 48, Log-Lik: -7368.579, Max-Change: 0.00064Iteration: 49, Log-Lik: -7368.579, Max-Change: 0.00070Iteration: 50, Log-Lik: -7368.578, Max-Change: 0.00068Iteration: 51, Log-Lik: -7368.578, Max-Change: 0.00066Iteration: 52, Log-Lik: -7368.576, Max-Change: 0.00042Iteration: 53, Log-Lik: -7368.576, Max-Change: 0.00047Iteration: 54, Log-Lik: -7368.576, Max-Change: 0.00056Iteration: 55, Log-Lik: -7368.576, Max-Change: 0.00050Iteration: 56, Log-Lik: -7368.576, Max-Change: 0.00060Iteration: 57, Log-Lik: -7368.576, Max-Change: 0.00083Iteration: 58, Log-Lik: -7368.576, Max-Change: 0.00049Iteration: 59, Log-Lik: -7368.576, Max-Change: 0.00069Iteration: 60, Log-Lik: -7368.576, Max-Change: 0.00081Iteration: 61, Log-Lik: -7368.575, Max-Change: 0.00052Iteration: 62, Log-Lik: -7368.575, Max-Change: 0.00061Iteration: 63, Log-Lik: -7368.575, Max-Change: 0.00087Iteration: 64, Log-Lik: -7368.575, Max-Change: 0.00046Iteration: 65, Log-Lik: -7368.575, Max-Change: 0.00065Iteration: 66, Log-Lik: -7368.575, Max-Change: 0.00076Iteration: 67, Log-Lik: -7368.575, Max-Change: 0.00048Iteration: 68, Log-Lik: -7368.575, Max-Change: 0.00056Iteration: 69, Log-Lik: -7368.575, Max-Change: 0.00080Iteration: 70, Log-Lik: -7368.575, Max-Change: 0.00042Iteration: 71, Log-Lik: -7368.575, Max-Change: 0.00059Iteration: 72, Log-Lik: -7368.575, Max-Change: 0.00070Iteration: 73, Log-Lik: -7368.575, Max-Change: 0.00044Iteration: 74, Log-Lik: -7368.575, Max-Change: 0.00051Iteration: 75, Log-Lik: -7368.575, Max-Change: 0.00073Iteration: 76, Log-Lik: -7368.575, Max-Change: 0.00038Iteration: 77, Log-Lik: -7368.575, Max-Change: 0.00054Iteration: 78, Log-Lik: -7368.575, Max-Change: 0.00064Iteration: 79, Log-Lik: -7368.575, Max-Change: 0.00040Iteration: 80, Log-Lik: -7368.575, Max-Change: 0.00047Iteration: 81, Log-Lik: -7368.575, Max-Change: 0.00067Iteration: 82, Log-Lik: -7368.575, Max-Change: 0.00035Iteration: 83, Log-Lik: -7368.575, Max-Change: 0.00050Iteration: 84, Log-Lik: -7368.575, Max-Change: 0.00059Iteration: 85, Log-Lik: -7368.575, Max-Change: 0.00037Iteration: 86, Log-Lik: -7368.574, Max-Change: 0.00043Iteration: 87, Log-Lik: -7368.574, Max-Change: 0.00062Iteration: 88, Log-Lik: -7368.574, Max-Change: 0.00032Iteration: 89, Log-Lik: -7368.574, Max-Change: 0.00046Iteration: 90, Log-Lik: -7368.574, Max-Change: 0.00054Iteration: 91, Log-Lik: -7368.574, Max-Change: 0.00034Iteration: 92, Log-Lik: -7368.574, Max-Change: 0.00040Iteration: 93, Log-Lik: -7368.574, Max-Change: 0.00057Iteration: 94, Log-Lik: -7368.574, Max-Change: 0.00030Iteration: 95, Log-Lik: -7368.574, Max-Change: 0.00042Iteration: 96, Log-Lik: -7368.574, Max-Change: 0.00050Iteration: 97, Log-Lik: -7368.574, Max-Change: 0.00031Iteration: 98, Log-Lik: -7368.574, Max-Change: 0.00037Iteration: 99, Log-Lik: -7368.574, Max-Change: 0.00053Iteration: 100, Log-Lik: -7368.574, Max-Change: 0.00028Iteration: 101, Log-Lik: -7368.574, Max-Change: 0.00039Iteration: 102, Log-Lik: -7368.574, Max-Change: 0.00046Iteration: 103, Log-Lik: -7368.574, Max-Change: 0.00029Iteration: 104, Log-Lik: -7368.574, Max-Change: 0.00034Iteration: 105, Log-Lik: -7368.574, Max-Change: 0.00049Iteration: 106, Log-Lik: -7368.574, Max-Change: 0.00026Iteration: 107, Log-Lik: -7368.574, Max-Change: 0.00036Iteration: 108, Log-Lik: -7368.574, Max-Change: 0.00043Iteration: 109, Log-Lik: -7368.574, Max-Change: 0.00027Iteration: 110, Log-Lik: -7368.574, Max-Change: 0.00032Iteration: 111, Log-Lik: -7368.574, Max-Change: 0.00045Iteration: 112, Log-Lik: -7368.574, Max-Change: 0.00024Iteration: 113, Log-Lik: -7368.574, Max-Change: 0.00034Iteration: 114, Log-Lik: -7368.574, Max-Change: 0.00040Iteration: 115, Log-Lik: -7368.574, Max-Change: 0.00025Iteration: 116, Log-Lik: -7368.574, Max-Change: 0.00029Iteration: 117, Log-Lik: -7368.574, Max-Change: 0.00042Iteration: 118, Log-Lik: -7368.574, Max-Change: 0.00022Iteration: 119, Log-Lik: -7368.574, Max-Change: 0.00031Iteration: 120, Log-Lik: -7368.574, Max-Change: 0.00037Iteration: 121, Log-Lik: -7368.574, Max-Change: 0.00023Iteration: 122, Log-Lik: -7368.574, Max-Change: 0.00027Iteration: 123, Log-Lik: -7368.574, Max-Change: 0.00039Iteration: 124, Log-Lik: -7368.574, Max-Change: 0.00020Iteration: 125, Log-Lik: -7368.574, Max-Change: 0.00029Iteration: 126, Log-Lik: -7368.574, Max-Change: 0.00034Iteration: 127, Log-Lik: -7368.574, Max-Change: 0.00022Iteration: 128, Log-Lik: -7368.574, Max-Change: 0.00025Iteration: 129, Log-Lik: -7368.574, Max-Change: 0.00036Iteration: 130, Log-Lik: -7368.574, Max-Change: 0.00019Iteration: 131, Log-Lik: -7368.574, Max-Change: 0.00027Iteration: 132, Log-Lik: -7368.574, Max-Change: 0.00032Iteration: 133, Log-Lik: -7368.574, Max-Change: 0.00020Iteration: 134, Log-Lik: -7368.574, Max-Change: 0.00024Iteration: 135, Log-Lik: -7368.574, Max-Change: 0.00034Iteration: 136, Log-Lik: -7368.574, Max-Change: 0.00018Iteration: 137, Log-Lik: -7368.574, Max-Change: 0.00025Iteration: 138, Log-Lik: -7368.574, Max-Change: 0.00030Iteration: 139, Log-Lik: -7368.574, Max-Change: 0.00019Iteration: 140, Log-Lik: -7368.574, Max-Change: 0.00022Iteration: 141, Log-Lik: -7368.574, Max-Change: 0.00031Iteration: 142, Log-Lik: -7368.574, Max-Change: 0.00016Iteration: 143, Log-Lik: -7368.574, Max-Change: 0.00023Iteration: 144, Log-Lik: -7368.574, Max-Change: 0.00028Iteration: 145, Log-Lik: -7368.574, Max-Change: 0.00017Iteration: 146, Log-Lik: -7368.574, Max-Change: 0.00021Iteration: 147, Log-Lik: -7368.574, Max-Change: 0.00029Iteration: 148, Log-Lik: -7368.574, Max-Change: 0.00015Iteration: 149, Log-Lik: -7368.574, Max-Change: 0.00022Iteration: 150, Log-Lik: -7368.574, Max-Change: 0.00026Iteration: 151, Log-Lik: -7368.574, Max-Change: 0.00016Iteration: 152, Log-Lik: -7368.574, Max-Change: 0.00019Iteration: 153, Log-Lik: -7368.574, Max-Change: 0.00027Iteration: 154, Log-Lik: -7368.574, Max-Change: 0.00014Iteration: 155, Log-Lik: -7368.574, Max-Change: 0.00020Iteration: 156, Log-Lik: -7368.574, Max-Change: 0.00024Iteration: 157, Log-Lik: -7368.574, Max-Change: 0.00015Iteration: 158, Log-Lik: -7368.574, Max-Change: 0.00018Iteration: 159, Log-Lik: -7368.574, Max-Change: 0.00026Iteration: 160, Log-Lik: -7368.574, Max-Change: 0.00013Iteration: 161, Log-Lik: -7368.574, Max-Change: 0.00019Iteration: 162, Log-Lik: -7368.574, Max-Change: 0.00023Iteration: 163, Log-Lik: -7368.574, Max-Change: 0.00014Iteration: 164, Log-Lik: -7368.574, Max-Change: 0.00017Iteration: 165, Log-Lik: -7368.574, Max-Change: 0.00024Iteration: 166, Log-Lik: -7368.573, Max-Change: 0.00013Iteration: 167, Log-Lik: -7368.573, Max-Change: 0.00018Iteration: 168, Log-Lik: -7368.573, Max-Change: 0.00021Iteration: 169, Log-Lik: -7368.573, Max-Change: 0.00013Iteration: 170, Log-Lik: -7368.573, Max-Change: 0.00016Iteration: 171, Log-Lik: -7368.573, Max-Change: 0.00022Iteration: 172, Log-Lik: -7368.573, Max-Change: 0.00012Iteration: 173, Log-Lik: -7368.573, Max-Change: 0.00017Iteration: 174, Log-Lik: -7368.573, Max-Change: 0.00020Iteration: 175, Log-Lik: -7368.573, Max-Change: 0.00012Iteration: 176, Log-Lik: -7368.573, Max-Change: 0.00015Iteration: 177, Log-Lik: -7368.573, Max-Change: 0.00021Iteration: 178, Log-Lik: -7368.573, Max-Change: 0.00011Iteration: 179, Log-Lik: -7368.573, Max-Change: 0.00016Iteration: 180, Log-Lik: -7368.573, Max-Change: 0.00018Iteration: 181, Log-Lik: -7368.573, Max-Change: 0.00012Iteration: 182, Log-Lik: -7368.573, Max-Change: 0.00014Iteration: 183, Log-Lik: -7368.573, Max-Change: 0.00020Iteration: 184, Log-Lik: -7368.573, Max-Change: 0.00010Iteration: 185, Log-Lik: -7368.573, Max-Change: 0.00015Iteration: 186, Log-Lik: -7368.573, Max-Change: 0.00017Iteration: 187, Log-Lik: -7368.573, Max-Change: 0.00011Iteration: 188, Log-Lik: -7368.573, Max-Change: 0.00013Iteration: 189, Log-Lik: -7368.573, Max-Change: 0.00018Iteration: 190, Log-Lik: -7368.573, Max-Change: 0.00010
q3_matrix <- residuals(mod_tek, type = "Q3")
## Q3 summary statistics:
##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
##  -0.416  -0.290  -0.158  -0.118   0.002   0.297 
## 
##        k1     k2     k3     k4     k5     k6     k7     k8
## k1  1.000  0.238 -0.150 -0.009 -0.168 -0.284 -0.202  0.169
## k2  0.238  1.000 -0.020 -0.055 -0.338 -0.309 -0.317 -0.070
## k3 -0.150 -0.020  1.000 -0.027 -0.355 -0.281 -0.358 -0.271
## k4 -0.009 -0.055 -0.027  1.000 -0.416 -0.280 -0.361 -0.166
## k5 -0.168 -0.338 -0.355 -0.416  1.000  0.297  0.257  0.036
## k6 -0.284 -0.309 -0.281 -0.280  0.297  1.000  0.151 -0.092
## k7 -0.202 -0.317 -0.358 -0.361  0.257  0.151  1.000  0.066
## k8  0.169 -0.070 -0.271 -0.166  0.036 -0.092  0.066  1.000
library(reshape2)
q3_long <- melt(q3_matrix, varnames = c("Madde1", "Madde2"), value.name = "Q3")

q3_results <- q3_long %>%
  filter(as.character(Madde1) < as.character(Madde2)) %>%
  mutate(Anlamlı = ifelse(Q3 > 0.20, "EVET", "HAYIR"))

kable(q3_results, digits = 3, caption = "Yen'in Q3 İstatistikleri") %>%
  kable_styling(full_width = TRUE)
Yen’in Q3 İstatistikleri
Madde1 Madde2 Q3 Anlamlı
k1 k2 0.238 EVET
k1 k3 -0.150 HAYIR
k2 k3 -0.020 HAYIR
k1 k4 -0.009 HAYIR
k2 k4 -0.055 HAYIR
k3 k4 -0.027 HAYIR
k1 k5 -0.168 HAYIR
k2 k5 -0.338 HAYIR
k3 k5 -0.355 HAYIR
k4 k5 -0.416 HAYIR
k1 k6 -0.284 HAYIR
k2 k6 -0.309 HAYIR
k3 k6 -0.281 HAYIR
k4 k6 -0.280 HAYIR
k5 k6 0.297 EVET
k1 k7 -0.202 HAYIR
k2 k7 -0.317 HAYIR
k3 k7 -0.358 HAYIR
k4 k7 -0.361 HAYIR
k5 k7 0.257 EVET
k6 k7 0.151 HAYIR
k1 k8 0.169 HAYIR
k2 k8 -0.070 HAYIR
k3 k8 -0.271 HAYIR
k4 k8 -0.166 HAYIR
k5 k8 0.036 HAYIR
k6 k8 -0.092 HAYIR
k7 k8 0.066 HAYIR

Model Kurulumu ve Karşılaştırmalar

Veri setine tek boyutlu olarak GRM (Graded Response Model), PCM (Partial Credit Model), GPCM (Generalized Partial Credit Model) ve RSM (Rating Scale Model) uygulanmıştır. GRM, PCM ve GPCM modelleri sorunsuz bir şekilde çalışmış; her biri, ordinal maddelerin yanıt yapısını modellemek üzere uygun seçenekler sunmuştur. RSM analizinde ise tüm maddelerin en düşük kategoriye sahip olmaması nedeniyle uyarı mesajı alınmış ve bazı tahminlerde NaN değerler üretilmiştir. Bu durum, RSM modelinin veri yapısıyla tam uyumlu olmadığını ve modelin parametre tahminlerinde güvenilirliğin sınırlı olabileceğini göstermektedir. Bu nedenle, model karşılaştırmalarında özellikle GRM, PCM ve GPCM sonuçlarına odaklanmak daha anlamlı olacaktır.

fit_grm  <- mirt(veri_mtk, 1, itemtype = "graded", verbose = FALSE)
fit_pcm  <- mirt(veri_mtk, 1, itemtype = "Rasch", verbose = FALSE)
fit_gpcm <- mirt(veri_mtk, 1, itemtype = "gpcm", verbose = FALSE)
fit_rsm  <- RSM(veri_mtk)

Model Uyum İstatistikleri

Üç farklı IRT modelinin uyum istatistikleri karşılaştırıldığında, GRM (Graded Response Model) modeli en düşük AIC (14817.15) ve BIC (15006.91) değerlerine sahiptir. Bu durum, GRM modelinin veriyle en iyi uyumu sağladığını göstermektedir. GPCM modeli de benzer şekilde uygunluk göstermekte, ancak GRM’ye göre daha yüksek bilgi kriterlerine sahiptir. PCM (Partial Credit Model) ise en yüksek AIC ve BIC değerlerine sahip olup, diğer modellere kıyasla daha zayıf bir uyum sunmaktadır. Sonuç olarak, GRM modeli, analiz edilen veri seti için en uygun tek boyutlu madde tepki modeli olarak değerlendirilebilir.

uyum_tablosu <- data.frame(
  Model  = c("GRM", "PCM", "GPCM"),
  LogLik = c(fit_grm@Fit$logLik,
             fit_pcm@Fit$logLik,
             fit_gpcm@Fit$logLik),
  AIC    = c(fit_grm@Fit$AIC,
             fit_pcm@Fit$AIC,
             fit_gpcm@Fit$AIC),
  BIC    = c(fit_grm@Fit$BIC,
             fit_pcm@Fit$BIC,
             fit_gpcm@Fit$BIC)
)

kable(uyum_tablosu, digits = 2, caption = "GRM, PCM ve GPCM Modelleri için Uyum İstatistikleri") %>%
  kable_styling(full_width = TRUE)
GRM, PCM ve GPCM Modelleri için Uyum İstatistikleri
Model LogLik AIC BIC
GRM -7368.57 14817.15 15006.91
PCM -7534.14 15134.29 15290.84
GPCM -7389.83 14859.66 15049.42

GRM Modeli İçin Madde Parametrelerinin İncelenmesi

GRM modeli üzerinden her bir maddenin eğim (discrimination) ve eşik (threshold) parametreleri elde edilmiştir. Analiz sonuçlarına göre, maddeler algılanan ebeveyn akademik katılımını ölçmede yüksek düzeyde ayırt edicilik göstermektedir. Ayırt edicilik (a) değerleri 1.73 ile 4.87 arasında değişmekte olup, özellikle k3, k4 ve k2 gibi maddeler oldukça güçlü ayırt ediciliğe sahiptir. Bu maddeler, bireyler arasındaki algılanan ebeveyn akademik katılımı farklarını hassas bir şekilde ayırt etmektedir.

Eşik parametreleri (b1–b4) incelendiğinde, tüm maddeler sıralı yanıtlara uygun artan zorluk düzeyleri sergilemektedir. Örneğin, k1 maddesi düşük algı düzeylerinden yüksek algı düzeylerine geçişte geniş bir varyasyon sunmakta (-1.97 ile 1.39 arasında). Bu durum, ölçeğin geniş bir algı düzeyi aralığında bilgi sağladığını göstermektedir. Sonuç olarak, modelde yer alan maddeler, algılanan ebeveyn akademik katılımı yapısını geçerli ve güvenilir biçimde yansıtmaktadır. Özellikle yüksek ayırt edicilik değerine sahip maddeler, ölçme açısından öne çıkmaktadır.

grmtab <- coef(fit_grm, IRTpars = TRUE, simplify = TRUE)$items

kable(grmtab, digits = 2, caption = "GRM Modeli Madde Parametreleri") %>%
  kable_styling(full_width = TRUE)
GRM Modeli Madde Parametreleri
a b1 b2 b3 b4
k1 1.73 -1.97 -0.76 -0.02 1.39
k2 3.15 -2.08 -1.09 -0.32 0.52
k3 4.87 -1.91 -1.07 -0.47 0.33
k4 4.21 -1.98 -1.07 -0.42 0.37
k5 2.96 -2.05 -1.09 -0.53 0.17
k6 3.04 -1.99 -1.17 -0.59 -0.10
k7 3.15 -2.02 -1.10 -0.44 0.36
k8 1.75 -1.96 -0.91 -0.05 1.09

Theta Kestirimi

Bireylerin yetenek düzeyleri (theta) GRM modeline göre tahmin edilmiştir. Elde edilen theta (𝜃) değerleri, bireylerin algıladıkları ebeveyn akademik katılımı düzeyine ilişkin geniş bir dağılım göstermektedir. Örneklemde theta değerleri en düşük -2.290, en yüksek 1.723 olmak üzere toplamda yaklaşık 4 puanlık bir aralıkta dağılmıştır.

Bu durum, ölçeğin düşükten yükseğe farklı düzeylerde ebeveyn akademik katılımı algılayan bireyleri ayırt edebildiğini göstermektedir. Negatif theta değerine sahip bireyler, ebeveyn akademik katılımını düşük düzeyde algılarken; pozitif değerlere sahip olanlar, bu katılımı daha yüksek düzeyde algılamaktadır.

theta_df <- fscores(fit_grm, method = "EAP", full.scores.SE = TRUE) %>%
  as.data.frame()

sira_df <- veri %>% 
  select(Sıra)

theta_birey <- bind_cols(sira_df, theta_df)

library(DT)

theta_df <- fscores(fit_grm, method = "EAP") %>%
  as.data.frame() %>%
  select(Theta = F1)  

theta_birey <- bind_cols(
  veri %>% select(Sıra),
  theta_df
)

datatable(theta_birey, options = list(pageLength = 10), 
          caption = "Sıra Numaralarına Göre Theta (Yetenek) Değerleri") %>%
  formatRound(columns = "Theta", digits = 3) %>%
  formatStyle(
    'Theta',
    background = styleColorBar(range(theta_birey$Theta, na.rm = TRUE), 'lightblue'),
    backgroundSize = '98% 88%',
    backgroundRepeat = 'no-repeat',
    backgroundPosition = 'center'
  )

Madde Karakteristik Eğrileri (ICC)

Her bir maddenin karakteristik eğrileri, bireylerin yetenek düzeylerine göre maddeye verdikleri yanıtların olasılıklarını gösterir.

Tüm maddeler için kategoriler, artan theta değerlerine karşılık sıralı biçimde baskın hale gelmektedir. Bu durum, ölçeğin sıralı yapısına uygun çalıştığını ve maddelerin beklenen psikometrik işleyişi sergilediğini göstermektedir.

Eğriler genellikle net ayrımlara sahip olup, her kategori belirli bir theta aralığında en yüksek olasılığı göstermektedir. Bu da, maddelerin farklı algılanan ebeveyn akademik katılımı düzeylerini ayırt edebildiğini ve GRM modeline iyi uyum sağladığını göstermektedir.

Özellikle Madde 3, 4 ve 6 gibi maddelerde kategori eğrileri arasındaki geçişler keskin ve simetriktir; bu da ayırt edicilik gücünün yüksek olduğunu ve maddelerin duyarlı biçimde işlediğini gösterir. Bazı maddelerde (örneğin Madde 1 ve 8), uç kategoriler (P.1 ve P.5) daha geniş aralıkta etkili olmakta, bu da düşük ve yüksek algı düzeylerinde bilgi sağlama potansiyelini artırmaktadır.

library(ggplot2)
## 
## Attaching package: 'ggplot2'
## The following objects are masked from 'package:psych':
## 
##     %+%, alpha
theta_vals <- seq(-4, 4, by = 0.1)

mce_df <- data.frame()

for (i in 1:8) {
  item_model <- extract.item(fit_grm, i)
  prob_values <- probtrace(item_model, Theta = theta_vals)
  
  kat_isimleri <- colnames(prob_values)
  
  temp_df <- data.frame(
    Theta = rep(theta_vals, times = ncol(prob_values)),
    Probability = as.vector(prob_values),
    Category = factor(rep(kat_isimleri, each = length(theta_vals))),
    Item = paste0("Madde ", i)
  )
  
  mce_df <- rbind(mce_df, temp_df)
}

ggplot(mce_df, aes(x = Theta, y = Probability, color = Category)) +
  geom_line() +
  facet_wrap(~ Item) +
  labs(
    title = "GRM Modeline Göre Madde Karakteristik Eğrileri (MCE)",
    x = "Theta (Yetenek Düzeyi)",
    y = "Kategori Olasılığı"
  ) +
  theme_minimal()

Madde Bilgi Fonksiyonları

Her bir maddenin bilgi fonksiyonu, hangi theta düzeyinde ne kadar bilgi sağladığını gösterir. Eğrilerin tepe noktaları, maddenin ölçümde en hassas olduğu theta (𝜃) düzeylerini temsil eder. Madde 3 ve Madde 4, diğer maddelere kıyasla oldukça yüksek bilgi sağlamaktadır (yaklaşık 5–6 birim). Bu maddeler, özellikle -2 ile 0 arası theta düzeylerinde en yüksek duyarlılığı sunmaktadır. Madde 2, 5, 6 ve 7, orta düzeyde bilgi üretmekte ve genellikle -2 ile 0 theta aralığında etkili olmaktadır. Madde 1 ve Madde 8, daha düşük düzeyde bilgi sağlamaktadır. Bu maddeler geniş bir aralıkta ölçüm yapabilse de, bilgi miktarı sınırlıdır.

Genel olarak, maddelerin büyük kısmı düşük ve orta düzeyde algılanan ebeveyn akademik katılımı düzeylerinde daha fazla bilgi sağlamaktadır. Bu da ölçeğin, bu aralıkta yer alan bireyleri daha hassas biçimde değerlendirdiğini göstermektedir.

library(ggplot2)

theta_vals <- seq(-4, 4, by = 0.1)

info_df <- data.frame()

for (i in 1:8) {
  item_model <- extract.item(fit_grm, i)
  
  info_values <- iteminfo(item_model, Theta = theta_vals)
  
  temp_df <- data.frame(
    Theta = theta_vals,
    Info = info_values,
    Item = paste0("Madde ", i)
  )
  
  info_df <- rbind(info_df, temp_df)
}

ggplot(info_df, aes(x = Theta, y = Info)) +
  geom_line() +
  facet_wrap(~ Item, scales = "free_y") +
  labs(
    title = "GRM Modeline Göre Madde Bilgi Fonksiyonları",
    x = "Theta (Yetenek Düzeyi)",
    y = "Bilgi (Information)"
  ) +
  theme_minimal()

Test Bilgi Fonksiyonu

Tüm testin genel olarak hangi theta düzeyinde en fazla ölçme duyarlılığı sağladığını görmek için test bilgi fonksiyonu çizdirilmiştir. Grafik incelendiğinde, testin toplam bilgi düzeyinin en yüksek olduğu aralık -2 ile 0 arasında yer almaktadır. Bu aralıkta testin duyarlılığı oldukça yüksektir (yaklaşık 23 birim bilgiye kadar çıkmaktadır). Bu sonuç, ölçeğin düşük ve orta düzeyde algılanan ebeveyn akademik katılımı gösteren bireyler için en hassas ölçümü sağladığını, buna karşılık yüksek düzeylerde (𝜃 > 1.5) bilgi düzeyinin belirgin biçimde azaldığını ortaya koymaktadır.

library(ggplot2)

theta_vals <- seq(-4, 4, by = 0.1)

test_info_vals <- testinfo(fit_grm, Theta = theta_vals)

test_info_df <- data.frame(
  Theta = theta_vals,
  TestInformation = test_info_vals
)

ggplot(test_info_df, aes(x = Theta, y = TestInformation)) +
  geom_line(color = "steelblue", linewidth = 1) +
  labs(
    title = "GRM Modeline Göre Test Bilgi Fonksiyonu",
    x = "Theta (Yetenek Düzeyi)",
    y = "Toplam Bilgi"
  ) +
  theme_minimal()

Özetle, ölçek özellikle algılanan ebeveyn akademik katılımı düşük olan bireyleri ayırt etmede çok başarılıdır. Ancak yüksek algı düzeylerinde ölçme duyarlılığı görece düşmektedir. Bu durum, ölçeğin kapsamlı değerlendirmeler için yeterli olduğunu, ancak yüksek düzeylerde daha fazla bilgi sağlamak amacıyla yeni maddelerin eklenmesinin yararlı olabileceğini düşündürmektedir.

Sonuç

Farklı düzeylerde uygulanan analizler aracılığıyla ölçeğin geçerlik ve güvenirlik açısından güçlü bir yapı sergilediği belirlenmiştir.

Tüm analizler bir arada değerlendirildiğinde, ölçeğin geçerlik, güvenirlik ve ölçme duyarlılığı açısından güçlü psikometrik nitelikler taşıdığı sonucuna ulaşılmaktadır. Özellikle GRM modeli altında elde edilen bulgular, maddelerin algılanan ebeveyn akademik katılımını etkili bir biçimde ölçtüğünü ortaya koymuştur. Tek boyutlu yapı, yüksek ayırt edicilik değerleri ve test bilgi fonksiyonunun güçlü yapısı, ölçeğin bireyler arası farkları belirlemede etkili olduğunu göstermektedir. Bu bulgular, ölçeğin araştırmalarda ve uygulamalarda güvenle kullanılabileceğini desteklemektedir. Bununla birlikte, yüksek düzeyde ebeveyn akademik katılımını daha duyarlı ölçmek adına yeni madde geliştirme çalışmaları önerilebilir.

Kaynaklar