#Chuyển dữ liệu từ excel vào R

library(readxl)
duy = readxl::read_excel("D:/NLRSAKI chung.xlsx")
head(duy)
## # A tibble: 6 × 59
##     STT  `Mã BA` SVV   Họ tê…¹  Year   Age Sex   Sexma…²    BC    TC   Neu   Lym
##   <dbl>    <dbl> <chr> <chr>   <dbl> <dbl> <chr>   <dbl> <dbl> <dbl> <dbl> <dbl>
## 1     1 22715165 0120… Hoàng …  1956    66 Nam         0 10.2    173  8.24  1.16
## 2     2 22702835 0124… Nguyễn…  1938    84 Nam         0 14.9    390 12.9   0.42
## 3     3 22713749 0123… Nguyễn…  1932    90 Nữ          1 13.8    426 12.3   0.46
## 4     4 14104427 0151… Phạm M…  1942    80 Nam         0 21.6    219 19.6   0.47
## 5     5 11711109 0142… Quách …  1958    64 Nam         0  4.82   281  3.84  0.48
## 6     6 13766348 0139… Vũ Đìn…  1956    66 Nam         0 11.9    410  9.72  0.59
## # … with 47 more variables: NLR <dbl>, Crenen <dbl>, Cremax <dbl>,
## #   `CreNen/Max` <dbl>, AKI <chr>, AKIma <dbl>, GD <chr>, Day <dbl>,
## #   History <chr>, THA <chr>, THAma <dbl>, ST <chr>, STma <dbl>, BMV <chr>,
## #   BMVma <dbl>, COPD <chr>, COPDma <dbl>, ĐTĐ <chr>, DTDma <dbl>, TBMMN <chr>,
## #   TBMMNma <dbl>, GCS <dbl>, Pulse <dbl>, `P/F` <dbl>, T <dbl>, HATB <dbl>,
## #   APACHEII <dbl>, SOFA <dbl>, Ventilation <chr>, Ventilationma <dbl>,
## #   Vasopressor <chr>, Vasopressorma <dbl>, Albumin <dbl>, CRP <dbl>, …
## # ℹ Use `colnames()` to see all variable names
attach(duy)
## The following object is masked from package:base:
## 
##     T
Only.AKI = readxl::read_excel("D:/Chỉ gồm BN AKI.xlsx")
head(Only.AKI)
## # A tibble: 6 × 59
##     STT  `Mã BA` SVV   Họ tê…¹  Year   Age Sex   Sexma…²    BC    TC   Neu   Lym
##   <dbl>    <dbl> <chr> <chr>   <dbl> <dbl> <chr>   <dbl> <dbl> <dbl> <dbl> <dbl>
## 1     1 22715165 0120… Hoàng …  1956    66 Nam         0  10.2   173  8.24  1.16
## 2     2 22713749 0123… Nguyễn…  1932    90 Nữ          1  13.8   426 12.3   0.46
## 3     3 14104427 0151… Phạm M…  1942    80 Nam         0  21.6   219 19.6   0.47
## 4     4 13766348 0139… Vũ Đìn…  1956    66 Nam         0  11.9   410  9.72  0.59
## 5     5 22717522 0158… Phạm V…  1960    62 Nam         0  10.6   106  9.3   0.65
## 6     6 22724284 0182… Võ Ngọ…  1961    61 Nữ          1  14.7   205 13.4   0.75
## # … with 47 more variables: NLR <dbl>, Crenen <dbl>, Cremax <dbl>,
## #   `CreNen/Max` <dbl>, AKI <chr>, AKIma <dbl>, GD <chr>, Day <dbl>,
## #   History <chr>, THA <chr>, THAma <dbl>, ST <chr>, STma <dbl>, BMV <chr>,
## #   BMVma <dbl>, COPD <chr>, COPDma <dbl>, ĐTĐ <chr>, DTDma <dbl>, TBMMN <chr>,
## #   TBMMNma <dbl>, GCS <dbl>, Pulse <dbl>, `P/F` <dbl>, T <dbl>, HATB <dbl>,
## #   APACHEII <dbl>, SOFA <dbl>, Ventilation <chr>, Ventilationma <dbl>,
## #   Vasopressor <chr>, Vasopressorma <dbl>, Albumin <dbl>, CRP <dbl>, …
## # ℹ Use `colnames()` to see all variable names
attach(Only.AKI)
## The following objects are masked from duy:
## 
##     Age, AKI, AKIma, Albumin, APACHEII, Bac1, Bac2, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     da, Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, hohap, khac,
##     Lactate, Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA,
##     Source, Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC,
##     THA, THAma, tietnieu, tieuhoa, Vasopressor, Vasopressorma,
##     Ventilation, Ventilationma, Year
## 
## The following object is masked from package:base:
## 
##     T
No.AKI = readxl::read_excel("D:/Không AKI.xlsx")
head(No.AKI)
## # A tibble: 6 × 59
##     STT  `Mã BA` SVV   Họ tê…¹  Year   Age Sex   Sexma…²    BC    TC   Neu   Lym
##   <dbl>    <dbl> <chr> <chr>   <dbl> <dbl> <chr>   <dbl> <dbl> <dbl> <dbl> <dbl>
## 1     1 22702835 0124… Nguyễn…  1938    84 Nam         0 14.9    390 12.9   0.42
## 2     2 11711109 0142… Quách …  1958    64 Nam         0  4.82   281  3.84  0.48
## 3     3 22719495 0148… Huỳnh …  1965    57 Nam         0  9.09   276  6.25  1.96
## 4     4 22722868 0172… Nguyễn…  1947    75 Nữ          1 15.3    326 13.8   0.56
## 5     5 12775062 0157… Cao Ho…  1965    57 Nam         0 28.2    633 23.2   2.63
## 6     6 16171925 0207… Trần B…  1971    51 Nữ          1 19.2    328 14.5   2.9 
## # … with 47 more variables: NLR <dbl>, Crenen <dbl>, Cremax <dbl>,
## #   `CreNen/Max` <dbl>, AKI <chr>, AKIma <dbl>, GD <chr>, Day <dbl>,
## #   History <chr>, THA <chr>, THAma <dbl>, ST <chr>, STma <dbl>, BMV <chr>,
## #   BMVma <dbl>, COPD <chr>, COPDma <dbl>, ĐTĐ <chr>, DTDma <dbl>, TBMMN <chr>,
## #   TBMMNma <dbl>, GCS <dbl>, Pulse <dbl>, `P/F` <dbl>, T <dbl>, HATB <dbl>,
## #   APACHEII <dbl>, SOFA <dbl>, Ventilation <chr>, Ventilationma <dbl>,
## #   Vasopressor <chr>, Vasopressorma <dbl>, Albumin <dbl>, CRP <dbl>, …
## # ℹ Use `colnames()` to see all variable names
attach(No.AKI)
## The following objects are masked from Only.AKI:
## 
##     Age, AKI, AKIma, Albumin, APACHEII, Bac1, Bac2, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     da, Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, hohap, Kết
##     cục, khac, Lactate, Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex,
##     Sexmahoa, SOFA, Source, Source culture, ST, STma, STT, SVV, T,
##     TBMMN, TBMMNma, TC, THA, THAma, tietnieu, tieuhoa, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy:
## 
##     Age, AKI, AKIma, Albumin, APACHEII, Bac1, Bac2, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     da, Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, hohap, khac,
##     Lactate, Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA,
##     Source, Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC,
##     THA, THAma, tietnieu, tieuhoa, Vasopressor, Vasopressorma,
##     Ventilation, Ventilationma, Year
## The following object is masked from package:base:
## 
##     T

3.1. Đặc điểm dân số chung

3.1.1. Giới tính

Thống kê số nam và nữ

table(duy$Sex)
## 
## Nam  Nữ 
##  46  52

Vẽ biểu đồ tròn giới tính có chú tích %

so.luong.sex=c(46,52)
Sex=c("Nam","Nữ")
phan.tram.sex=round(so.luong.sex/sum(so.luong.sex)*100,2)
Sex1=paste(Sex,phan.tram.sex)
Sex2=paste(Sex,"%",sep="")
pie(so.luong.sex,labels=Sex,col=c("yellow","red"))

## 3.1.2. Tuổi B1: Tạo ra cột age1 phân theo nhóm tuổi

library(psych)
library(dplyr)
## 
## Attaching package: 'dplyr'
## The following objects are masked from 'package:stats':
## 
##     filter, lag
## The following objects are masked from 'package:base':
## 
##     intersect, setdiff, setequal, union
library(tidyr)
library(ggplot2)
## 
## Attaching package: 'ggplot2'
## The following objects are masked from 'package:psych':
## 
##     %+%, alpha
duy = duy %>%
  mutate(age1 = case_when(
    Age<=40 ~ "<=40",
    Age>40&Age<=60 ~ "41-60",
    Age>60&Age<=80 ~ "61-80",
    Age>80 ~ ">80"
  ))
# Thống kê trung bình trung vị của tuổi
library(psych)
library(dplyr)
  TB.TV.Tuoi = duy %>%
  summarize(
    min = min(duy$Age),
    max = max(duy$Age),
    median = median(duy$Age),
    mean = mean(duy$Age),
    q1 = quantile(duy$Age, 0.25),
    q3 = quantile(duy$Age,0.75),
    sd = sd(duy$Age)
  )
TB.TV.Tuoi
## # A tibble: 1 × 7
##     min   max median  mean    q1    q3    sd
##   <dbl> <dbl>  <dbl> <dbl> <dbl> <dbl> <dbl>
## 1    29    90   64.5  64.7    57    73  12.9

B2. Vẽ biểu đồ cột theo nhóm tuổi

library(psych)
library(dplyr)
library(tidyr)
library(ggplot2)
library(scales)
## 
## Attaching package: 'scales'
## The following objects are masked from 'package:psych':
## 
##     alpha, rescale
library(ggthemes)
age_count <- table (duy$age1)
age_percent <- age_count/length(duy$age1)
duy %>%
  ggplot(aes(x=duy$age1,fill=duy$age1))+
  geom_bar(aes(y =(..count..)/sum(..count..)),position = "dodge", alpha = 0.9, width = 0.8,colour="black") +
  geom_text(aes(y = ((..count..)/sum(..count..)), label = scales::percent((..count..)/sum(..count..),0.01)), stat = "count", vjust = -0.25) +
  scale_y_continuous(labels = percent)+
  theme_bw()+
  theme(panel.grid.major = element_blank(), panel.grid.minor = element_blank()) +
  labs(x= "Nhóm tuổi",y="Phần trăm (%)",fill="Nhóm tuổi") +
  scale_fill_brewer(palette = "Paired")
## Warning: Use of `duy$age1` is discouraged. Use `age1` instead.
## Use of `duy$age1` is discouraged. Use `age1` instead.
## Use of `duy$age1` is discouraged. Use `age1` instead.
## Use of `duy$age1` is discouraged. Use `age1` instead.

## 3.1.3. Bệnh lý nền

library("plyr")
## ------------------------------------------------------------------------------
## You have loaded plyr after dplyr - this is likely to cause problems.
## If you need functions from both plyr and dplyr, please load plyr first, then dplyr:
## library(plyr); library(dplyr)
## ------------------------------------------------------------------------------
## 
## Attaching package: 'plyr'
## The following objects are masked from 'package:dplyr':
## 
##     arrange, count, desc, failwith, id, mutate, rename, summarise,
##     summarize
length(grep("\\<THA\\>",duy$History))
## [1] 65
length(grep("\\<ĐTĐ\\>",duy$History))
## [1] 59
length(grep("\\<BMV\\>",duy$History))
## [1] 12
length(grep("\\<XG\\>",duy$History))
## [1] 3
length(grep("\\<COPD\\>",duy$History))
## [1] 5
length(grep("\\<ST\\>",duy$History))
## [1] 7
length(grep("\\<TBMMN\\>",duy$History))
## [1] 9
benh.chung <- c('THA', 'ĐTĐ','BMV','XG','COPD','ST','TBMMN')
benh.fre <- c(65,59,12,3,5,7,9)
benh.pro <- round(benh.fre/98,4)*100
history1 <- data.frame(benh.chung,benh.pro)
history1 %>%
  ggplot(aes(x=history1$benh.chung,y=history1$benh.pro,fill=history1$benh.chung))+
  geom_bar(stat='identity', colour="black")+
  theme_bw(base_size = 10)+
  geom_text(aes(label = history1$benh.pro), vjust = -0.5, colour = "black",size=5)+
  labs(x= "Tiền căn",y="Phần trăm (%)",fill="Bệnh")+
  scale_fill_brewer(palette = "RdBu")
## Warning: Use of `history1$benh.chung` is discouraged. Use `benh.chung` instead.
## Warning: Use of `history1$benh.pro` is discouraged. Use `benh.pro` instead.
## Warning: Use of `history1$benh.chung` is discouraged. Use `benh.chung` instead.
## Warning: Use of `history1$benh.pro` is discouraged. Use `benh.pro` instead.
## Warning: Use of `history1$benh.chung` is discouraged. Use `benh.chung` instead.
## Warning: Use of `history1$benh.pro` is discouraged. Use `benh.pro` instead.
## Warning: Use of `history1$benh.chung` is discouraged. Use `benh.chung` instead.

## 3.1.4. Độ nặng theo APACHE và SOFA Kiểm tra phân phối chuẩn của điểm SOFA và APACHE p < 0.05 thì phân phối không chuẩn

shapiro.test(duy$APACHEII)
## 
##  Shapiro-Wilk normality test
## 
## data:  duy$APACHEII
## W = 0.97037, p-value = 0.02587
shapiro.test(duy$SOFA)
## 
##  Shapiro-Wilk normality test
## 
## data:  duy$SOFA
## W = 0.90481, p-value = 2.933e-06

#Kiểm tra độ nặng theo APACHE, SOFA

library(psych)
nangAPACHE = duy %>%
  summarize(
    min = min(APACHEII),
    max = max(APACHEII),
    median = median(APACHEII),
    mean = mean(APACHEII),
    q1 = quantile(APACHEII, 0.25),
    q3 = quantile(APACHEII,0.75),
    sd = sd(APACHEII)
  )
nangSOFA = duy %>%
  summarise(
    min = min(SOFA),
    max = max(SOFA),
    median = median(SOFA),
    mean = mean(SOFA),
    q1 = quantile(SOFA, 0.25),
    q3 = quantile(SOFA,0.75),
    sd = sd(SOFA)
  )
nangAPACHE
##   min max median     mean q1 q3      sd
## 1   4  38   16.5 17.26531 12 22 7.56491
nangSOFA
##   min max median     mean q1 q3       sd
## 1   2  15    5.5 6.459184  4  9 3.449693

3.1.5. Các đặc điểm chung của BN NKH/SNK

3.1.5.1 Đặc điểm về TTTC

Tỷ lệ TTTC chung toàn bộ NC

table(duy$AKI)
## 
##    có không 
##    58    40
so.luong.AKI=c(58,40)
AKI=c("có","không")
phan.tram.AKI=round(so.luong.AKI/sum(so.luong.AKI)*100,2)
AKI1=paste(AKI,phan.tram.AKI)
AKI2=paste(AKI,"%",sep="")
pie(so.luong.AKI,labels=AKI,col=c("yellow","red"))

#### Tỷ lệ AKI theo từng giai đoạn

