source("cleaning.R")

require(moonBook)
## Loading required package: moonBook
require(ztable)
## Loading required package: ztable
## Welcome to package ztable ver 0.1.5
options(ztable.type="html")
Lee=read.csv("Lee.csv")
Lee1=delAllNA(Lee)

res=mytable(preopGroup~.,data=Lee1)
z=ztable(res)
z=addRowColor(z,rows=c(2,27,28,29,33,34,35,36,38,45,53,54,55,67,70),color="lightcyan")
print(z,caption="Table 1. Clinical Characteristics according to PreopGroup")
Table 1. Clinical Characteristics according to PreopGroup
1 2 p
(N=34) (N=26)
parity 843.6 ± 876.0 466.8 ± 579.2 0.050
primi 0.827
    0 11 (32.4%) 10 (38.5%)
    1 23 (67.6%) 16 (61.5%)
preterm.Hx 0.235
    0 29 (85.3%) 18 (69.2%)
    1 5 (14.7%) 7 (26.9%)
    2 0 ( 0.0%) 1 ( 3.8%)
LEEP 0.807
    0 31 (91.2%) 25 (96.2%)
    1 3 ( 8.8%) 1 ( 3.8%)
op.Gw 23.0 ± 2.7 22.8 ± 2.3 0.804
cc 0.259
5 (14.7%) 4 (15.4%)
    ab pain 0 ( 0.0%) 2 ( 7.7%)
    ab pain, AFL 1 ( 2.9%) 0 ( 0.0%)
    ab pain, sono 1 ( 2.9%) 0 ( 0.0%)
    abd pain, sono 1 ( 2.9%) 1 ( 3.8%)
    afl 2 ( 5.9%) 0 ( 0.0%)
    AFL 1 ( 2.9%) 0 ( 0.0%)
    bearing down sensation 1 ( 2.9%) 0 ( 0.0%)
    sono 16 (47.1%) 19 (73.1%)
    sono, ab pain 2 ( 5.9%) 0 ( 0.0%)
    spotting, sono 1 ( 2.9%) 0 ( 0.0%)
    VB 3 ( 8.8%) 0 ( 0.0%)
preop.CL 0.4 ± 0.3 1.6 ± 0.4 0.000
postop.CL 1.7 ± 0.6 2.6 ± 0.7 0.000
증감 1.3 ± 0.7 0.9 ± 0.7 0.035
증감분류 0.190
    1 9 (26.5%) 12 (46.2%)
    2 25 (73.5%) 14 (53.8%)
X4weeks.CL 1.5 ± 0.7 2.4 ± 0.5 0.000
증감4주 1.2 ± 0.6 0.6 ± 0.6 0.004
X8weeks.CL 1.6 ± 0.6 2.1 ± 0.4 0.014
증감8주 1.2 ± 0.7 0.3 ± 0.6 0.001
X12.weeks.CL 1.5 ± 0.7 1.8 ± 0.4 0.362
증감12주 1.0 ± 0.6 -0.2 ± 0.6 0.003
미생물 0.222
7 (20.6%) 11 (42.3%)
    no 25 (73.5%) 13 (50.0%)
    urea 1 ( 2.9%) 0 ( 0.0%)
    yeast 1 ( 2.9%) 1 ( 3.8%)
    yeast, st aureus 0 ( 0.0%) 1 ( 3.8%)
UM.PCR 0.001
9 (26.5%) 20 (76.9%)
    myco 1 ( 2.9%) 0 ( 0.0%)
    no 21 (61.8%) 4 (15.4%)
    urea 3 ( 8.8%) 2 ( 7.7%)
UM.inf 0.837
    0 21 (84.0%) 5 (71.4%)
    1 4 (16.0%) 2 (28.6%)
Del.weeks 32.3 ± 6.7 36.6 ± 4.9 0.008
버틴날 9.3 ± 5.4 13.7 ± 5.2 0.003
분만주수분류 0.018
    1 15 (44.1%) 3 (12.0%)
    2 19 (55.9%) 22 (88.0%)
del.type 0.315
1 ( 2.9%) 1 ( 3.8%)
    crcs 1 ( 2.9%) 0 ( 0.0%)
    cs 3 ( 8.8%) 2 ( 7.7%)
    nsd 10 (29.4%) 16 (61.5%)
    psd 11 (32.4%) 5 (19.2%)
    PSD 2 ( 5.9%) 0 ( 0.0%)
    psd,expire 1 ( 2.9%) 0 ( 0.0%)
    rcs 5 (14.7%) 2 ( 7.7%)
gender 0.011
    1 21 (65.6%) 7 (28.0%)
    2 11 (34.4%) 18 (72.0%)
kg 2.2 ± 1.1 2.8 ± 0.8 0.034
동반질환 0.218
17 (50.0%) 19 (73.1%)
    breast ca 1 ( 2.9%) 0 ( 0.0%)
    cervical laceration 1 ( 2.9%) 0 ( 0.0%)
    cord prolapse 0 ( 0.0%) 1 ( 3.8%)
    fetal colon obstruction, hydrocele, PPROM 0 ( 0.0%) 1 ( 3.8%)
    hypothyrodism 0 ( 0.0%) 1 ( 3.8%)
    labor 1 ( 2.9%) 0 ( 0.0%)
    myoma 1 ( 2.9%) 0 ( 0.0%)
    myoma reddegeneration 2 ( 5.9%) 0 ( 0.0%)
    placenta accreta, cervical laceration 1 ( 2.9%) 0 ( 0.0%)
    placenta increta2 0 ( 0.0%) 1 ( 3.8%)
    pprom 5 (14.7%) 0 ( 0.0%)
    PPROm, fetal distress, placenta abruptio 1 ( 2.9%) 0 ( 0.0%)
    PPT 0 ( 0.0%) 1 ( 3.8%)
    PPT, TH 함 1 ( 2.9%) 0 ( 0.0%)
    preterm labor 1 ( 2.9%) 0 ( 0.0%)
    prom 1 ( 2.9%) 0 ( 0.0%)
    PROM 0 ( 0.0%) 1 ( 3.8%)
    rh- 0 ( 0.0%) 1 ( 3.8%)
    thrombocytopenia 1 ( 2.9%) 0 ( 0.0%)