자기계발/Rasch분석

Rasch 분석 - 11. Cronbach's alpha

이동네저동네 2025. 4. 28. 21:55
728x90
반응형
# 필요 패키지 설치 및 로
install.packages("readxl")
install.packages("psych")
library(readxl)
library(psych)


# 데이터 불러오기
# 엑셀 파일 읽기 (Sheet1의 D~S열: 5~20열)
data <- read_excel("(내 파일의 경로)", sheet = "Sheet1")
items <- data[, 5:20]  # 실제 데이터 구조 확인 필요


# 크론바흐알파 계산
# 기본 계산
alpha_result <- alpha(items)

# 결과 요약
cat("Cronbach's Alpha:", round(alpha_result$total$raw_alpha, 3))

 

 

1. 해석 기준표

Alpha 값 신뢰도 수준
≥ 0.9 우수
0.8~0.89 매우 좋음
0.7~0.79 보통
0.6~0.69 의문스러움
< 0.6 수용 불가

 

 

 

 

 

 

 

728x90
반응형