library("plyr")
length(grep("\\<GĐ 1\\>",Only.AKI$GD))
## [1] 13
length(grep("\\<GĐ 2\\>",Only.AKI$GD))
## [1] 27
length(grep("\\<GĐ 3\\>",Only.AKI$GD))
## [1] 18
AKI.GD <- c('GD1','GD2','GD3')
AKI.fre <- c(13,27,18)
AKI.pro <- round(AKI.fre/58,4)*100
AKI1 <- data.frame(AKI.GD,AKI.pro)
AKI1 %>%
  ggplot(aes(x=AKI1$AKI.GD,y=AKI1$AKI.pro,fill=AKI1$AKI.GD))+
  geom_bar(stat='identity', colour="black")+
  theme_bw(base_size = 10)+
  geom_text(aes(label = AKI1$AKI.pro), vjust = -0.5, colour = "black",size=5)+
  labs(x= "Giai đoạn",y="Phần trăm (%)",fill="TTTC")+
  scale_fill_brewer(palette = "RdBu")
## Warning: Use of `AKI1$AKI.GD` is discouraged. Use `AKI.GD` instead.
## Warning: Use of `AKI1$AKI.pro` is discouraged. Use `AKI.pro` instead.
## Warning: Use of `AKI1$AKI.GD` is discouraged. Use `AKI.GD` instead.
## Warning: Use of `AKI1$AKI.pro` is discouraged. Use `AKI.pro` instead.
## Warning: Use of `AKI1$AKI.GD` is discouraged. Use `AKI.GD` instead.
## Warning: Use of `AKI1$AKI.pro` is discouraged. Use `AKI.pro` instead.
## Warning: Use of `AKI1$AKI.GD` is discouraged. Use `AKI.GD` instead.

#### Tỷ lệ AKI theo nhóm tuổi

library(scales)
library(ggthemes)
library(dplyr)
library(tidyr)
library(ggplot2)

duy = duy %>%
  mutate(age1 = case_when(
    Age<=40 ~ "<=40",
    Age>40&Age<=60 ~ "41-60",
    Age>60&Age<=80 ~ "61-80",
    Age>80 ~ ">80"
  ))
duy %>%
  ggplot(aes(x=duy$age1, fill = duy$AKI))+
  geom_bar(aes(y = (..count..)/sum(..count..)),position = "dodge", alpha = 0.5) +
  geom_text(aes(y = ((..count..)/sum(..count..)), label = scales::percent((..count..)/sum(..count..))), stat = "count", vjust = -0.25) +
  scale_y_continuous(labels = percent)+
  theme_bw()+
  theme(panel.grid.major = element_blank(), panel.grid.minor = element_blank()) +
  labs(x= "Nhóm tuổi",y="Phần trăm (%)",fill="Kết cục")
## Warning: Use of `duy$age1` is discouraged. Use `age1` instead.
## Warning: Use of `duy$AKI` is discouraged. Use `AKI` instead.
## Warning: Use of `duy$age1` is discouraged. Use `age1` instead.
## Warning: Use of `duy$AKI` is discouraged. Use `AKI` instead.

### 3.1.5.2 Đặc điểm về nhiễm khuẩn #### Tỷ lệ nguồn nhiễm

#Nguồn nhiễm chung 98BN
library("plyr")
length(grep("\\<hh\\>",duy$Source))
## [1] 47
length(grep("\\<da\\>",duy$Source))
## [1] 32
length(grep("\\<th\\>",duy$Source))
## [1] 9
length(grep("\\<tn\\>",duy$Source))
## [1] 7
length(grep("\\<khác\\>",duy$Source))
## [1] 3
source.chung <- c('hh', 'da','th','tn','khác')
source.fre <- c(47,32,9,7,3)
source.pro <- round(source.fre/98,4)*100
source1 <- data.frame(source.chung,source.pro)
source1 %>%
  ggplot(aes(x=source1$source.chung,y=source1$source.pro,fill=source1$source.chung))+
  geom_bar(stat='identity', colour="black")+
  theme_bw(base_size = 10)+
  geom_text(aes(label = source1$source.pro), vjust = -0.5, colour = "black",size=5)+
  labs(x= "Nguồn",y="Phần trăm (%)",fill="Nguồn")+
  scale_fill_brewer(palette = "RdBu")
## Warning: Use of `source1$source.chung` is discouraged. Use `source.chung`
## instead.
## Warning: Use of `source1$source.pro` is discouraged. Use `source.pro` instead.
## Warning: Use of `source1$source.chung` is discouraged. Use `source.chung`
## instead.
## Warning: Use of `source1$source.pro` is discouraged. Use `source.pro` instead.
## Warning: Use of `source1$source.chung` is discouraged. Use `source.chung`
## instead.
## Warning: Use of `source1$source.pro` is discouraged. Use `source.pro` instead.
## Warning: Use of `source1$source.chung` is discouraged. Use `source.chung`
## instead.

#Nguồn nhiễm nhóm AKI 58BN
library("plyr")
length(grep("\\<hh\\>",Only.AKI$Source))
## [1] 26
length(grep("\\<da\\>",Only.AKI$Source))
## [1] 19
length(grep("\\<th\\>",Only.AKI$Source))
## [1] 8
length(grep("\\<tn\\>",Only.AKI$Source))
## [1] 5
length(grep("\\<khác\\>",Only.AKI$Source))
## [1] 0
source.onlyAKI <- c('hh', 'da','th','tn','khác')
source.onlyAKI.fre <- c(26,19,8,5,0)
source.onlyAKI.pro <- round(source.onlyAKI.fre/58,4)*100
source2 <- data.frame(source.onlyAKI,source.onlyAKI.pro)
source2 %>%
  ggplot(aes(x=source2$source.onlyAKI,y=source2$source.onlyAKI.pro,fill=source2$source.onlyAKI))+
  geom_bar(stat='identity', colour="black")+
  theme_bw(base_size = 10)+
  geom_text(aes(label = source2$source.onlyAKI.pro), vjust = -0.5, colour = "black",size=5)+
  labs(x= "Nguồn",y="Phần trăm (%)",fill="Nguồn")+
  scale_fill_brewer(palette = "RdBu")
## Warning: Use of `source2$source.onlyAKI` is discouraged. Use `source.onlyAKI`
## instead.
## Warning: Use of `source2$source.onlyAKI.pro` is discouraged. Use
## `source.onlyAKI.pro` instead.
## Warning: Use of `source2$source.onlyAKI` is discouraged. Use `source.onlyAKI`
## instead.
## Warning: Use of `source2$source.onlyAKI.pro` is discouraged. Use
## `source.onlyAKI.pro` instead.
## Warning: Use of `source2$source.onlyAKI` is discouraged. Use `source.onlyAKI`
## instead.
## Warning: Use of `source2$source.onlyAKI.pro` is discouraged. Use
## `source.onlyAKI.pro` instead.
## Warning: Use of `source2$source.onlyAKI` is discouraged. Use `source.onlyAKI`
## instead.

#Nguồn nhiễm nhóm không AKI 40BN
library("plyr")
length(grep("\\<hh\\>",No.AKI$Source))
## [1] 21
length(grep("\\<da\\>",No.AKI$Source))
## [1] 13
length(grep("\\<th\\>",No.AKI$Source))
## [1] 1
length(grep("\\<tn\\>",No.AKI$Source))
## [1] 2
length(grep("\\<khác\\>",No.AKI$Source))
## [1] 3
source.noAKI <- c('hh', 'da','th','tn','khác')
source.noAKI.fre <- c(21,13,1,2,3)
source.noAKI.pro <- round(source.noAKI.fre/40,4)*100
source3 <- data.frame(source.noAKI,source.noAKI.pro)
source3 %>%
  ggplot(aes(x=source3$source.noAKI,y=source3$source.noAKI.pro,fill=source3$source.noAKI))+
  geom_bar(stat='identity', colour="black")+
  theme_bw(base_size = 10)+
  geom_text(aes(label = source3$source.noAKI.pro), vjust = -0.5, colour = "black",size=5)+
  labs(x= "Nguồn",y="Phần trăm (%)",fill="Nguồn")+
  scale_fill_brewer(palette = "RdBu")
## Warning: Use of `source3$source.noAKI` is discouraged. Use `source.noAKI`
## instead.
## Warning: Use of `source3$source.noAKI.pro` is discouraged. Use
## `source.noAKI.pro` instead.
## Warning: Use of `source3$source.noAKI` is discouraged. Use `source.noAKI`
## instead.
## Warning: Use of `source3$source.noAKI.pro` is discouraged. Use
## `source.noAKI.pro` instead.
## Warning: Use of `source3$source.noAKI` is discouraged. Use `source.noAKI`
## instead.
## Warning: Use of `source3$source.noAKI.pro` is discouraged. Use
## `source.noAKI.pro` instead.
## Warning: Use of `source3$source.noAKI` is discouraged. Use `source.noAKI`
## instead.

#### Tỷ lệ cấy máu dương tính

table(duy$`Blood culture`)
## 
##    âm tính dương tính 
##         80         18
so.luong.bloodculture=c(80,18)
Blood.culture=c("Âm tính","Dương tính")
phan.tram.bloodculture=round(so.luong.bloodculture/sum(so.luong.bloodculture)*100,2)
Cay1=paste(Blood.culture,so.luong.bloodculture)
Cay2=paste(Blood.culture,"%",sep="")
pie(so.luong.bloodculture,labels=Blood.culture,col=c("yellow","red"))

#### Tần suất các chủng vi sinh

# Biểu đồ tần suất vi sinh 
library("plyr")
length(grep("\\<Klebsiella Pneumoniae\\>",duy$Bac1))
## [1] 17
length(grep("\\<Escherichia coli\\>",duy$Bac1))
## [1] 15
length(grep("\\<Acinetobacter Baumanii cplx\\>",duy$Bac1))
## [1] 14
length(grep("\\<Pseudomonas aeruginosa\\>",duy$Bac1))
## [1] 7
length(grep("\\<Staphylococcus aureus\\>",duy$Bac1))
## [1] 11
length(grep("\\<Streptococcus pneumoniae\\>",duy$Bac1))
## [1] 4
length(grep("\\<khác\\>",duy$Bac1))
## [1] 12
Bac.chung <- c('Kleb', 'E.coli','Aci','Pseu','Staph.aureus','Strep.pneumoniae','khác')
Bac.fre <- c(17,15,14,7,11,4,12)
Bac.pro <- round(Bac.fre/80,4)*100
Vi.sinh <- data.frame(Bac.chung,Bac.pro)
Vi.sinh %>%
  ggplot(aes(x=Vi.sinh$Bac.chung,y=Vi.sinh$Bac.pro,fill=Vi.sinh$Bac.chung))+
  geom_bar(stat='identity', colour="black")+
  theme_bw(base_size = 10)+
  geom_text(aes(label = Vi.sinh$Bac.pro), vjust = -0.5, colour = "black",size=5)+
  labs(x= "Vi sinh",y="Phần trăm (%)",fill="Vi sinh")+
  scale_fill_brewer(palette = "RdBu")
## Warning: Use of `Vi.sinh$Bac.chung` is discouraged. Use `Bac.chung` instead.
## Warning: Use of `Vi.sinh$Bac.pro` is discouraged. Use `Bac.pro` instead.
## Warning: Use of `Vi.sinh$Bac.chung` is discouraged. Use `Bac.chung` instead.
## Warning: Use of `Vi.sinh$Bac.pro` is discouraged. Use `Bac.pro` instead.
## Warning: Use of `Vi.sinh$Bac.chung` is discouraged. Use `Bac.chung` instead.
## Warning: Use of `Vi.sinh$Bac.pro` is discouraged. Use `Bac.pro` instead.
## Warning: Use of `Vi.sinh$Bac.chung` is discouraged. Use `Bac.chung` instead.

# Bảng tần suất vi sinh chung toàn bộ NC (80BN)
Bacteria.freq<-table(duy$Bacteria)
Bacteria.freq = data.frame(Bacteria.freq)

# Bảng tần suất vi sinh nhóm có AKI (58BN)
Bacteria.freq.only.AKI<-table(Only.AKI$Bacteria)
Bacteria.freq.only.AKI = data.frame(Bacteria.freq.only.AKI)

# Bảng tần suất vi sinh nhóm không AKI (40BN)
Bacteria.freq.no.AKI<-table(No.AKI$Bacteria)
Bacteria.freq.no.AKI = data.frame(Bacteria.freq.no.AKI)

So sánh tỷ lệ cấy máu và cấy bệnh phẩm dương tính giữa 2 nhóm

#Chung toàn bộ NC
Cay.mau.duong<-table(duy$`Blood culture`)
Cay.mau.duong = data.frame(Cay.mau.duong)
Cay.benh.pham.duong<-table(duy$Bac2)
Cay.benh.pham.duong = data.frame(Cay.benh.pham.duong)
#Nhóm có AKI
Cay.mau.duong.onlyAKI<-table(Only.AKI$`Blood culture`)
Cay.mau.duong.onlyAKI = data.frame(Cay.mau.duong.onlyAKI)
Cay.benh.pham.duong.onlyAKI<-table(Only.AKI$Bac2)
Cay.benh.pham.duong.onlyAKI = data.frame(Cay.benh.pham.duong.onlyAKI)
#Nhóm ko AKI
Cay.mau.duong.noAKI<-table(No.AKI$`Blood culture`)
Cay.mau.duong.noAKI = data.frame(Cay.mau.duong.noAKI)
Cay.benh.pham.duong.noAKI<-table(No.AKI$Bac2)
Cay.benh.pham.duong.noAKI = data.frame(Cay.benh.pham.duong.noAKI)

3.1.5.3 Đặc điểm LS và CLS giữa 2 nhóm

attach(duy)
## The following objects are masked _by_ .GlobalEnv:
## 
##     AKI, Sex
## The following objects are masked from No.AKI:
## 
##     Age, AKI, AKIma, Albumin, APACHEII, Bac1, Bac2, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     da, Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, hohap, khac,
##     Lactate, Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA,
##     Source, Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC,
##     THA, THAma, tietnieu, tieuhoa, Vasopressor, Vasopressorma,
##     Ventilation, Ventilationma, Year
## The following objects are masked from Only.AKI:
## 
##     Age, AKI, AKIma, Albumin, APACHEII, Bac1, Bac2, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     da, Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, hohap, khac,
##     Lactate, Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA,
##     Source, Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC,
##     THA, THAma, tietnieu, tieuhoa, Vasopressor, Vasopressorma,
##     Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 12):
## 
##     Age, AKI, AKIma, Albumin, APACHEII, Bac1, Bac2, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     da, Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, hohap, Ketcuc,
##     khac, Lactate, Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa,
##     SOFA, Source, Source culture, ST, STma, STT, SVV, T, TBMMN,
##     TBMMNma, TC, THA, THAma, tietnieu, tieuhoa, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following object is masked from package:base:
## 
##     T
#APACHEII
shapiro.test(APACHEII)
## 
##  Shapiro-Wilk normality test
## 
## data:  APACHEII
## W = 0.97037, p-value = 0.02587
library(psych)
library("plyr")
detach(package:plyr)
nangAPACHE.2nhom = duy %>%
  group_by(AKI) %>%
  summarise(
    min = min(APACHEII),
    max = max(APACHEII),
    median = median(APACHEII),
    mean = mean(APACHEII),
    q1 = quantile(APACHEII, 0.25),
    q3 = quantile(APACHEII,0.75),
    sd = sd(APACHEII)
  )
