R에서 승산비를 계산하는 방법(예제 포함)


통계에서 승산비는 처리 그룹에서 사건이 발생할 확률과 대조 그룹에서 사건이 발생할 확률의 비율을 나타냅니다.

2×2 테이블에서 분석을 수행할 때 승산비를 계산하는 경우가 많으며 다음 형식을 사용합니다.

R에서 승산비를 계산하려면 Epitools 패키지의 승산비() 함수를 사용할 수 있습니다.

다음 예에서는 실제로 이 구문을 사용하는 방법을 보여줍니다.

예: R에서 승산비 계산

50명의 농구 선수가 새로운 훈련 프로그램을 사용하고 있고 50명의 선수가 기존 훈련 프로그램을 사용하고 있다고 가정해 보겠습니다. 프로그램이 끝나면 각 플레이어를 테스트하여 특정 기술 테스트를 통과했는지 확인합니다.

다음 표는 사용한 프로그램에 따라 합격 및 불합격한 플레이어의 수를 보여줍니다.

플레이어가 새 프로그램을 사용하여 기술 테스트를 통과할 확률과 이전 프로그램을 사용하여 기술 테스트를 통과할 확률을 비교하기 위해 승산비를 계산한다고 가정해 보겠습니다.

R에서 이 행렬을 만드는 방법은 다음과 같습니다.

 #create matrix
program <- c(' New Program ', ' Old Program ')
outcome <- c(' Pass ', ' Fail ')
data <- matrix(c(34, 16, 39, 11), nrow= 2 , ncol= 2 , byrow= TRUE )
dimnames(data) <- list(' Program '=program, ' Outcome '=outcome)

#view matrix
data

             Outcome
Program Pass Fail
  New Program 34 16
  Old Program 39 11

다음은 Epitools 패키지의 oddsratio() 함수를 사용하여 승산비를 계산하는 방법입니다.

 install. packages (' epitools ')

library (epitools)

#calculate odds ratio
oddsratio(data)

$measure
             odds ratio with 95% CI
Program estimate lower upper
  New Program 1.0000000 NA NA
  Old Program 0.6045506 0.2395879 1.480143

$p.value
             two-sided
Program midp.exact fisher.exact chi.square
  New Program NA NA NA
  Old Program 0.271899 0.3678219 0.2600686

$correction
[1] FALSE

attr(,"method")
[1] “median-unbiased estimate & mid-p exact CI”

승산비는 0.6045506 입니다.

우리는 이것을 새로운 프로그램을 사용하여 플레이어가 테스트를 통과할 확률이 기존 프로그램을 사용하여 테스트를 통과할 확률의 0.6045506배에 불과하다는 의미로 해석합니다.

즉, 새로운 프로그램을 사용하면 실제로 플레이어가 테스트에 합격할 확률이 약 39.6% 감소합니다.

또한 결과의 하단상단 열에 있는 값을 사용하여 승산비에 대한 다음과 같은 95% 신뢰 구간을 구성할 수 있습니다.

승산비에 대한 95% 신뢰구간: [0.24, 1.48] .

우리는 새로운 훈련 프로그램과 기존 훈련 프로그램 사이의 실제 승산비가 이 구간 내에 포함되어 있다고 95% 확신합니다.

출력의 midp.exact 열에는 승산비와 관련된 p-값도 표시됩니다.

이 p-값은 0.271899 입니다. 이 값은 0.05 이상이므로 승산비가 통계적으로 유의하지 않다는 결론을 내릴 수 있습니다.

즉, 새로운 프로그램을 사용한 플레이어의 성공 확률이 이전 프로그램을 사용한 성공 확률보다 낮다는 것을 승산비를 통해 알 수 있지만 이러한 확률의 차이는 실제로 통계적으로 유의미하지 않습니다.

추가 리소스

다음 튜토리얼에서는 승산비에 대한 추가 정보를 제공합니다.

승산비 대 상대 위험: 차이점은 무엇입니까?
전체 가이드: 승산비 보고 방법
승산비에 대한 신뢰 구간을 계산하는 방법

의견을 추가하다

이메일 주소는 공개되지 않습니다. 필수 필드는 *로 표시됩니다