PHÂN TÍCH DỮ LIỆU ĐỊNH TÍNH: BÀI TẬP THƯC HÀNH

Trần Khánh Vy

2024-06-02

# Dữ liệu sống sót của bệnh AIDS ở Úc

Dữ liệu về bệnh nhân được chẩn đoán mắc bệnh AIDS ở Úc trước ngày 1 tháng 7 năm 1991. Dữ liệu gồm 2843 quan sát và 7 biến. Các biến bao gồm:

  • State: Nhóm nước xuất xứ

  • Sex: Giới tính

  • Diag: Ngày chuẩn đoán

  • Death: Ngày chết hoặc nagyf kết thúc quan sát

  • Status: Tình trạng (còn sống hay đã chết)

  • T.categ: Thể loại truyền tải bái cáo

  • Age: Tuổi lúc chuẩn đoán

## # A tibble: 2,843 × 8
##    rownames state sex    diag death status T.categ   age
##       <dbl> <chr> <chr> <dbl> <dbl> <chr>  <chr>   <dbl>
##  1        1 NSW   M     10905 11081 D      hs         35
##  2        2 NSW   M     11029 11096 D      hs         53
##  3        3 NSW   M      9551  9983 D      hs         42
##  4        4 NSW   M      9577  9654 D      haem       44
##  5        5 NSW   M     10015 10290 D      hs         39
##  6        6 NSW   M      9971 10344 D      hs         36
##  7        7 NSW   M     10746 11135 D      other      36
##  8        8 NSW   M     10042 11069 D      hs         31
##  9        9 NSW   M     10464 10956 D      hs         26
## 10       10 NSW   M     10439 10873 D      hsid       27
## # ℹ 2,833 more rows

Bảng tần số

table(aids$sex, aids$status)
##    
##        A    D
##   F   36   53
##   M 1046 1708
  • Số bệnh nhân mắc bệnh AIDS ở nữ giới còn sống sót là 36 người
  • Số bệnh nhân mắc bệnh AIDS ở nữ giới đã chết là 53 người
  • Số bệnh nhân mắc bệnh AIDS ở nam giới còn sống sót là 1046 người - Số bệnh nhân mắc bệnh AIDS ở nam giới đã chết là 1708 người

Đồ thị

library("ggplot2")
ggplot( aids, aes(sex, fill = status)) + geom_bar(position = 'dodge')

Dựa vào đồ thị ta có thể thấy tỉ lệ mắc bệnh AIDS ở nữ giới thấp hơn so với nam giới rất nhiều.

table <- table(aids$sex, aids$status)
addmargins(table)
##      
##          A    D  Sum
##   F     36   53   89
##   M   1046 1708 2754
##   Sum 1082 1761 2843

NHẬN XÉT:

  • Số bệnh nhân nữ mắc bệnh AIDS ở nữ giới ít hơn nam giới rất nhiều ( nữ giới mắc bệnh chiếm 3.13%).

  • Tỉ lệ sống sót của nữ giới là 3.3%