wilcox.test(duy$APACHEII~duy$AKI)
## 
##  Wilcoxon rank sum test with continuity correction
## 
## data:  duy$APACHEII by duy$AKI
## W = 2000, p-value = 1.228e-09
## alternative hypothesis: true location shift is not equal to 0
#SOFA
shapiro.test(SOFA)
## 
##  Shapiro-Wilk normality test
## 
## data:  SOFA
## W = 0.90481, p-value = 2.933e-06
library(psych)
library("plyr")
## ------------------------------------------------------------------------------
## You have loaded plyr after dplyr - this is likely to cause problems.
## If you need functions from both plyr and dplyr, please load plyr first, then dplyr:
## library(plyr); library(dplyr)
## ------------------------------------------------------------------------------
## 
## Attaching package: 'plyr'
## The following objects are masked from 'package:dplyr':
## 
##     arrange, count, desc, failwith, id, mutate, rename, summarise,
##     summarize
detach(package:plyr)
nangSOFA.2nhom = duy %>%
  group_by(AKI) %>%
  summarise(
    min = min(SOFA),
    max = max(SOFA),
    median = median(SOFA),
    mean = mean(SOFA),
    q1 = quantile(SOFA, 0.25),
    q3 = quantile(SOFA,0.75),
    sd = sd(SOFA)
  )
wilcox.test(duy$SOFA~duy$AKI)
## 
##  Wilcoxon rank sum test with continuity correction
## 
## data:  duy$SOFA by duy$AKI
## W = 1834, p-value = 9.533e-07
## alternative hypothesis: true location shift is not equal to 0
#NLR
shapiro.test(duy$NLR)
## 
##  Shapiro-Wilk normality test
## 
## data:  duy$NLR
## W = 0.85831, p-value = 3.104e-08
library(psych)
library("plyr")
## ------------------------------------------------------------------------------
## You have loaded plyr after dplyr - this is likely to cause problems.
## If you need functions from both plyr and dplyr, please load plyr first, then dplyr:
## library(plyr); library(dplyr)
## ------------------------------------------------------------------------------
## 
## Attaching package: 'plyr'
## The following objects are masked from 'package:dplyr':
## 
##     arrange, count, desc, failwith, id, mutate, rename, summarise,
##     summarize
detach(package:plyr)
NLR.chung = duy %>%
  group_by(duy$AKI) %>%
  summarise(
    min = min(NLR),
    max = max(NLR),
    median = median(NLR),
    mean = mean(NLR),
    q1 = quantile(NLR, 0.25),
    q3 = quantile(NLR,0.75),
    sd = sd(NLR)
  )
wilcox.test(duy$NLR~duy$AKI)
## 
##  Wilcoxon rank sum test with continuity correction
## 
## data:  duy$NLR by duy$AKI
## W = 1961, p-value = 7.2e-09
## alternative hypothesis: true location shift is not equal to 0
#Tuổi
shapiro.test(duy$Age)
## 
##  Shapiro-Wilk normality test
## 
## data:  duy$Age
## W = 0.9775, p-value = 0.09086
Age.chung = duy %>%
  group_by(AKI) %>%
  summarise(
    min = min(Age),
    max = max(Age),
    median = median(Age),
    mean = mean(Age),
    q1 = quantile(Age, 0.25),
    q3 = quantile(Age,0.75),
    sd = sd(Age)
  )
t.test(duy$Age~duy$AKI)
## 
##  Welch Two Sample t-test
## 
## data:  duy$Age by duy$AKI
## t = 2.0043, df = 77.459, p-value = 0.04853
## alternative hypothesis: true difference in means between group có and group không is not equal to 0
## 95 percent confidence interval:
##   0.03520831 10.60789514
## sample estimates:
##    mean in group có mean in group không 
##            66.89655            61.57500
#HATB
shapiro.test(duy$HATB)
## 
##  Shapiro-Wilk normality test
## 
## data:  duy$HATB
## W = 0.97126, p-value = 0.03024
library(psych)
library("plyr")
## ------------------------------------------------------------------------------
## You have loaded plyr after dplyr - this is likely to cause problems.
## If you need functions from both plyr and dplyr, please load plyr first, then dplyr:
## library(plyr); library(dplyr)
## ------------------------------------------------------------------------------
## 
## Attaching package: 'plyr'
## The following objects are masked from 'package:dplyr':
## 
##     arrange, count, desc, failwith, id, mutate, rename, summarise,
##     summarize
detach(package:plyr)
HATB.chung = duy %>%
  group_by(AKI) %>%
  summarise(
    min = min(HATB),
    max = max(HATB),
    median = median(HATB),
    mean = mean(HATB),
    q1 = quantile(HATB, 0.25),
    q3 = quantile(HATB,0.75),
    sd = sd(HATB)
  )
wilcox.test(duy$HATB~duy$AKI)
## 
##  Wilcoxon rank sum test with continuity correction
## 
## data:  duy$HATB by duy$AKI
## W = 805, p-value = 0.01028
## alternative hypothesis: true location shift is not equal to 0
#Albumin
shapiro.test(duy$Albumin)
## 
##  Shapiro-Wilk normality test
## 
## data:  duy$Albumin
## W = 0.98792, p-value = 0.5173
library(psych)
library("plyr")
## ------------------------------------------------------------------------------
## You have loaded plyr after dplyr - this is likely to cause problems.
## If you need functions from both plyr and dplyr, please load plyr first, then dplyr:
## library(plyr); library(dplyr)
## ------------------------------------------------------------------------------
## 
## Attaching package: 'plyr'
## The following objects are masked from 'package:dplyr':
## 
##     arrange, count, desc, failwith, id, mutate, rename, summarise,
##     summarize
detach(package:plyr)
Albumin.chung = duy %>%
  group_by(AKI) %>%
  summarise(
    min = min(Albumin),
    max = max(Albumin),
    median = median(Albumin),
    mean = mean(Albumin),
    q1 = quantile(Albumin, 0.25),
    q3 = quantile(Albumin,0.75),
    sd = sd(Albumin)
  )
t.test(duy$Albumin~duy$AKI)
## 
##  Welch Two Sample t-test
## 
## data:  duy$Albumin by duy$AKI
## t = -1.6695, df = 86.723, p-value = 0.09863
## alternative hypothesis: true difference in means between group có and group không is not equal to 0
## 95 percent confidence interval:
##  -4.341524  0.377800
## sample estimates:
##    mean in group có mean in group không 
##            27.75414            29.73600
#CRP
shapiro.test(duy$CRP)
## 
##  Shapiro-Wilk normality test
## 
## data:  duy$CRP
## W = 0.9588, p-value = 0.003731
library(psych)
library("plyr")
## ------------------------------------------------------------------------------
## You have loaded plyr after dplyr - this is likely to cause problems.
## If you need functions from both plyr and dplyr, please load plyr first, then dplyr:
## library(plyr); library(dplyr)
## ------------------------------------------------------------------------------
## 
## Attaching package: 'plyr'
## The following objects are masked from 'package:dplyr':
## 
##     arrange, count, desc, failwith, id, mutate, rename, summarise,
##     summarize
detach(package:plyr)
CRP.chung = duy %>%
  group_by(AKI) %>%
  summarise(
    min = min(CRP),
    max = max(CRP),
    median = median(CRP),
    mean = mean(CRP),
    q1 = quantile(CRP, 0.25),
    q3 = quantile(CRP,0.75),
    sd = sd(CRP)
  )
wilcox.test(duy$CRP~duy$AKI)
## 
##  Wilcoxon rank sum test with continuity correction
## 
## data:  duy$CRP by duy$AKI
## W = 1345, p-value = 0.1823
## alternative hypothesis: true location shift is not equal to 0
#BC
shapiro.test(duy$BC)
## 
##  Shapiro-Wilk normality test
## 
## data:  duy$BC
## W = 0.93012, p-value = 5.994e-05
library(psych)
library("plyr")
## ------------------------------------------------------------------------------
## You have loaded plyr after dplyr - this is likely to cause problems.
## If you need functions from both plyr and dplyr, please load plyr first, then dplyr:
## library(plyr); library(dplyr)
## ------------------------------------------------------------------------------
## 
## Attaching package: 'plyr'
## The following objects are masked from 'package:dplyr':
## 
##     arrange, count, desc, failwith, id, mutate, rename, summarise,
##     summarize
detach(package:plyr)
BC.chung = duy %>%
  group_by(AKI) %>%
  summarise(
    min = min(BC),
    max = max(BC),
    median = median(BC),
    mean = mean(BC),
    q1 = quantile(BC, 0.25),
    q3 = quantile(BC,0.75),
    sd = sd(BC)
  )
wilcox.test(duy$BC~duy$AKI)
## 
##  Wilcoxon rank sum test with continuity correction
## 
## data:  duy$BC by duy$AKI
## W = 1413.5, p-value = 0.06744
## alternative hypothesis: true location shift is not equal to 0
#TC
shapiro.test(duy$TC)
## 
##  Shapiro-Wilk normality test
## 
## data:  duy$TC
## W = 0.97313, p-value = 0.04193
library(psych)
library("plyr")
## ------------------------------------------------------------------------------
## You have loaded plyr after dplyr - this is likely to cause problems.
## If you need functions from both plyr and dplyr, please load plyr first, then dplyr:
## library(plyr); library(dplyr)
## ------------------------------------------------------------------------------
## 
## Attaching package: 'plyr'
## The following objects are masked from 'package:dplyr':
## 
##     arrange, count, desc, failwith, id, mutate, rename, summarise,
##     summarize
detach(package:plyr)
TC.chung = duy %>%
  group_by(AKI) %>%
  summarise(
    min = min(TC),
    max = max(TC),
    median = median(TC),
    mean = mean(TC),
    q1 = quantile(TC, 0.25),
    q3 = quantile(TC,0.75),
    sd = sd(TC)
  )
wilcox.test(duy$TC~duy$AKI)
## 
##  Wilcoxon rank sum test with continuity correction
## 
## data:  duy$TC by duy$AKI
## W = 513.5, p-value = 3.017e-06
## alternative hypothesis: true location shift is not equal to 0
#Neutrophil
shapiro.test(duy$Neu)
## 
##  Shapiro-Wilk normality test
## 
## data:  duy$Neu
## W = 0.92517, p-value = 3.193e-05
library(psych)
library("plyr")
## ------------------------------------------------------------------------------
## You have loaded plyr after dplyr - this is likely to cause problems.
## If you need functions from both plyr and dplyr, please load plyr first, then dplyr:
## library(plyr); library(dplyr)
## ------------------------------------------------------------------------------
## 
## Attaching package: 'plyr'
## The following objects are masked from 'package:dplyr':
## 
##     arrange, count, desc, failwith, id, mutate, rename, summarise,
##     summarize
detach(package:plyr)
Neu.chung = duy %>%
  group_by(AKI) %>%
  summarise(
    min = min(Neu),
    max = max(Neu),
    median = median(Neu),
    mean = mean(Neu),
    q1 = quantile(Neu, 0.25),
    q3 = quantile(Neu,0.75),
    sd = sd(Neu)
  )
wilcox.test(duy$Neu~duy$AKI)
## 
##  Wilcoxon rank sum test with continuity correction
## 
## data:  duy$Neu by duy$AKI
## W = 1524, p-value = 0.008602
## alternative hypothesis: true location shift is not equal to 0
#Lympho
shapiro.test(duy$Lym)
## 
##  Shapiro-Wilk normality test
## 
## data:  duy$Lym
## W = 0.86251, p-value = 4.499e-08
library(psych)
library("plyr")
## ------------------------------------------------------------------------------
## You have loaded plyr after dplyr - this is likely to cause problems.
## If you need functions from both plyr and dplyr, please load plyr first, then dplyr:
## library(plyr); library(dplyr)
## ------------------------------------------------------------------------------
## 
## Attaching package: 'plyr'
## The following objects are masked from 'package:dplyr':
## 
##     arrange, count, desc, failwith, id, mutate, rename, summarise,
##     summarize
detach(package:plyr)
Lym.chung = duy %>%
  group_by(AKI) %>%
  summarise(
    min = min(Lym),
    max = max(Lym),
    median = median(Lym),
    mean = mean(Lym),
    q1 = quantile(Lym, 0.25),
    q3 = quantile(Lym,0.75),
    sd = sd(Lym)
  )
wilcox.test(duy$Lym~duy$AKI)
## 
##  Wilcoxon rank sum test with continuity correction
## 
## data:  duy$Lym by duy$AKI
## W = 537.5, p-value = 6.912e-06
## alternative hypothesis: true location shift is not equal to 0
#Vận mạch và thở máy
library(gmodels)
attach(duy)
## The following objects are masked _by_ .GlobalEnv:
## 
##     AKI, Sex
## The following objects are masked from duy (pos = 4):
## 
##     Age, age1, AKI, AKIma, Albumin, APACHEII, Bac1, Bac2, Bacteria, BC,
##     Blood culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen,
##     CreNen/Max, CRP, da, Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ
##     tên, hohap, Ketcuc, khac, Lactate, Lym, Mã BA, Neu, NLR, P/F,
##     Pulse, Sex, Sexmahoa, SOFA, Source, Source culture, ST, STma, STT,
##     SVV, T, TBMMN, TBMMNma, TC, THA, THAma, tietnieu, tieuhoa,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from No.AKI:
## 
##     Age, AKI, AKIma, Albumin, APACHEII, Bac1, Bac2, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     da, Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, hohap, khac,
##     Lactate, Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA,
##     Source, Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC,
##     THA, THAma, tietnieu, tieuhoa, Vasopressor, Vasopressorma,
##     Ventilation, Ventilationma, Year
## The following objects are masked from Only.AKI:
## 
##     Age, AKI, AKIma, Albumin, APACHEII, Bac1, Bac2, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     da, Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, hohap, khac,
##     Lactate, Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA,
##     Source, Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC,
##     THA, THAma, tietnieu, tieuhoa, Vasopressor, Vasopressorma,
##     Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 13):
## 
##     Age, AKI, AKIma, Albumin, APACHEII, Bac1, Bac2, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     da, Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, hohap, Ketcuc,
##     khac, Lactate, Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa,
##     SOFA, Source, Source culture, ST, STma, STT, SVV, T, TBMMN,
##     TBMMNma, TC, THA, THAma, tietnieu, tieuhoa, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following object is masked from package:base:
## 
##     T
CrossTable(Vasopressor,duy$AKI,chisq = TRUE, fisher = TRUE)
## 
##  
##    Cell Contents
## |-------------------------|
## |                       N |
## | Chi-square contribution |
## |           N / Row Total |
## |           N / Col Total |
## |         N / Table Total |
## |-------------------------|
## 
##  
## Total Observations in Table:  98 
## 
##  
##              | duy$AKI 
##  Vasopressor |        có |     không | Row Total | 
## -------------|-----------|-----------|-----------|
##           có |        36 |         6 |        42 | 
##              |     4.995 |     7.243 |           | 
##              |     0.857 |     0.143 |     0.429 | 
##              |     0.621 |     0.150 |           | 
##              |     0.367 |     0.061 |           | 
## -------------|-----------|-----------|-----------|
##        không |        22 |        34 |        56 | 
##              |     3.746 |     5.432 |           | 
##              |     0.393 |     0.607 |     0.571 | 
##              |     0.379 |     0.850 |           | 
##              |     0.224 |     0.347 |           | 
## -------------|-----------|-----------|-----------|
## Column Total |        58 |        40 |        98 | 
##              |     0.592 |     0.408 |           | 
## -------------|-----------|-----------|-----------|
## 
##  
## Statistics for All Table Factors
## 
## 
## Pearson's Chi-squared test 
## ------------------------------------------------------------
## Chi^2 =  21.41638     d.f. =  1     p =  3.696002e-06 
## 
## Pearson's Chi-squared test with Yates' continuity correction 
## ------------------------------------------------------------
## Chi^2 =  19.53752     d.f. =  1     p =  9.864316e-06 
## 
##  
## Fisher's Exact Test for Count Data
## ------------------------------------------------------------
## Sample estimate odds ratio:  9.043504 
## 
## Alternative hypothesis: true odds ratio is not equal to 1
## p =  3.398832e-06 
## 95% confidence interval:  3.103694 30.74956 
## 
## Alternative hypothesis: true odds ratio is less than 1
## p =  0.9999997 
## 95% confidence interval:  0 25.38797 
## 
## Alternative hypothesis: true odds ratio is greater than 1
## p =  2.538629e-06 
## 95% confidence interval:  3.581542 Inf 
## 
## 
## 
CrossTable(Ventilation,duy$AKI,chisq = TRUE, fisher = TRUE)
## 
##  
##    Cell Contents
## |-------------------------|
## |                       N |
## | Chi-square contribution |
## |           N / Row Total |
## |           N / Col Total |
## |         N / Table Total |
## |-------------------------|
## 
##  
## Total Observations in Table:  98 
## 
##  
##              | duy$AKI 
##  Ventilation |        có |     không | Row Total | 
## -------------|-----------|-----------|-----------|
##           có |        40 |        20 |        60 | 
##              |     0.568 |     0.823 |           | 
##              |     0.667 |     0.333 |     0.612 | 
##              |     0.690 |     0.500 |           | 
##              |     0.408 |     0.204 |           | 
## -------------|-----------|-----------|-----------|
##        không |        18 |        20 |        38 | 
##              |     0.896 |     1.300 |           | 
##              |     0.474 |     0.526 |     0.388 | 
##              |     0.310 |     0.500 |           | 
##              |     0.184 |     0.204 |           | 
## -------------|-----------|-----------|-----------|
## Column Total |        58 |        40 |        98 | 
##              |     0.592 |     0.408 |           | 
## -------------|-----------|-----------|-----------|
## 
##  
## Statistics for All Table Factors
## 
## 
## Pearson's Chi-squared test 
## ------------------------------------------------------------
## Chi^2 =  3.586812     d.f. =  1     p =  0.05823987 
## 
## Pearson's Chi-squared test with Yates' continuity correction 
## ------------------------------------------------------------
## Chi^2 =  2.832414     d.f. =  1     p =  0.0923794 
## 
##  
## Fisher's Exact Test for Count Data
## ------------------------------------------------------------
## Sample estimate odds ratio:  2.2035 
## 
## Alternative hypothesis: true odds ratio is not equal to 1
## p =  0.09086821 
## 95% confidence interval:  0.8905497 5.550035 
## 
## Alternative hypothesis: true odds ratio is less than 1
## p =  0.9822588 
## 95% confidence interval:  0 4.841014 
## 
## Alternative hypothesis: true odds ratio is greater than 1
## p =  0.04637695 
## 95% confidence interval:  1.015152 Inf 
## 
## 
## 
CrossTable(duy$Sex,duy$AKI,chisq = TRUE, fisher = TRUE)
## 
##  
##    Cell Contents
## |-------------------------|
## |                       N |
## | Chi-square contribution |
## |           N / Row Total |
## |           N / Col Total |
## |         N / Table Total |
## |-------------------------|
## 
##  
## Total Observations in Table:  98 
## 
##  
##              | duy$AKI 
##      duy$Sex |        có |     không | Row Total | 
## -------------|-----------|-----------|-----------|
##          Nam |        27 |        19 |        46 | 
##              |     0.002 |     0.003 |           | 
##              |     0.587 |     0.413 |     0.469 | 
##              |     0.466 |     0.475 |           | 
##              |     0.276 |     0.194 |           | 
## -------------|-----------|-----------|-----------|
##           Nữ |        31 |        21 |        52 | 
##              |     0.002 |     0.002 |           | 
##              |     0.596 |     0.404 |     0.531 | 
##              |     0.534 |     0.525 |           | 
##              |     0.316 |     0.214 |           | 
## -------------|-----------|-----------|-----------|
## Column Total |        58 |        40 |        98 | 
##              |     0.592 |     0.408 |           | 
## -------------|-----------|-----------|-----------|
## 
##  
## Statistics for All Table Factors
## 
## 
## Pearson's Chi-squared test 
## ------------------------------------------------------------
## Chi^2 =  0.008547169     d.f. =  1     p =  0.9263398 
## 
## Pearson's Chi-squared test with Yates' continuity correction 
## ------------------------------------------------------------
## Chi^2 =  0     d.f. =  1     p =  1 
## 
##  
## Fisher's Exact Test for Count Data
## ------------------------------------------------------------
## Sample estimate odds ratio:  0.963003 
## 
## Alternative hypothesis: true odds ratio is not equal to 1
## p =  1 
## 95% confidence interval:  0.3979903 2.333786 
## 
## Alternative hypothesis: true odds ratio is less than 1
## p =  0.5448138 
## 95% confidence interval:  0 2.049514 
## 
## Alternative hypothesis: true odds ratio is greater than 1
## p =  0.6174506 
## 95% confidence interval:  0.452956 Inf 
## 
## 
## 
#Các bệnh nền
library(gmodels)
CrossTable(duy$THA,duy$AKI,chisq = TRUE, fisher = TRUE)
## 
##  
##    Cell Contents
## |-------------------------|
## |                       N |
## | Chi-square contribution |
## |           N / Row Total |
## |           N / Col Total |
## |         N / Table Total |
## |-------------------------|
## 
##  
## Total Observations in Table:  98 
## 
##  
##              | duy$AKI 
##      duy$THA |        có |     không | Row Total | 
## -------------|-----------|-----------|-----------|
##           có |        41 |        24 |        65 | 
##              |     0.166 |     0.241 |           | 
##              |     0.631 |     0.369 |     0.663 | 
##              |     0.707 |     0.600 |           | 
##              |     0.418 |     0.245 |           | 
## -------------|-----------|-----------|-----------|
##        không |        17 |        16 |        33 | 
##              |     0.328 |     0.475 |           | 
##              |     0.515 |     0.485 |     0.337 | 
##              |     0.293 |     0.400 |           | 
##              |     0.173 |     0.163 |           | 
## -------------|-----------|-----------|-----------|
## Column Total |        58 |        40 |        98 | 
##              |     0.592 |     0.408 |           | 
## -------------|-----------|-----------|-----------|
## 
##  
## Statistics for All Table Factors
## 
## 
## Pearson's Chi-squared test 
## ------------------------------------------------------------
## Chi^2 =  1.211195     d.f. =  1     p =  0.2710955 
## 
## Pearson's Chi-squared test with Yates' continuity correction 
## ------------------------------------------------------------
## Chi^2 =  0.7798605     d.f. =  1     p =  0.3771838 
## 
##  
## Fisher's Exact Test for Count Data
## ------------------------------------------------------------
## Sample estimate odds ratio:  1.599852 
## 
## Alternative hypothesis: true odds ratio is not equal to 1
## p =  0.2859944 
## 95% confidence interval:  0.6297767 4.08243 
## 
## Alternative hypothesis: true odds ratio is less than 1
## p =  0.9059231 
## 95% confidence interval:  0 3.558547 
## 
## Alternative hypothesis: true odds ratio is greater than 1
## p =  0.188405 
## 95% confidence interval:  0.7215265 Inf 
## 
## 
## 
CrossTable(duy$ST,duy$AKI,chisq = TRUE, fisher = TRUE)
## Warning in chisq.test(t, correct = TRUE, ...): Chi-squared approximation may be
## incorrect
## Warning in chisq.test(t, correct = FALSE, ...): Chi-squared approximation may be
## incorrect
## 
##  
##    Cell Contents
## |-------------------------|
## |                       N |
## | Chi-square contribution |
## |           N / Row Total |
## |           N / Col Total |
## |         N / Table Total |
## |-------------------------|
## 
##  
## Total Observations in Table:  98 
## 
##  
##              | duy$AKI 
##       duy$ST |        có |     không | Row Total | 
## -------------|-----------|-----------|-----------|
##           có |         6 |         1 |         7 | 
##              |     0.833 |     1.207 |           | 
##              |     0.857 |     0.143 |     0.071 | 
##              |     0.103 |     0.025 |           | 
##              |     0.061 |     0.010 |           | 
## -------------|-----------|-----------|-----------|
##        không |        52 |        39 |        91 | 
##              |     0.064 |     0.093 |           | 
##              |     0.571 |     0.429 |     0.929 | 
##              |     0.897 |     0.975 |           | 
##              |     0.531 |     0.398 |           | 
## -------------|-----------|-----------|-----------|
## Column Total |        58 |        40 |        98 | 
##              |     0.592 |     0.408 |           | 
## -------------|-----------|-----------|-----------|
## 
##  
## Statistics for All Table Factors
## 
## 
## Pearson's Chi-squared test 
## ------------------------------------------------------------
## Chi^2 =  2.196552     d.f. =  1     p =  0.1383199 
## 
## Pearson's Chi-squared test with Yates' continuity correction 
## ------------------------------------------------------------
## Chi^2 =  1.173011     d.f. =  1     p =  0.2787835 
## 
##  
## Fisher's Exact Test for Count Data
## ------------------------------------------------------------
## Sample estimate odds ratio:  4.444921 
## 
## Alternative hypothesis: true odds ratio is not equal to 1
## p =  0.2348235 
## 95% confidence interval:  0.507262 211.987 
## 
## Alternative hypothesis: true odds ratio is less than 1
## p =  0.9782662 
## 95% confidence interval:  0 104.743 
## 
## Alternative hypothesis: true odds ratio is greater than 1
## p =  0.1387618 
## 95% confidence interval:  0.6464445 Inf 
## 
## 
## 
CrossTable(duy$BMV,duy$AKI,chisq = TRUE, fisher = TRUE)
## Warning in chisq.test(t, correct = TRUE, ...): Chi-squared approximation may be
## incorrect

## Warning in chisq.test(t, correct = TRUE, ...): Chi-squared approximation may be
## incorrect
## 
##  
##    Cell Contents
## |-------------------------|
## |                       N |
## | Chi-square contribution |
## |           N / Row Total |
## |           N / Col Total |
## |         N / Table Total |
## |-------------------------|
## 
##  
## Total Observations in Table:  98 
## 
##  
##              | duy$AKI 
##      duy$BMV |        có |     không | Row Total | 
## -------------|-----------|-----------|-----------|
##           có |         9 |         3 |        12 | 
##              |     0.507 |     0.735 |           | 
##              |     0.750 |     0.250 |     0.122 | 
##              |     0.155 |     0.075 |           | 
##              |     0.092 |     0.031 |           | 
## -------------|-----------|-----------|-----------|
##        không |        49 |        37 |        86 | 
##              |     0.071 |     0.103 |           | 
##              |     0.570 |     0.430 |     0.878 | 
##              |     0.845 |     0.925 |           | 
##              |     0.500 |     0.378 |           | 
## -------------|-----------|-----------|-----------|
## Column Total |        58 |        40 |        98 | 
##              |     0.592 |     0.408 |           | 
## -------------|-----------|-----------|-----------|
## 
##  
## Statistics for All Table Factors
## 
## 
## Pearson's Chi-squared test 
## ------------------------------------------------------------
## Chi^2 =  1.416069     d.f. =  1     p =  0.2340516 
## 
## Pearson's Chi-squared test with Yates' continuity correction 
## ------------------------------------------------------------
## Chi^2 =  0.7682446     d.f. =  1     p =  0.3807606 
## 
##  
## Fisher's Exact Test for Count Data
## ------------------------------------------------------------
## Sample estimate odds ratio:  2.24782 
## 
## Alternative hypothesis: true odds ratio is not equal to 1
## p =  0.3495442 
## 95% confidence interval:  0.5136018 13.80189 
## 
## Alternative hypothesis: true odds ratio is less than 1
## p =  0.9375872 
## 95% confidence interval:  0 10.30301 
## 
## Alternative hypothesis: true odds ratio is greater than 1
## p =  0.1919309 
## 95% confidence interval:  0.6219851 Inf 
## 
## 
## 
CrossTable(duy$COPD,duy$AKI,chisq = TRUE, fisher = TRUE)
## Warning in chisq.test(t, correct = TRUE, ...): Chi-squared approximation may be
## incorrect

## Warning in chisq.test(t, correct = TRUE, ...): Chi-squared approximation may be
## incorrect
## 
##  
##    Cell Contents
## |-------------------------|
## |                       N |
## | Chi-square contribution |
## |           N / Row Total |
## |           N / Col Total |
## |         N / Table Total |
## |-------------------------|
## 
##  
## Total Observations in Table:  98 
## 
##  
##              | duy$AKI 
##     duy$COPD |        có |     không | Row Total | 
## -------------|-----------|-----------|-----------|
##           có |         4 |         1 |         5 | 
##              |     0.366 |     0.531 |           | 
##              |     0.800 |     0.200 |     0.051 | 
##              |     0.069 |     0.025 |           | 
##              |     0.041 |     0.010 |           | 
## -------------|-----------|-----------|-----------|
##        không |        54 |        39 |        93 | 
##              |     0.020 |     0.029 |           | 
##              |     0.581 |     0.419 |     0.949 | 
##              |     0.931 |     0.975 |           | 
##              |     0.551 |     0.398 |           | 
## -------------|-----------|-----------|-----------|
## Column Total |        58 |        40 |        98 | 
##              |     0.592 |     0.408 |           | 
## -------------|-----------|-----------|-----------|
## 
##  
## Statistics for All Table Factors
## 
## 
## Pearson's Chi-squared test 
## ------------------------------------------------------------
## Chi^2 =  0.9451168     d.f. =  1     p =  0.3309654 
## 
## Pearson's Chi-squared test with Yates' continuity correction 
## ------------------------------------------------------------
## Chi^2 =  0.2551743     d.f. =  1     p =  0.6134551 
## 
##  
## Fisher's Exact Test for Count Data
## ------------------------------------------------------------
## Sample estimate odds ratio:  2.861971 
## 
## Alternative hypothesis: true odds ratio is not equal to 1
## p =  0.645599 
## 95% confidence interval:  0.2694541 145.7523 
## 
## Alternative hypothesis: true odds ratio is less than 1
## p =  0.9325275 
## 95% confidence interval:  0 71.88544 
## 
## Alternative hypothesis: true odds ratio is greater than 1
## p =  0.3173707 
## 95% confidence interval:  0.3566051 Inf 
## 
## 
## 
CrossTable(duy$BMV,duy$AKI,chisq = TRUE, fisher = TRUE)
## Warning in chisq.test(t, correct = TRUE, ...): Chi-squared approximation may be
## incorrect

## Warning in chisq.test(t, correct = TRUE, ...): Chi-squared approximation may be
## incorrect
## 
##  
##    Cell Contents
## |-------------------------|
## |                       N |
## | Chi-square contribution |
## |           N / Row Total |
## |           N / Col Total |
## |         N / Table Total |
## |-------------------------|
## 
##  
## Total Observations in Table:  98 
## 
##  
##              | duy$AKI 
##      duy$BMV |        có |     không | Row Total | 
## -------------|-----------|-----------|-----------|
##           có |         9 |         3 |        12 | 
##              |     0.507 |     0.735 |           | 
##              |     0.750 |     0.250 |     0.122 | 
##              |     0.155 |     0.075 |           | 
##              |     0.092 |     0.031 |           | 
## -------------|-----------|-----------|-----------|
##        không |        49 |        37 |        86 | 
##              |     0.071 |     0.103 |           | 
##              |     0.570 |     0.430 |     0.878 | 
##              |     0.845 |     0.925 |           | 
##              |     0.500 |     0.378 |           | 
## -------------|-----------|-----------|-----------|
## Column Total |        58 |        40 |        98 | 
##              |     0.592 |     0.408 |           | 
## -------------|-----------|-----------|-----------|
## 
##  
## Statistics for All Table Factors
## 
## 
## Pearson's Chi-squared test 
## ------------------------------------------------------------
## Chi^2 =  1.416069     d.f. =  1     p =  0.2340516 
## 
## Pearson's Chi-squared test with Yates' continuity correction 
## ------------------------------------------------------------
## Chi^2 =  0.7682446     d.f. =  1     p =  0.3807606 
## 
##  
## Fisher's Exact Test for Count Data
## ------------------------------------------------------------
## Sample estimate odds ratio:  2.24782 
## 
## Alternative hypothesis: true odds ratio is not equal to 1
## p =  0.3495442 
## 95% confidence interval:  0.5136018 13.80189 
## 
## Alternative hypothesis: true odds ratio is less than 1
## p =  0.9375872 
## 95% confidence interval:  0 10.30301 
## 
## Alternative hypothesis: true odds ratio is greater than 1
## p =  0.1919309 
## 95% confidence interval:  0.6219851 Inf 
## 
## 
## 
CrossTable(duy$ĐTĐ,duy$AKI,chisq = TRUE, fisher = TRUE)
## 
##  
##    Cell Contents
## |-------------------------|
## |                       N |
## | Chi-square contribution |
## |           N / Row Total |
## |           N / Col Total |
## |         N / Table Total |
## |-------------------------|
## 
##  
## Total Observations in Table:  98 
## 
##  
##              | duy$AKI 
##      duy$ĐTĐ |        có |     không | Row Total | 
## -------------|-----------|-----------|-----------|
##           có |        31 |        28 |        59 | 
##              |     0.440 |     0.638 |           | 
##              |     0.525 |     0.475 |     0.602 | 
##              |     0.534 |     0.700 |           | 
##              |     0.316 |     0.286 |           | 
## -------------|-----------|-----------|-----------|
##        không |        27 |        12 |        39 | 
##              |     0.665 |     0.965 |           | 
##              |     0.692 |     0.308 |     0.398 | 
##              |     0.466 |     0.300 |           | 
##              |     0.276 |     0.122 |           | 
## -------------|-----------|-----------|-----------|
## Column Total |        58 |        40 |        98 | 
##              |     0.592 |     0.408 |           | 
## -------------|-----------|-----------|-----------|
## 
##  
## Statistics for All Table Factors
## 
## 
## Pearson's Chi-squared test 
## ------------------------------------------------------------
## Chi^2 =  2.706973     d.f. =  1     p =  0.09991041 
## 
## Pearson's Chi-squared test with Yates' continuity correction 
## ------------------------------------------------------------
## Chi^2 =  2.060208     d.f. =  1     p =  0.1511895 
## 
##  
## Fisher's Exact Test for Count Data
## ------------------------------------------------------------
## Sample estimate odds ratio:  0.4956384 
## 
## Alternative hypothesis: true odds ratio is not equal to 1
## p =  0.1414335 
## 95% confidence interval:  0.1902676 1.241567 
## 
## Alternative hypothesis: true odds ratio is less than 1
## p =  0.07496135 
## 95% confidence interval:  0 1.089139 
## 
## Alternative hypothesis: true odds ratio is greater than 1
## p =  0.969051 
## 95% confidence interval:  0.21965 Inf 
## 
## 
## 
CrossTable(duy$TBMMN,duy$AKI,chisq = TRUE, fisher = TRUE)
## Warning in chisq.test(t, correct = TRUE, ...): Chi-squared approximation may be
## incorrect

## Warning in chisq.test(t, correct = TRUE, ...): Chi-squared approximation may be
## incorrect
## 
##  
##    Cell Contents
## |-------------------------|
## |                       N |
## | Chi-square contribution |
## |           N / Row Total |
## |           N / Col Total |
## |         N / Table Total |
## |-------------------------|
## 
##  
## Total Observations in Table:  98 
## 
##  
##              | duy$AKI 
##    duy$TBMMN |        có |     không | Row Total | 
## -------------|-----------|-----------|-----------|
##           có |         6 |         3 |         9 | 
##              |     0.085 |     0.123 |           | 
##              |     0.667 |     0.333 |     0.092 | 
##              |     0.103 |     0.075 |           | 
##              |     0.061 |     0.031 |           | 
## -------------|-----------|-----------|-----------|
##        không |        52 |        37 |        89 | 
##              |     0.009 |     0.012 |           | 
##              |     0.584 |     0.416 |     0.908 | 
##              |     0.897 |     0.925 |           | 
##              |     0.531 |     0.378 |           | 
## -------------|-----------|-----------|-----------|
## Column Total |        58 |        40 |        98 | 
##              |     0.592 |     0.408 |           | 
## -------------|-----------|-----------|-----------|
## 
##  
## Statistics for All Table Factors
## 
## 
## Pearson's Chi-squared test 
## ------------------------------------------------------------
## Chi^2 =  0.2297172     d.f. =  1     p =  0.6317336 
## 
## Pearson's Chi-squared test with Yates' continuity correction 
## ------------------------------------------------------------
## Chi^2 =  0.01524065     d.f. =  1     p =  0.9017484 
## 
##  
## Fisher's Exact Test for Count Data
## ------------------------------------------------------------
## Sample estimate odds ratio:  1.418121 
## 
## Alternative hypothesis: true odds ratio is not equal to 1
## p =  0.7338953 
## 95% confidence interval:  0.2809809 9.320766 
## 
## Alternative hypothesis: true odds ratio is less than 1
## p =  0.7954796 
## 95% confidence interval:  0 6.934425 
## 
## Alternative hypothesis: true odds ratio is greater than 1
## p =  0.4586385 
## 95% confidence interval:  0.3493498 Inf 
## 
## 
## 
#Các nguồn nhiễm
library(gmodels)
CrossTable(duy$hohap,duy$AKI,chisq = TRUE, fisher = TRUE)
## 
##  
##    Cell Contents
## |-------------------------|
## |                       N |
## | Chi-square contribution |
## |           N / Row Total |
## |           N / Col Total |
## |         N / Table Total |
## |-------------------------|
## 
##  
## Total Observations in Table:  98 
## 
##  
##              | duy$AKI 
##    duy$hohap |        có |     không | Row Total | 
## -------------|-----------|-----------|-----------|
##            0 |        32 |        19 |        51 | 
##              |     0.109 |     0.158 |           | 
##              |     0.627 |     0.373 |     0.520 | 
##              |     0.552 |     0.475 |           | 
##              |     0.327 |     0.194 |           | 
## -------------|-----------|-----------|-----------|
##            1 |        26 |        21 |        47 | 
##              |     0.119 |     0.172 |           | 
##              |     0.553 |     0.447 |     0.480 | 
##              |     0.448 |     0.525 |           | 
##              |     0.265 |     0.214 |           | 
## -------------|-----------|-----------|-----------|
## Column Total |        58 |        40 |        98 | 
##              |     0.592 |     0.408 |           | 
## -------------|-----------|-----------|-----------|
## 
##  
## Statistics for All Table Factors
## 
## 
## Pearson's Chi-squared test 
## ------------------------------------------------------------
## Chi^2 =  0.5583546     d.f. =  1     p =  0.454924 
## 
## Pearson's Chi-squared test with Yates' continuity correction 
## ------------------------------------------------------------
## Chi^2 =  0.2932577     d.f. =  1     p =  0.5881404 
## 
##  
## Fisher's Exact Test for Count Data
## ------------------------------------------------------------
## Sample estimate odds ratio:  1.356018 
## 
## Alternative hypothesis: true odds ratio is not equal to 1
## p =  0.5385597 
## 95% confidence interval:  0.5615412 3.300086 
## 
## Alternative hypothesis: true odds ratio is less than 1
## p =  0.829662 
## 95% confidence interval:  0 2.894816 
## 
## Alternative hypothesis: true odds ratio is greater than 1
## p =  0.2940841 
## 95% confidence interval:  0.6385821 Inf 
## 
## 
## 
CrossTable(duy$da,duy$AKI,chisq = TRUE, fisher = TRUE)
## 
##  
##    Cell Contents
## |-------------------------|
## |                       N |
## | Chi-square contribution |
## |           N / Row Total |
## |           N / Col Total |
## |         N / Table Total |
## |-------------------------|
## 
##  
## Total Observations in Table:  98 
## 
##  
##              | duy$AKI 
##       duy$da |        có |     không | Row Total | 
## -------------|-----------|-----------|-----------|
##            0 |        39 |        27 |        66 | 
##              |     0.000 |     0.000 |           | 
##              |     0.591 |     0.409 |     0.673 | 
##              |     0.672 |     0.675 |           | 
##              |     0.398 |     0.276 |           | 
## -------------|-----------|-----------|-----------|
##            1 |        19 |        13 |        32 | 
##              |     0.000 |     0.000 |           | 
##              |     0.594 |     0.406 |     0.327 | 
##              |     0.328 |     0.325 |           | 
##              |     0.194 |     0.133 |           | 
## -------------|-----------|-----------|-----------|
## Column Total |        58 |        40 |        98 | 
##              |     0.592 |     0.408 |           | 
## -------------|-----------|-----------|-----------|
## 
##  
## Statistics for All Table Factors
## 
## 
## Pearson's Chi-squared test 
## ------------------------------------------------------------
## Chi^2 =  0.0007200235     d.f. =  1     p =  0.9785927 
## 
## Pearson's Chi-squared test with Yates' continuity correction 
## ------------------------------------------------------------
## Chi^2 =  0     d.f. =  1     p =  1 
## 
##  
## Fisher's Exact Test for Count Data
## ------------------------------------------------------------
## Sample estimate odds ratio:  0.9884216 
## 
## Alternative hypothesis: true odds ratio is not equal to 1
## p =  1 
## 95% confidence interval:  0.3793222 2.529436 
## 
## Alternative hypothesis: true odds ratio is less than 1
## p =  0.5779249 
## 95% confidence interval:  0 2.208011 
## 
## Alternative hypothesis: true odds ratio is greater than 1
## p =  0.5952764 
## 95% confidence interval:  0.4370941 Inf 
## 
## 
## 
CrossTable(duy$tietnieu,duy$AKI,chisq = TRUE, fisher = TRUE)
## Warning in chisq.test(t, correct = TRUE, ...): Chi-squared approximation may be
## incorrect

## Warning in chisq.test(t, correct = TRUE, ...): Chi-squared approximation may be
## incorrect
## 
##  
##    Cell Contents
## |-------------------------|
## |                       N |
## | Chi-square contribution |
## |           N / Row Total |
## |           N / Col Total |
## |         N / Table Total |
## |-------------------------|
## 
##  
## Total Observations in Table:  98 
## 
##  
##              | duy$AKI 
## duy$tietnieu |        có |     không | Row Total | 
## -------------|-----------|-----------|-----------|
##            0 |        53 |        38 |        91 | 
##              |     0.014 |     0.020 |           | 
##              |     0.582 |     0.418 |     0.929 | 
##              |     0.914 |     0.950 |           | 
##              |     0.541 |     0.388 |           | 
## -------------|-----------|-----------|-----------|
##            1 |         5 |         2 |         7 | 
##              |     0.177 |     0.257 |           | 
##              |     0.714 |     0.286 |     0.071 | 
##              |     0.086 |     0.050 |           | 
##              |     0.051 |     0.020 |           | 
## -------------|-----------|-----------|-----------|
## Column Total |        58 |        40 |        98 | 
##              |     0.592 |     0.408 |           | 
## -------------|-----------|-----------|-----------|
## 
##  
## Statistics for All Table Factors
## 
## 
## Pearson's Chi-squared test 
## ------------------------------------------------------------
## Chi^2 =  0.4679045     d.f. =  1     p =  0.4939528 
## 
## Pearson's Chi-squared test with Yates' continuity correction 
## ------------------------------------------------------------
## Chi^2 =  0.08123342     d.f. =  1     p =  0.7756328 
## 
##  
## Fisher's Exact Test for Count Data
## ------------------------------------------------------------
## Sample estimate odds ratio:  0.5610265 
## 
## Alternative hypothesis: true odds ratio is not equal to 1
## p =  0.6970029 
## 95% confidence interval:  0.0508942 3.651649 
## 
## Alternative hypothesis: true odds ratio is less than 1
## p =  0.3971068 
## 95% confidence interval:  0 2.865055 
## 
## Alternative hypothesis: true odds ratio is greater than 1
## p =  0.8612382 
## 95% confidence interval:  0.07547361 Inf 
## 
## 
## 
CrossTable(duy$tieuhoa,duy$AKI,chisq = TRUE, fisher = TRUE)
## Warning in chisq.test(t, correct = TRUE, ...): Chi-squared approximation may be
## incorrect

## Warning in chisq.test(t, correct = TRUE, ...): Chi-squared approximation may be
## incorrect
## 
##  
##    Cell Contents
## |-------------------------|
## |                       N |
## | Chi-square contribution |
## |           N / Row Total |
## |           N / Col Total |
## |         N / Table Total |
## |-------------------------|
## 
##  
## Total Observations in Table:  98 
## 
##  
##              | duy$AKI 
##  duy$tieuhoa |        có |     không | Row Total | 
## -------------|-----------|-----------|-----------|
##            0 |        50 |        39 |        89 | 
##              |     0.136 |     0.197 |           | 
##              |     0.562 |     0.438 |     0.908 | 
##              |     0.862 |     0.975 |           | 
##              |     0.510 |     0.398 |           | 
## -------------|-----------|-----------|-----------|
##            1 |         8 |         1 |         9 | 
##              |     1.342 |     1.946 |           | 
##              |     0.889 |     0.111 |     0.092 | 
##              |     0.138 |     0.025 |           | 
##              |     0.082 |     0.010 |           | 
## -------------|-----------|-----------|-----------|
## Column Total |        58 |        40 |        98 | 
##              |     0.592 |     0.408 |           | 
## -------------|-----------|-----------|-----------|
## 
##  
## Statistics for All Table Factors
## 
## 
## Pearson's Chi-squared test 
## ------------------------------------------------------------
## Chi^2 =  3.619997     d.f. =  1     p =  0.05708899 
## 
## Pearson's Chi-squared test with Yates' continuity correction 
## ------------------------------------------------------------
## Chi^2 =  2.392571     d.f. =  1     p =  0.121913 
## 
##  
## Fisher's Exact Test for Count Data
## ------------------------------------------------------------
## Sample estimate odds ratio:  0.1625626 
## 
## Alternative hypothesis: true odds ratio is not equal to 1
## p =  0.07808048 
## 95% confidence interval:  0.003527695 1.29919 
## 
## Alternative hypothesis: true odds ratio is less than 1
## p =  0.05548881 
## 95% confidence interval:  0 1.037456 
## 
## Alternative hypothesis: true odds ratio is greater than 1
## p =  0.9932331 
## 95% confidence interval:  0.007128841 Inf 
## 
## 
## 
CrossTable(duy$khac,duy$AKI,chisq = TRUE, fisher = TRUE)
## Warning in chisq.test(t, correct = TRUE, ...): Chi-squared approximation may be
## incorrect

## Warning in chisq.test(t, correct = TRUE, ...): Chi-squared approximation may be
## incorrect
## 
##  
##    Cell Contents
## |-------------------------|
## |                       N |
## | Chi-square contribution |
## |           N / Row Total |
## |           N / Col Total |
## |         N / Table Total |
## |-------------------------|
## 
##  
## Total Observations in Table:  98 
## 
##  
##              | duy$AKI 
##     duy$khac |        có |     không | Row Total | 
## -------------|-----------|-----------|-----------|
##            0 |        58 |        37 |        95 | 
##              |     0.056 |     0.081 |           | 
##              |     0.611 |     0.389 |     0.969 | 
##              |     1.000 |     0.925 |           | 
##              |     0.592 |     0.378 |           | 
## -------------|-----------|-----------|-----------|
##            1 |         0 |         3 |         3 | 
##              |     1.776 |     2.574 |           | 
##              |     0.000 |     1.000 |     0.031 | 
##              |     0.000 |     0.075 |           | 
##              |     0.000 |     0.031 |           | 
## -------------|-----------|-----------|-----------|
## Column Total |        58 |        40 |        98 | 
##              |     0.592 |     0.408 |           | 
## -------------|-----------|-----------|-----------|
## 
##  
## Statistics for All Table Factors
## 
## 
## Pearson's Chi-squared test 
## ------------------------------------------------------------
## Chi^2 =  4.487368     d.f. =  1     p =  0.0341462 
## 
## Pearson's Chi-squared test with Yates' continuity correction 
## ------------------------------------------------------------
## Chi^2 =  2.315865     d.f. =  1     p =  0.12806 
## 
##  
## Fisher's Exact Test for Count Data
## ------------------------------------------------------------
## Sample estimate odds ratio:  Inf 
## 
## Alternative hypothesis: true odds ratio is not equal to 1
## p =  0.06495897 
## 95% confidence interval:  0.6118161 Inf 
## 
## Alternative hypothesis: true odds ratio is less than 1
## p =  1 
## 95% confidence interval:  0 Inf 
## 
## Alternative hypothesis: true odds ratio is greater than 1
## p =  0.06495897 
## 95% confidence interval:  0.8664763 Inf 
## 
## 
## 

3.1.5.4 Thời gian điều trị tại khoa

shapiro.test(duy$Day)
## 
##  Shapiro-Wilk normality test
## 
## data:  duy$Day
## W = 0.96628, p-value = 0.01283
Day.chung = duy %>%
  group_by(AKI) %>%
  summarise(
    min = min(Day),
    max = max(Day),
    median = median(Day),
    mean = mean(Day),
    q1 = quantile(Day, 0.25),
    q3 = quantile(Day,0.75),
    sd = sd(Day)
  )
wilcox.test(duy$Day~duy$AKI)
## 
##  Wilcoxon rank sum test with continuity correction
## 
## data:  duy$Day by duy$AKI
## W = 1628, p-value = 0.0007108
## alternative hypothesis: true location shift is not equal to 0
# Biểu đồ so sánh thời gian điều trị giữa 2 nhóm AKI và non AKI
duy %>%
  ggplot(aes(x = AKI,y= Day)) +
  geom_boxplot(position = "dodge2",fill='#FF9078',width=0.5,lwd=1) +
  labs(y="Số ngày điều trị",fill="Tổn thương thận cấp")+
  theme(axis.title.x=element_blank())

### 3.1.5.5 Kết cục điều trị

library(gmodels)
CrossTable(duy$Ketcuc,duy$AKI,chisq = TRUE, fisher = TRUE)
## 
##  
##    Cell Contents
## |-------------------------|
## |                       N |
## | Chi-square contribution |
## |           N / Row Total |
## |           N / Col Total |
## |         N / Table Total |
## |-------------------------|
## 
##  
## Total Observations in Table:  98 
## 
##  
##              | duy$AKI 
##   duy$Ketcuc |        có |     không | Row Total | 
## -------------|-----------|-----------|-----------|
##       chuyen |        28 |        31 |        59 | 
##              |     1.371 |     1.988 |           | 
##              |     0.475 |     0.525 |     0.602 | 
##              |     0.483 |     0.775 |           | 
##              |     0.286 |     0.316 |           | 
## -------------|-----------|-----------|-----------|
##           tv |        30 |         9 |        39 | 
##              |     2.074 |     3.007 |           | 
##              |     0.769 |     0.231 |     0.398 | 
##              |     0.517 |     0.225 |           | 
##              |     0.306 |     0.092 |           | 
## -------------|-----------|-----------|-----------|
## Column Total |        58 |        40 |        98 | 
##              |     0.592 |     0.408 |           | 
## -------------|-----------|-----------|-----------|
## 
##  
## Statistics for All Table Factors
## 
## 
## Pearson's Chi-squared test 
## ------------------------------------------------------------
## Chi^2 =  8.438803     d.f. =  1     p =  0.003672979 
## 
## Pearson's Chi-squared test with Yates' continuity correction 
## ------------------------------------------------------------
## Chi^2 =  7.263112     d.f. =  1     p =  0.007038521 
## 
##  
## Fisher's Exact Test for Count Data
## ------------------------------------------------------------
## Sample estimate odds ratio:  0.2746901 
## 
## Alternative hypothesis: true odds ratio is not equal to 1
## p =  0.005975874 
## 95% confidence interval:  0.0969499 0.7209894 
## 
## Alternative hypothesis: true odds ratio is less than 1
## p =  0.003137565 
## 95% confidence interval:  0 0.6302738 
## 
## Alternative hypothesis: true odds ratio is greater than 1
## p =  0.9992473 
## 95% confidence interval:  0.1136566 Inf 
## 
## 
## 

3.2. Các yếu tố nguy cơ AKI (phân tích trên nhóm 81BN)

3.2.1. Phân tích hồi quy đơn biến

Đọc bảng nhóm 1 riêng vào

library(readxl)
nhom1.rieng = readxl::read_excel("D:/Nhóm 1 riêng.xlsx")
head(nhom1.rieng)
## # A tibble: 6 × 53
##     STT  `Mã BA` SVV   Họ tê…¹  Year   Age Sex   Sexma…²    BC    TC   Neu   Lym
##   <dbl>    <dbl> <chr> <chr>   <dbl> <dbl> <chr>   <dbl> <dbl> <dbl> <dbl> <dbl>
## 1     1 22715165 0120… Hoàng …  1956    66 Nam         0 10.2    173  8.24  1.16
## 2     2 22702835 0124… Nguyễn…  1938    84 Nam         0 14.9    390 12.9   0.42
## 3     3 22713749 0123… Nguyễn…  1932    90 Nữ          1 13.8    426 12.3   0.46
## 4     4 14104427 0151… Phạm M…  1942    80 Nam         0 21.6    219 19.6   0.47
## 5     5 11711109 0142… Quách …  1958    64 Nam         0  4.82   281  3.84  0.48
## 6     6 13766348 0139… Vũ Đìn…  1956    66 Nam         0 11.9    410  9.72  0.59
## # … with 41 more variables: NLR <dbl>, Crenen <dbl>, Cremax <dbl>,
## #   `CreNen/Max` <dbl>, AKI <chr>, AKImahoa <dbl>, GD <chr>, Day <dbl>,
## #   History <chr>, THA <chr>, THAma <dbl>, ST <chr>, STma <dbl>, BMV <chr>,
## #   BMVma <dbl>, COPD <chr>, COPDma <dbl>, ĐTĐ <chr>, DTDma <dbl>, TBMMN <chr>,
## #   TBMMNma <dbl>, GCS <dbl>, Pulse <dbl>, `P/F` <dbl>, T <dbl>, HATB <dbl>,
## #   APACHEII <dbl>, SOFA <dbl>, Ventilation <chr>, Ventilationma <dbl>,
## #   Vasopressor <chr>, Vasopressorma <dbl>, Albumin <dbl>, CRP <dbl>, …
## # ℹ Use `colnames()` to see all variable names

Hồi quy logistic đơn biến của NLR

library(epiDisplay)
## Loading required package: foreign
## Loading required package: survival
## Loading required package: MASS
## 
## Attaching package: 'MASS'
## The following object is masked from 'package:dplyr':
## 
##     select
## Loading required package: nnet
## 
## Attaching package: 'epiDisplay'
## The following object is masked from 'package:gmodels':
## 
##     ci
## The following object is masked from 'package:scales':
## 
##     alpha
## The following object is masked from 'package:ggplot2':
## 
##     alpha
## The following objects are masked from 'package:psych':
## 
##     alpha, cs, lookup
attach(nhom1.rieng)
## The following objects are masked _by_ .GlobalEnv:
## 
##     AKI, Sex
## The following objects are masked from duy (pos = 8):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 10):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from No.AKI:
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate, Lym,
##     Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source
##     culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from Only.AKI:
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate, Lym,
##     Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source
##     culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 19):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following object is masked from package:base:
## 
##     T
logistic.NLR=glm(AKImahoa~NLR,family=binomial)
logistic.display(logistic.NLR)
## 
## Logistic regression predicting AKImahoa 
##  
##                  OR(95%CI)         P(Wald's test) P(LR-test)
## NLR (cont. var.) 1.13 (1.06,1.19)  < 0.001        < 0.001   
##                                                             
## Log-likelihood = -43.1522
## No. of observations = 81
## AIC value = 90.3044

Hồi quy logistic đơn biến của Lym

library(epiDisplay)
attach(nhom1.rieng)
## The following objects are masked _by_ .GlobalEnv:
## 
##     AKI, Sex
## The following objects are masked from nhom1.rieng (pos = 3):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 9):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 11):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from No.AKI:
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate, Lym,
##     Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source
##     culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from Only.AKI:
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate, Lym,
##     Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source
##     culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 20):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following object is masked from package:base:
## 
##     T
logistic.Lym=glm(AKImahoa~Lym,family=binomial)
logistic.display(logistic.Lym)
## 
## Logistic regression predicting AKImahoa 
##  
##                  OR(95%CI)        P(Wald's test) P(LR-test)
## Lym (cont. var.) 0.3 (0.15,0.59)  < 0.001        < 0.001   
##                                                            
## Log-likelihood = -47.6915
## No. of observations = 81
## AIC value = 99.383

Hồi quy logistic đơn biến của Neu

library(epiDisplay)
attach(nhom1.rieng)
## The following objects are masked _by_ .GlobalEnv:
## 
##     AKI, Sex
## The following objects are masked from nhom1.rieng (pos = 3):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 4):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 10):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 12):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from No.AKI:
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate, Lym,
##     Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source
##     culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from Only.AKI:
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate, Lym,
##     Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source
##     culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 21):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following object is masked from package:base:
## 
##     T
logistic.Neu=glm(AKImahoa~Neu,family=binomial)
logistic.display(logistic.Neu)
## 
## Logistic regression predicting AKImahoa 
##  
##                  OR(95%CI)         P(Wald's test) P(LR-test)
## Neu (cont. var.) 1.06 (0.99,1.13)  0.096          0.084     
##                                                             
## Log-likelihood = -54.6471
## No. of observations = 81
## AIC value = 113.2943

Hồi quy logistic đơn biến của BC

library(epiDisplay)
attach(nhom1.rieng)
## The following objects are masked _by_ .GlobalEnv:
## 
##     AKI, Sex
## The following objects are masked from nhom1.rieng (pos = 3):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 4):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 5):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 11):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 13):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from No.AKI:
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate, Lym,
##     Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source
##     culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from Only.AKI:
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate, Lym,
##     Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source
##     culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 22):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following object is masked from package:base:
## 
##     T
logistic.BC=glm(AKImahoa~BC,family=binomial)
logistic.display(logistic.BC)
## 
## Logistic regression predicting AKImahoa 
##  
##                 OR(95%CI)         P(Wald's test) P(LR-test)
## BC (cont. var.) 1.03 (0.98,1.09)  0.283          0.276     
##                                                            
## Log-likelihood = -55.5453
## No. of observations = 81
## AIC value = 115.0906

Hồi quy logistic đơn biến của TC

library(epiDisplay)
attach(nhom1.rieng)
## The following objects are masked _by_ .GlobalEnv:
## 
##     AKI, Sex
## The following objects are masked from nhom1.rieng (pos = 3):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 4):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 5):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 6):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 12):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 14):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from No.AKI:
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate, Lym,
##     Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source
##     culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from Only.AKI:
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate, Lym,
##     Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source
##     culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 23):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following object is masked from package:base:
## 
##     T
logistic.TC=glm(AKImahoa~TC,family=binomial)
logistic.display(logistic.TC)
## 
## Logistic regression predicting AKImahoa 
##  
##                 OR(95%CI)               P(Wald's test) P(LR-test)
## TC (cont. var.) 0.9904 (0.9855,0.9954)  < 0.001        < 0.001   
##                                                                  
## Log-likelihood = -46.2524
## No. of observations = 81
## AIC value = 96.5048

Hồi quy logistic đơn biến của CRP

library(epiDisplay)
attach(nhom1.rieng)
## The following objects are masked _by_ .GlobalEnv:
## 
##     AKI, Sex
## The following objects are masked from nhom1.rieng (pos = 3):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 4):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 5):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 6):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 7):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 13):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 15):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from No.AKI:
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate, Lym,
##     Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source
##     culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from Only.AKI:
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate, Lym,
##     Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source
##     culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 24):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following object is masked from package:base:
## 
##     T
logistic.CRP=glm(AKImahoa~CRP,family=binomial)
logistic.display(logistic.CRP)
## 
## Logistic regression predicting AKImahoa 
##  
##                  OR(95%CI)               P(Wald's test) P(LR-test)
## CRP (cont. var.) 1.0025 (0.9989,1.0062)  0.174          0.166     
##                                                                   
## Log-likelihood = -55.1795
## No. of observations = 81
## AIC value = 114.359

Hồi quy logistic đơn biến của Albumin

library(epiDisplay)
attach(nhom1.rieng)
## The following objects are masked _by_ .GlobalEnv:
## 
##     AKI, Sex
## The following objects are masked from nhom1.rieng (pos = 3):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 4):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 5):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 6):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 7):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 8):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 14):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 16):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from No.AKI:
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate, Lym,
##     Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source
##     culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from Only.AKI:
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate, Lym,
##     Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source
##     culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 25):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following object is masked from package:base:
## 
##     T
logistic.Albumin=glm(AKImahoa~Albumin,family=binomial)
logistic.display(logistic.Albumin)
## 
## Logistic regression predicting AKImahoa 
##  
##                      OR(95%CI)         P(Wald's test) P(LR-test)
## Albumin (cont. var.) 0.95 (0.88,1.02)  0.152          0.145     
##                                                                 
## Log-likelihood = -55.0756
## No. of observations = 81
## AIC value = 114.1513

Hồi quy logistic đơn biến của SOFA

library(epiDisplay)
attach(nhom1.rieng)
## The following objects are masked _by_ .GlobalEnv:
## 
##     AKI, Sex
## The following objects are masked from nhom1.rieng (pos = 3):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 4):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 5):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 6):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 7):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 8):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 9):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 15):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 17):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from No.AKI:
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate, Lym,
##     Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source
##     culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from Only.AKI:
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate, Lym,
##     Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source
##     culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 26):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following object is masked from package:base:
## 
##     T
logistic.SOFA=glm(AKImahoa~SOFA,family=binomial)
logistic.display(logistic.SOFA)
## 
## Logistic regression predicting AKImahoa 
##  
##                   OR(95%CI)         P(Wald's test) P(LR-test)
## SOFA (cont. var.) 1.48 (1.19,1.83)  < 0.001        < 0.001   
##                                                              
## Log-likelihood = -47.0305
## No. of observations = 81
## AIC value = 98.061

Hồi quy logistic đơn biến của APACHE

library(epiDisplay)
attach(nhom1.rieng)
## The following objects are masked _by_ .GlobalEnv:
## 
##     AKI, Sex
## The following objects are masked from nhom1.rieng (pos = 3):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 4):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 5):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 6):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 7):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 8):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 9):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 10):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 16):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 18):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from No.AKI:
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate, Lym,
##     Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source
##     culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from Only.AKI:
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate, Lym,
##     Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source
##     culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 27):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following object is masked from package:base:
## 
##     T
logistic.APACHE=glm(AKImahoa~APACHEII,family=binomial)
logistic.display(logistic.APACHE)
## 
## Logistic regression predicting AKImahoa 
##  
##                       OR(95%CI)         P(Wald's test) P(LR-test)
## APACHEII (cont. var.) 1.28 (1.15,1.43)  < 0.001        < 0.001   
##                                                                  
## Log-likelihood = -40.4111
## No. of observations = 81
## AIC value = 84.8222

Hồi quy logistic đơn biến của Tuổi

library(epiDisplay)
attach(nhom1.rieng)
## The following objects are masked _by_ .GlobalEnv:
## 
##     AKI, Sex
## The following objects are masked from nhom1.rieng (pos = 3):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 4):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 5):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 6):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 7):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 8):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 9):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 10):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 11):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 17):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 19):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from No.AKI:
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate, Lym,
##     Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source
##     culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from Only.AKI:
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate, Lym,
##     Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source
##     culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 28):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following object is masked from package:base:
## 
##     T
logistic.Age=glm(AKImahoa~Age,family=binomial)
logistic.display(logistic.Age)
## 
## Logistic regression predicting AKImahoa 
##  
##                  OR(95%CI)      P(Wald's test) P(LR-test)
## Age (cont. var.) 1.03 (1,1.07)  0.088          0.08      
##                                                          
## Log-likelihood = -54.6021
## No. of observations = 81
## AIC value = 113.2042

Hồi quy logistic đơn biến của HATB

library(epiDisplay)
attach(nhom1.rieng)
## The following objects are masked _by_ .GlobalEnv:
## 
##     AKI, Sex
## The following objects are masked from nhom1.rieng (pos = 3):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 4):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 5):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 6):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 7):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 8):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 9):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 10):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 11):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 12):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 18):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 20):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from No.AKI:
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate, Lym,
##     Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source
##     culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from Only.AKI:
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate, Lym,
##     Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source
##     culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 29):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following object is masked from package:base:
## 
##     T
logistic.HATB=glm(AKImahoa~HATB,family=binomial)
logistic.display(logistic.HATB)
## 
## Logistic regression predicting AKImahoa 
##  
##                   OR(95%CI)         P(Wald's test) P(LR-test)
## HATB (cont. var.) 0.99 (0.97,1.01)  0.335          0.331     
##                                                              
## Log-likelihood = -55.6672
## No. of observations = 81
## AIC value = 115.3344

Hồi quy logistic đơn biến của Giới

library(epiDisplay)
attach(nhom1.rieng)
## The following objects are masked _by_ .GlobalEnv:
## 
##     AKI, Sex
## The following objects are masked from nhom1.rieng (pos = 3):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 4):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 5):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 6):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 7):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 8):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 9):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 10):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 11):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 12):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 13):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 19):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 21):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from No.AKI:
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate, Lym,
##     Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source
##     culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from Only.AKI:
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate, Lym,
##     Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source
##     culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 30):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following object is masked from package:base:
## 
##     T
logistic.Sex=glm(AKImahoa~Sexmahoa,family=binomial)
logistic.display(logistic.Sex)
## 
## Logistic regression predicting AKImahoa 
##  
##                   OR(95%CI)         P(Wald's test) P(LR-test)
## Sexmahoa: 1 vs 0  1.16 (0.48,2.77)  0.745          0.745     
##                                                              
## Log-likelihood = -56.0859
## No. of observations = 81
## AIC value = 116.1719

Hồi quy logistic đơn biến của bệnh nền THA

library(epiDisplay)
attach(nhom1.rieng)
## The following objects are masked _by_ .GlobalEnv:
## 
##     AKI, Sex
## The following objects are masked from nhom1.rieng (pos = 3):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 4):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 5):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 6):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 7):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 8):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 9):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 10):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 11):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 12):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 13):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 14):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 20):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 22):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from No.AKI:
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate, Lym,
##     Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source
##     culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from Only.AKI:
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate, Lym,
##     Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source
##     culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 31):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following object is masked from package:base:
## 
##     T
logistic.THA=glm(AKImahoa~THAma,family=binomial)
logistic.display(logistic.THA)
## 
## Logistic regression predicting AKImahoa 
##  
##                OR(95%CI)         P(Wald's test) P(LR-test)
## THAma: 1 vs 0  1.44 (0.58,3.58)  0.437          0.436     
##                                                           
## Log-likelihood = -55.8355
## No. of observations = 81
## AIC value = 115.6709

Hồi quy logistic đơn biến của bệnh nền ST

library(epiDisplay)
attach(nhom1.rieng)
## The following objects are masked _by_ .GlobalEnv:
## 
##     AKI, Sex
## The following objects are masked from nhom1.rieng (pos = 3):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 4):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 5):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 6):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 7):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 8):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 9):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 10):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 11):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 12):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 13):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 14):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 15):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 21):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 23):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from No.AKI:
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate, Lym,
##     Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source
##     culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from Only.AKI:
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate, Lym,
##     Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source
##     culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 32):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following object is masked from package:base:
## 
##     T
logistic.ST=glm(AKImahoa~STma,family=binomial)
logistic.display(logistic.ST)
## 
## Logistic regression predicting AKImahoa 
##  
##               OR(95%CI)          P(Wald's test) P(LR-test)
## STma: 1 vs 0  4.22 (0.45,39.49)  0.207          0.161     
##                                                           
## Log-likelihood = -55.1549
## No. of observations = 81
## AIC value = 114.3098

Hồi quy logistic đơn biến của bệnh nền BMV

library(epiDisplay)
attach(nhom1.rieng)
## The following objects are masked _by_ .GlobalEnv:
## 
##     AKI, Sex
## The following objects are masked from nhom1.rieng (pos = 3):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 4):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 5):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 6):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 7):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 8):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 9):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 10):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 11):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 12):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 13):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 14):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 15):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 16):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 22):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 24):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from No.AKI:
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate, Lym,
##     Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source
##     culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from Only.AKI:
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate, Lym,
##     Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source
##     culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 33):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following object is masked from package:base:
## 
##     T
logistic.BMV=glm(AKImahoa~BMVma,family=binomial)
logistic.display(logistic.BMV)
## 
## Logistic regression predicting AKImahoa 
##  
##                OR(95%CI)         P(Wald's test) P(LR-test)
## BMVma: 1 vs 0  2.11 (0.49,9.11)  0.315          0.303     
##                                                           
## Log-likelihood = -55.6074
## No. of observations = 81
## AIC value = 115.2149

Hồi quy logistic đơn biến của bệnh nền COPD

library(epiDisplay)
attach(nhom1.rieng)
## The following objects are masked _by_ .GlobalEnv:
## 
##     AKI, Sex
## The following objects are masked from nhom1.rieng (pos = 3):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 4):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 5):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 6):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 7):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 8):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 9):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 10):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 11):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 12):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 13):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 14):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 15):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 16):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 17):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 23):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 25):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from No.AKI:
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate, Lym,
##     Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source
##     culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from Only.AKI:
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate, Lym,
##     Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source
##     culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 34):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following object is masked from package:base:
## 
##     T
logistic.COPD=glm(AKImahoa~COPDma,family=binomial)
logistic.display(logistic.COPD)
## 
## Logistic regression predicting AKImahoa 
##  
##                 OR(95%CI)          P(Wald's test) P(LR-test)
## COPDma: 1 vs 0  4.22 (0.45,39.49)  0.207          0.161     
##                                                             
## Log-likelihood = -55.1549
## No. of observations = 81
## AIC value = 114.3098

Hồi quy logistic đơn biến của bệnh nền ĐTĐ

library(epiDisplay)
attach(nhom1.rieng)
## The following objects are masked _by_ .GlobalEnv:
## 
##     AKI, Sex
## The following objects are masked from nhom1.rieng (pos = 3):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 4):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 5):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 6):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 7):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 8):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 9):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 10):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 11):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 12):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 13):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 14):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 15):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 16):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 17):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 18):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 24):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 26):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from No.AKI:
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate, Lym,
##     Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source
##     culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from Only.AKI:
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate, Lym,
##     Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source
##     culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 35):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following object is masked from package:base:
## 
##     T
logistic.DTD=glm(AKImahoa~DTDma,family=binomial)
logistic.display(logistic.DTD)
## 
## Logistic regression predicting AKImahoa 
##  
##                OR(95%CI)       P(Wald's test) P(LR-test)
## DTDma: 1 vs 0  0.5 (0.2,1.24)  0.133          0.129     
##                                                         
## Log-likelihood = -54.9869
## No. of observations = 81
## AIC value = 113.9737

Hồi quy logistic đơn biến của bệnh nền TBMMN

library(epiDisplay)
attach(nhom1.rieng)
## The following objects are masked _by_ .GlobalEnv:
## 
##     AKI, Sex
## The following objects are masked from nhom1.rieng (pos = 3):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 4):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 5):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 6):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 7):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 8):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 9):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 10):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 11):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 12):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 13):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 14):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 15):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 16):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 17):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 18):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 19):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 25):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 27):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from No.AKI:
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate, Lym,
##     Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source
##     culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from Only.AKI:
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate, Lym,
##     Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source
##     culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 36):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following object is masked from package:base:
## 
##     T
logistic.TBMMN=glm(AKImahoa~TBMMNma,family=binomial)
logistic.display(logistic.TBMMN)
## 
## Logistic regression predicting AKImahoa 
##  
##                  OR(95%CI)         P(Wald's test) P(LR-test)
## TBMMNma: 1 vs 0  2.11 (0.49,9.11)  0.315          0.303     
##                                                             
## Log-likelihood = -55.6074
## No. of observations = 81
## AIC value = 115.2149

Hồi quy logistic đơn biến của dùng vận mạch

library(epiDisplay)
attach(nhom1.rieng)
## The following objects are masked _by_ .GlobalEnv:
## 
##     AKI, Sex
## The following objects are masked from nhom1.rieng (pos = 3):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 4):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 5):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 6):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 7):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 8):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 9):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 10):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 11):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 12):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 13):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 14):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 15):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 16):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 17):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 18):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 19):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 20):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 26):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 28):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from No.AKI:
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate, Lym,
##     Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source
##     culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from Only.AKI:
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate, Lym,
##     Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source
##     culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 37):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following object is masked from package:base:
## 
##     T
logistic.Vasopressor=glm(AKImahoa~Vasopressorma,family=binomial)
logistic.display(logistic.Vasopressor)
## 
## Logistic regression predicting AKImahoa 
##  
##                        OR(95%CI)         P(Wald's test) P(LR-test)
## Vasopressorma: 1 vs 0  5.4 (1.87,15.61)  0.002          < 0.001   
##                                                                   
## Log-likelihood = -50.6174
## No. of observations = 81
## AIC value = 105.2348

3.2.1 Phân tích hồi quy đa biến

library(epiDisplay)
attach(nhom1.rieng)
## The following objects are masked _by_ .GlobalEnv:
## 
##     AKI, Sex
## The following objects are masked from nhom1.rieng (pos = 3):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 4):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 5):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 6):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 7):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 8):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 9):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 10):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 11):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 12):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 13):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 14):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 15):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 16):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 17):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 18):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 19):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 20):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 21):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 27):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 29):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from No.AKI:
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate, Lym,
##     Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source
##     culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from Only.AKI:
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate, Lym,
##     Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source
##     culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 38):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following object is masked from package:base:
## 
##     T
logistic.da.bien=glm(AKImahoa~Vasopressorma+SOFA+APACHEII+TC+Lym+NLR,family=binomial)
logistic.display(logistic.da.bien)
## 
## Logistic regression predicting AKImahoa 
##  
##                        crude OR(95%CI)         adj. OR(95%CI)         
## Vasopressorma: 1 vs 0  5.4 (1.87,15.61)        0.64 (0.05,7.54)       
##                                                                       
## SOFA (cont. var.)      1.48 (1.19,1.83)        1.14 (0.73,1.79)       
##                                                                       
## APACHEII (cont. var.)  1.28 (1.15,1.43)        1.19 (1.03,1.37)       
##                                                                       
## TC (cont. var.)        0.9904 (0.9855,0.9954)  0.9917 (0.9842,0.9993) 
##                                                                       
## Lym (cont. var.)       0.3 (0.15,0.59)         1.37 (0.45,4.2)        
##                                                                       
## NLR (cont. var.)       1.13 (1.06,1.19)        1.18 (1.03,1.34)       
##                                                                       
##                        P(Wald's test) P(LR-test)
## Vasopressorma: 1 vs 0  0.72           0.718     
##                                                 
## SOFA (cont. var.)      0.558          0.559     
##                                                 
## APACHEII (cont. var.)  0.019          0.011     
##                                                 
## TC (cont. var.)        0.031          0.018     
##                                                 
## Lym (cont. var.)       0.583          0.587     
##                                                 
## NLR (cont. var.)       0.014          0.004     
##                                                 
## Log-likelihood = -29.1563
## No. of observations = 81
## AIC value = 72.3126

3.2.2. Đường cong ROC, độ nhạy, đặc hiệu, giá trị tiên đoán

Đường cong ROC của NLR

library(readxl)
nhom1.rieng = readxl::read_excel("D:/Nhóm 1 riêng.xlsx")
head(nhom1.rieng)
## # A tibble: 6 × 53
##     STT  `Mã BA` SVV   Họ tê…¹  Year   Age Sex   Sexma…²    BC    TC   Neu   Lym
##   <dbl>    <dbl> <chr> <chr>   <dbl> <dbl> <chr>   <dbl> <dbl> <dbl> <dbl> <dbl>
## 1     1 22715165 0120… Hoàng …  1956    66 Nam         0 10.2    173  8.24  1.16
## 2     2 22702835 0124… Nguyễn…  1938    84 Nam         0 14.9    390 12.9   0.42
## 3     3 22713749 0123… Nguyễn…  1932    90 Nữ          1 13.8    426 12.3   0.46
## 4     4 14104427 0151… Phạm M…  1942    80 Nam         0 21.6    219 19.6   0.47
## 5     5 11711109 0142… Quách …  1958    64 Nam         0  4.82   281  3.84  0.48
## 6     6 13766348 0139… Vũ Đìn…  1956    66 Nam         0 11.9    410  9.72  0.59
## # … with 41 more variables: NLR <dbl>, Crenen <dbl>, Cremax <dbl>,
## #   `CreNen/Max` <dbl>, AKI <chr>, AKImahoa <dbl>, GD <chr>, Day <dbl>,
## #   History <chr>, THA <chr>, THAma <dbl>, ST <chr>, STma <dbl>, BMV <chr>,
## #   BMVma <dbl>, COPD <chr>, COPDma <dbl>, ĐTĐ <chr>, DTDma <dbl>, TBMMN <chr>,
## #   TBMMNma <dbl>, GCS <dbl>, Pulse <dbl>, `P/F` <dbl>, T <dbl>, HATB <dbl>,
## #   APACHEII <dbl>, SOFA <dbl>, Ventilation <chr>, Ventilationma <dbl>,
## #   Vasopressor <chr>, Vasopressorma <dbl>, Albumin <dbl>, CRP <dbl>, …
## # ℹ Use `colnames()` to see all variable names
attach(nhom1.rieng)
## The following objects are masked _by_ .GlobalEnv:
## 
##     AKI, Sex
## The following objects are masked from nhom1.rieng (pos = 3):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 4):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 5):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 6):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 7):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 8):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 9):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 10):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 11):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 12):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 13):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 14):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 15):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 16):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 17):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 18):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 19):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 20):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 21):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 22):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 28):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 30):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from No.AKI:
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate, Lym,
##     Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source
##     culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from Only.AKI:
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate, Lym,
##     Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source
##     culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 39):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following object is masked from package:base:
## 
##     T
levels(AKImahoa)
## NULL
model.NLR.nhom1.rieng=glm(AKImahoa~NLR,family=binomial)
pred.NLR.nhom1.rieng=predict(model.NLR.nhom1.rieng,type='response')
library(pROC)
## Type 'citation("pROC")' for a citation.
## 
## Attaching package: 'pROC'
## The following object is masked from 'package:epiDisplay':
## 
##     ci
## The following object is masked from 'package:gmodels':
## 
##     ci
## The following objects are masked from 'package:stats':
## 
##     cov, smooth, var
r1=roc(AKImahoa,pred.NLR.nhom1.rieng,grid = TRUE, lagacy.axes = TRUE)
## Setting levels: control = 0, case = 1
## Setting direction: controls < cases
par(pty="s")
auc(r1);ci(r1);plot.roc(r1)
## Area under the curve: 0.8268
## 95% CI: 0.735-0.9186 (DeLong)

### Vẽ biểu đồ Histogram của NLR

library(ggplot2)
hist(nhom1.rieng$NLR, probability = TRUE, breaks = 20, col = "#009999", border = "white", xlab = "Tỷ số NLR", ylab = "Tần suất (%)", main = "Phân phối tỷ số NLR", xlim = c(0,100))
lines(density(na.omit(nhom1.rieng$NLR)), col = "#990000", lwd = 3)

### Tính mean, median, q1q3 của NLR

shapiro.test(nhom1.rieng$NLR)
## 
##  Shapiro-Wilk normality test
## 
## data:  nhom1.rieng$NLR
## W = 0.83615, p-value = 4.948e-08
NLR.nhom1 = nhom1.rieng %>%
  summarise(
    min = min(NLR),
    max = max(NLR),
    median = median(NLR),
    mean = mean(NLR),
    q1 = quantile(NLR, 0.25),
    q3 = quantile(NLR,0.75),
    sd = sd(NLR)
  )

Đường cong ROC của TC

library(readxl)
nhom1.rieng = readxl::read_excel("D:/Nhóm 1 riêng.xlsx")
head(nhom1.rieng)
## # A tibble: 6 × 53
##     STT  `Mã BA` SVV   Họ tê…¹  Year   Age Sex   Sexma…²    BC    TC   Neu   Lym
##   <dbl>    <dbl> <chr> <chr>   <dbl> <dbl> <chr>   <dbl> <dbl> <dbl> <dbl> <dbl>
## 1     1 22715165 0120… Hoàng …  1956    66 Nam         0 10.2    173  8.24  1.16
## 2     2 22702835 0124… Nguyễn…  1938    84 Nam         0 14.9    390 12.9   0.42
## 3     3 22713749 0123… Nguyễn…  1932    90 Nữ          1 13.8    426 12.3   0.46
## 4     4 14104427 0151… Phạm M…  1942    80 Nam         0 21.6    219 19.6   0.47
## 5     5 11711109 0142… Quách …  1958    64 Nam         0  4.82   281  3.84  0.48
## 6     6 13766348 0139… Vũ Đìn…  1956    66 Nam         0 11.9    410  9.72  0.59
## # … with 41 more variables: NLR <dbl>, Crenen <dbl>, Cremax <dbl>,
## #   `CreNen/Max` <dbl>, AKI <chr>, AKImahoa <dbl>, GD <chr>, Day <dbl>,
## #   History <chr>, THA <chr>, THAma <dbl>, ST <chr>, STma <dbl>, BMV <chr>,
## #   BMVma <dbl>, COPD <chr>, COPDma <dbl>, ĐTĐ <chr>, DTDma <dbl>, TBMMN <chr>,
## #   TBMMNma <dbl>, GCS <dbl>, Pulse <dbl>, `P/F` <dbl>, T <dbl>, HATB <dbl>,
## #   APACHEII <dbl>, SOFA <dbl>, Ventilation <chr>, Ventilationma <dbl>,
## #   Vasopressor <chr>, Vasopressorma <dbl>, Albumin <dbl>, CRP <dbl>, …
## # ℹ Use `colnames()` to see all variable names
attach(nhom1.rieng)
## The following objects are masked _by_ .GlobalEnv:
## 
##     AKI, Sex
## The following objects are masked from nhom1.rieng (pos = 4):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 5):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 6):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 7):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 8):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 9):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 10):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 11):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 12):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 13):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 14):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 15):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 16):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 17):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 18):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 19):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 20):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 21):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 22):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 23):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 24):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 30):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 32):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from No.AKI:
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate, Lym,
##     Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source
##     culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from Only.AKI:
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate, Lym,
##     Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source
##     culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 41):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following object is masked from package:base:
## 
##     T
levels(AKImahoa)
## NULL
model.TC.nhom1.rieng=glm(AKImahoa~TC,family=binomial)
pred.TC.nhom1.rieng=predict(model.TC.nhom1.rieng,type='response')
library(pROC)
r3=roc(AKImahoa,pred.TC.nhom1.rieng,grid = TRUE, lagacy.axes = TRUE)
## Setting levels: control = 0, case = 1
## Setting direction: controls < cases
par(pty="s")
auc(r3);ci(r3);plot.roc(r3)
## Area under the curve: 0.7692
## 95% CI: 0.665-0.8735 (DeLong)

### Vẽ biểu đồ Histogram của TC

# Kiểm tra phân phối của TC
shapiro.test(nhom1.rieng$TC)
## 
##  Shapiro-Wilk normality test
## 
## data:  nhom1.rieng$TC
## W = 0.97195, p-value = 0.07234
# Vẽ biểu đồ TC
library(ggplot2)
hist(nhom1.rieng$TC, probability = TRUE, breaks = 20, col = "#009999", border = "white", xlab = "Tiểu cầu", ylab = "Tần suất (%)", main = "Phân phối tiểu cầu", xlim = c(0,800))
lines(density(na.omit(nhom1.rieng$TC)), col = "#990000", lwd = 3)

# Đường cong ROC của APACHEII

library(readxl)
nhom1.rieng = readxl::read_excel("D:/Nhóm 1 riêng.xlsx")
head(nhom1.rieng)
## # A tibble: 6 × 53
##     STT  `Mã BA` SVV   Họ tê…¹  Year   Age Sex   Sexma…²    BC    TC   Neu   Lym
##   <dbl>    <dbl> <chr> <chr>   <dbl> <dbl> <chr>   <dbl> <dbl> <dbl> <dbl> <dbl>
## 1     1 22715165 0120… Hoàng …  1956    66 Nam         0 10.2    173  8.24  1.16
## 2     2 22702835 0124… Nguyễn…  1938    84 Nam         0 14.9    390 12.9   0.42
## 3     3 22713749 0123… Nguyễn…  1932    90 Nữ          1 13.8    426 12.3   0.46
## 4     4 14104427 0151… Phạm M…  1942    80 Nam         0 21.6    219 19.6   0.47
## 5     5 11711109 0142… Quách …  1958    64 Nam         0  4.82   281  3.84  0.48
## 6     6 13766348 0139… Vũ Đìn…  1956    66 Nam         0 11.9    410  9.72  0.59
## # … with 41 more variables: NLR <dbl>, Crenen <dbl>, Cremax <dbl>,
## #   `CreNen/Max` <dbl>, AKI <chr>, AKImahoa <dbl>, GD <chr>, Day <dbl>,
## #   History <chr>, THA <chr>, THAma <dbl>, ST <chr>, STma <dbl>, BMV <chr>,
## #   BMVma <dbl>, COPD <chr>, COPDma <dbl>, ĐTĐ <chr>, DTDma <dbl>, TBMMN <chr>,
## #   TBMMNma <dbl>, GCS <dbl>, Pulse <dbl>, `P/F` <dbl>, T <dbl>, HATB <dbl>,
## #   APACHEII <dbl>, SOFA <dbl>, Ventilation <chr>, Ventilationma <dbl>,
## #   Vasopressor <chr>, Vasopressorma <dbl>, Albumin <dbl>, CRP <dbl>, …
## # ℹ Use `colnames()` to see all variable names
attach(nhom1.rieng)
## The following objects are masked _by_ .GlobalEnv:
## 
##     AKI, Sex
## The following objects are masked from nhom1.rieng (pos = 3):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 5):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 6):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 7):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 8):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 9):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 10):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 11):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 12):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 13):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 14):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 15):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 16):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 17):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 18):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 19):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 20):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 21):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 22):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 23):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 24):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from nhom1.rieng (pos = 25):
## 
##     Age, AKI, AKImahoa, Albumin, APACHEII, Bac1, Bacteria, BC, Blood
##     culture, BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP,
##     Day, ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate,
##     Lym, Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source,
##     Source culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA,
##     THAma, Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 31):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 33):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from No.AKI:
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate, Lym,
##     Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source
##     culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from Only.AKI:
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Kết cục, Lactate, Lym,
##     Mã BA, Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source
##     culture, ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma,
##     Vasopressor, Vasopressorma, Ventilation, Ventilationma, Year
## The following objects are masked from duy (pos = 42):
## 
##     Age, AKI, Albumin, APACHEII, Bac1, Bacteria, BC, Blood culture,
##     BMV, BMVma, COPD, COPDma, Cremax, Crenen, CreNen/Max, CRP, Day,
##     ĐTĐ, DTDma, GCS, GD, HATB, History, Họ tên, Lactate, Lym, Mã BA,
##     Neu, NLR, P/F, Pulse, Sex, Sexmahoa, SOFA, Source, Source culture,
##     ST, STma, STT, SVV, T, TBMMN, TBMMNma, TC, THA, THAma, Vasopressor,
##     Vasopressorma, Ventilation, Ventilationma, Year
## The following object is masked from package:base:
## 
##     T
levels(AKImahoa)
## NULL
model.APACHE.nhom1.rieng=glm(AKImahoa~APACHEII,family=binomial)
pred.APACHE.nhom1.rieng=predict(model.APACHE.nhom1.rieng,type='response')
library(pROC)
r8=roc(AKImahoa,pred.APACHE.nhom1.rieng,grid = TRUE, lagacy.axes = TRUE)
## Setting levels: control = 0, case = 1
## Setting direction: controls < cases
par(pty="s")
auc(r8);ci(r8);plot.roc(r8)
## Area under the curve: 0.8332
## 95% CI: 0.7426-0.9239 (DeLong)

### Vẽ biểu đồ Histogram của APACHE II

# Kiểm tra phân phối của APACHE II
shapiro.test(nhom1.rieng$APACHEII)
## 
##  Shapiro-Wilk normality test
## 
## data:  nhom1.rieng$APACHEII
## W = 0.97115, p-value = 0.0642
# Vẽ biểu đồ APACHEII
library(ggplot2)
hist(nhom1.rieng$APACHEII, probability = TRUE, breaks = 10, col = "#009999", border = "white", xlab = "Điểm APACHE II", ylab = "Tần suất (%)", main = "Phân phối điểm APACHE II", xlim = c(0,35))
lines(density(na.omit(nhom1.rieng$APACHEII)), col = "#990000", lwd = 3)

# Tìm điểm cắt tối ưu của 3 ROC

library(dplyr)
library(caTools)
library(ROCR)
library(MASS)
library(cutpointr)
## 
## Attaching package: 'cutpointr'
## The following objects are masked from 'package:pROC':
## 
##     auc, roc
library(cutoff)
## 
## Attaching package: 'cutoff'
## The following object is masked from 'package:cutpointr':
## 
##     roc
## The following object is masked from 'package:pROC':
## 
##     roc
## The following object is masked from 'package:psych':
## 
##     logit
roc(nhom1.rieng$NLR,nhom1.rieng$AKImahoa)
##                      type  auc   cutoff sensitivity specificity
## 1 positive classification 0.83 12.27778    0.902439        0.75
roc(nhom1.rieng$APACHEII,nhom1.rieng$AKImahoa)
##                      type  auc cutoff sensitivity specificity
## 1 positive classification 0.83     18   0.7073171         0.9
roc(nhom1.rieng$TC,nhom1.rieng$AKImahoa)
##                      type  auc cutoff sensitivity specificity
## 1 negative classification 0.77    233   0.6341463       0.875

#Giá trị tiên đoán dương và âm của NLR

library(ModelMetrics)
## 
## Attaching package: 'ModelMetrics'
## The following objects are masked from 'package:cutpointr':
## 
##     auc, npv, ppv, precision, recall, sensitivity, specificity, tnr,
##     tpr
## The following object is masked from 'package:pROC':
## 
##     auc
## The following object is masked from 'package:base':
## 
##     kappa
library(papci)
ppv(nhom1.rieng$AKImahoa,nhom1.rieng$NLR,cutoff = 12.27778)
## [1] 0.7826087
npv(nhom1.rieng$AKImahoa,nhom1.rieng$NLR,cutoff = 12.27778)
## [1] 0.8571429
coords(r1,"best", ret=c("specificity", "sensitivity", "accuracy", "precision","ppv","npv"), transpose = FALSE)
##           specificity sensitivity  accuracy precision      ppv       npv
## threshold        0.75    0.902439 0.8271605  0.787234 0.787234 0.8823529

#Giá trị tiên đoán dương và âm của APACHEII

library(ModelMetrics)
library(papci)
ppv(nhom1.rieng$AKImahoa,nhom1.rieng$APACHEII,cutoff = 18)
## [1] 0.9230769
npv(nhom1.rieng$AKImahoa,nhom1.rieng$APACHEII,cutoff = 18)
## [1] 0.6909091
coords(r8,"best", ret=c("specificity", "sensitivity", "accuracy", "precision","ppv","npv"), transpose = FALSE)
##           specificity sensitivity  accuracy precision       ppv  npv
## threshold         0.9   0.7073171 0.8024691 0.8787879 0.8787879 0.75

Giá trị tiên đoán dương và âm của TC

library(ModelMetrics)
library(papci)
ppv(nhom1.rieng$AKImahoa,nhom1.rieng$TC,cutoff = 233)
## [1] 0.3061224
npv(nhom1.rieng$AKImahoa,nhom1.rieng$TC,cutoff = 233)
## [1] 0.1875
coords(r3,"best", ret=c("specificity", "sensitivity", "accuracy", "precision","ppv","npv"), transpose = FALSE)
##           specificity sensitivity  accuracy precision       ppv npv
## threshold       0.875   0.6341463 0.7530864 0.8387097 0.8387097 0.7