Cardiac 2024 Surgery

<!-- -   Data correlation -->

<!-- -   Data correlation -->

```
## 
## Attaching package: 'zoo'
```

```
## The following objects are masked from 'package:base':
## 
##     as.Date, as.Date.numeric
```

```
## 
## 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
```

## [1] "C:/Users/User/Documents/RStudio/theatre"

1 Cardiac procedure

1.1 Data Description

- Nominal values

Procedure Code, Procedure Description, MRN, Emergency TMS, Theatre Month, Theatre Year, Theatre Day, Theatre Date, Episode Type, Episode No., Episode Status, Admit Ward, IP Discharge Destination, SOA

- Binary values

Theatre (T3, T4), First Patient In Theatre, In Operating Theatre Flag, In PACU to Ready ICUHDU Flag, SOA Group

- Numeric values

Procedure Wait Time (Days), Pre-Op Notice (Days), Send For Patient to In Holding Bay (Mins) Ave Yes, In Holding Bay to Anaes Room (Mins) Flag Yes, Anaes Wait (Mins), Anaes Start to Ready Tfr Theatre (Mins) Ave Yes, Anaes Start to InOp Theatre (Mins) Ave In OT Yes, Ready Transfer Theatre to InOp Theatre (Mins), InOp Theatre to Paint Drape (Mins) Ave Drape Yes, Theatre Wait (Mins) Ave Inst to Skin and Op Yes, Paint Drape to Instr to Skin (Mins) Ave Skin Yes, Instr to Skin to Dress Appl (Mins) Ave Dressing Yes, Dress Appl to Ready PACU (Mins) Ave Ready Yes, Ready Depart Pacu to Return Ward (mins) Ave, Referred Pre-Op to Pre-Op (Days), Theatre Readmission Count, Theatre 1st Readmission Count, Theatre Readmission Days, Anaes Turnaround Time (Mins), Surgical Turnaround Time (Mins) Ave Prev Dressing Yes, Count, PreOp To In Theatre Hours, Anaes Turnaround Time (Mins) Ave In Anaes Room Yes, Count In PACU, Count IN PACU OOH No, Count IN PACU OOH Yes, Procedure Wait Time (Days) Average, Anaes Journey Average, Consultant Journey Average, Robot Journey Average, Theatre Journey Average, PACU Journey Average, Return to Ward Journey Average, Patient Journey Average, Ward Journey Average, Start Finish Journey

- Datetime values

Referral Date, Admission DT, Referred PreOp Date, PreOp Date, Send for Patient DT, In Holding Bay DT, In Anaesthetic Room DT, Anaesthetic Start DT, In Operating Theatre DT, Paint Draping Start DT, Instrument To Skin DT, Dressing Applied DT, Ready PACU Room DT, In PACU DT, Patient Ready Depart PACU DT, Patient Ready ICUHDU DT, Patient Return Ward DT, Discharge DT, Start Delay Trans Date

1.2 Data Exploration

1.2.1 Nominal data

1.2.1.1 Procedure description

## Table of frequency of Procedure Description :

1.2.1.2 Emergency TMS

## Table of frequency of Emergency TMS :

1.2.1.3 Emergency Category

## Table of frequency of Emergency Category :

1.3 Data Exploration (cont.)

1.3.1 Numeric data

1.3.1.1 Duration (mins) from “Send for Patient” to “Paint Drape” (system calculation)

• Is not normally distributed, right skewed. As the result, median should be read below

##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max.    NA's 
##    85.0   126.0   137.5   151.5   160.8   611.0     289

##       median         mean      SE.mean CI.mean.0.95          var      std.dev 
##  137.5000000  151.4629630    9.6191528   19.2935773 4996.5174703   70.6860486 
##     coef.var 
##    0.4666887

## Rows: 54
## Columns: 7
## $ scale          <dbl> 160, 138, 148, 163, 109, 85, 116, 171, 157, 167, 141, 1…
## $ datetime       <date> 2024-04-08, 2024-03-22, 2024-06-10, 2024-02-19, 2024-0…
## $ year_month     <chr> "2024-04", "2024-03", "2024-06", "2024-02", "2024-04", …
## $ year           <chr> "2024", "2024", "2024", "2024", "2024", "2024", "2024",…
## $ month          <chr> "04", "03", "06", "02", "04", "03", "02", "03", "01", "…
## $ day            <chr> "Monday", "Friday", "Monday", "Monday", "Thursday", "Mo…
## $ year_month_day <chr> "2024-04 Monday", "2024-03 Friday", "2024-06 Monday", "…
## binwidth =[1] 18.3874
## Minimum of scale =[1] 85
## Maximum of scale =[1] 611

## Rows: 1
## Columns: 3
## $ year      <chr> "2024"
## $ mean_gr   <dbl> 151.463
## $ median_gr <dbl> 137.5

## Rows: 6
## Columns: 3
## $ month     <chr> "01", "02", "03", "04", "05", "06"
## $ mean_gr   <dbl> 157.7778, 141.0000, 186.9091, 132.7273, 145.5000, 132.0000
## $ median_gr <dbl> 156.0, 141.0, 138.0, 126.0, 137.0, 131.5

## Rows: 6
## Columns: 3
## $ year_month <chr> "2024-01", "2024-02", "2024-03", "2024-04", "2024-05", "202…
## $ mean_gr    <dbl> 157.7778, 141.0000, 186.9091, 132.7273, 145.5000, 132.0000
## $ median_gr  <dbl> 156.0, 141.0, 138.0, 126.0, 137.0, 131.5

## 
##  Generalized Shapiro-Wilk test for Multivariate Normality by
##  Villasenor-Alva and Gonzalez-Estrada
## 
## data:  df_scale$scale
## MVW = 0.47417, p-value = 1.255e-12

1.4 Data Exploration (cont.)

1.4.1 Numeric data (cont.)

1.4.1.1 Duration each stages (system calculation)

- SendForPatient to InHoldingBay (Mins)

• mean +/- sd = 22.08 +/- 9.29
• median (range) = 19 (6 - 59)

- InHoldingBay to AnaesRoom (Mins)

• mean +/- sd = 23.97 +/- 99.66
• median (range) = 14 (0 - 1451)

- Anaes Wait (Mins)

• mean +/- sd = 21.69 +/- 12.19
• median (range) = 19 (1-57)

- AnaesStart to Ready Transfer Theatre (Mins)

• mean +/- sd = 29.35 +/- 10.37
• median (range) = 29.5 (-5 - 52)

- Ready Transfer Theatre to InOp Theatre (Mins)

• mean +/- sd = 13.6 +/- 78.56
• median (range) = 2 (-37 - 515)

- InOpTheatre to PaintDrape (Mins)

• mean +/- sd = 15.17 +/- 91.14
• median (range) = 15 (-1415 - 404)

- Theatre Wait (Mins)

• mean +/- sd = 23.76 +/- 7.05
• median (range) = 23 (3 - 50)

- PaintDrape to InstrToSkin (Mins)

• mean +/- sd = 11.3 +/- 53.74
• median (range) = 8 (-379 - 609)

- InstrToSkin to DressAppl (Mins)

• mean +/- sd = 260.6 +/- 118
• median (range) = 276.5 (-315 - 635)

- DressAppl to ReadyPacu (Mins)

• mean +/- sd =21.48 +/- 36.33
• median (range) = 12 (2 - 194)

- ReadyDepartPacu to ReturnWard (Mins)

• mean +/- sd = 21 +/- 15.76
• median (range) = 14.5 (4 - 49)

##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max.    NA's 
##    6.00   16.00   19.00   22.08   27.00   59.00     101

##       median         mean      SE.mean CI.mean.0.95          var      std.dev 
##   19.0000000   22.0826446    0.5974574    1.1769051   86.3831830    9.2942554 
##     coef.var 
##    0.4208851

##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max.    NA's 
##    0.00    9.00   14.00   23.97   19.00 1451.00     131

##       median         mean      SE.mean CI.mean.0.95          var      std.dev 
##    14.000000    23.966981     6.844393    13.492152  9931.292743    99.655872 
##     coef.var 
##     4.158049

##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max.    NA's 
##    1.00   14.00   19.00   21.69   27.75   57.00     285

##       median         mean      SE.mean CI.mean.0.95          var      std.dev 
##   19.0000000   21.6896552    1.6014223    3.2067929  148.7441016   12.1960691 
##     coef.var 
##    0.5622989

##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max.    NA's 
##   -5.00   25.00   29.50   29.35   33.00   52.00     309

##       median         mean      SE.mean CI.mean.0.95          var      std.dev 
##   29.5000000   29.3529412    1.7792037    3.6198171  107.6292335   10.3744510 
##     coef.var 
##    0.3534382

##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max.    NA's 
##   -37.0     1.0     2.0    13.6     4.0   515.0     300

##       median         mean      SE.mean CI.mean.0.95          var      std.dev 
##     2.000000    13.604651    11.979918    24.176453  6171.292359    78.557574 
##     coef.var 
##     5.774317

##     Min.  1st Qu.   Median     Mean  3rd Qu.     Max.     NA's 
## -1415.00    12.00    15.00    15.17    19.00   404.00       68

##       median         mean      SE.mean CI.mean.0.95          var      std.dev 
##    15.000000    15.174545     5.495930    10.819616  8306.443875    91.139694 
##     coef.var 
##     6.006091

##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max.    NA's 
##    3.00   20.00   23.00   23.76   28.00   50.00      69

##       median         mean      SE.mean CI.mean.0.95          var      std.dev 
##   23.0000000   23.7591241    0.4258012    0.8382713   49.6780300    7.0482643 
##     coef.var 
##    0.2966551

##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max.    NA's 
##  -379.0     6.0     8.0    11.3    10.0   609.0      68

##       median         mean      SE.mean CI.mean.0.95          var      std.dev 
##     8.000000    11.298182     3.240564     6.379567  2887.845070    53.738674 
##     coef.var 
##     4.756400

##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max.    NA's 
##  -315.0   208.0   276.5   260.6   325.5   635.0      75

##       median         mean      SE.mean CI.mean.0.95          var      std.dev 
## 2.765000e+02 2.605746e+02 7.208373e+00 1.419248e+01 1.392545e+04 1.180061e+02 
##     coef.var 
## 4.528689e-01

##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max.    NA's 
##    2.00    6.00   12.00   21.48   18.00  194.00     314

##       median         mean      SE.mean CI.mean.0.95          var      std.dev 
##    12.000000    21.482759     6.745665    13.817868  1319.615764    36.326516 
##     coef.var 
##     1.690961

##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max.    NA's 
##    4.00    9.50   14.50   21.00   27.75   49.00     333

##       median         mean      SE.mean CI.mean.0.95          var      std.dev 
##   14.5000000   21.0000000    4.9844202   11.2755418  248.4444444   15.7621206 
##     coef.var 
##    0.7505772

2 Cardiac with First Patient

2.1 Data Description

2.1.0.1 Late Start

• Late Start is defined as starting after 8:15 am on (Monday, Tuesday, Thursday and Friday) or after 9:00 am on Wednesday, with a time stamp “In Anaesthetic Room” or “In Operating Theatre”
• No. of First Patient in Theatre:  148 observations, with  51 Late Start as definition

## Table of frequency of Late Start :

Number of late-start cases on First Patient in Theatre of Elective Cardiac by Year

Theatre Year	count
2024	51

2.2 Data Correlation

2.2.1 Relationship between ‘Late Start’ and Theatre Day

There is no statistically significant difference between ‘Late Start’ and Theatre Day (p-value >.05)

## 
##  
##    Cell Contents
## |-------------------------|
## |                       N |
## |              Expected N |
## | Chi-square contribution |
## |           N / Row Total |
## |           N / Col Total |
## |         N / Table Total |
## |-------------------------|
## 
##  
## Total Observations in Table:  148 
## 
##  
##              | nominal2 
##     nominal1 |       MON |       TUE |       WED |       THU |       FRI |       SAT |       SUN | Row Total | 
## -------------|-----------|-----------|-----------|-----------|-----------|-----------|-----------|-----------|
##            0 |        20 |        23 |        20 |         8 |        20 |         5 |         1 |        97 | 
##              |     20.32 |     24.91 |     17.04 |      9.18 |     21.63 |      3.28 |      0.66 |           | 
##              |      0.00 |      0.15 |      0.51 |      0.15 |      0.12 |      0.91 |      0.18 |           | 
##              |      0.21 |      0.24 |      0.21 |      0.08 |      0.21 |      0.05 |      0.01 |      0.66 | 
##              |      0.65 |      0.61 |      0.77 |      0.57 |      0.61 |      1.00 |      1.00 |           | 
##              |      0.14 |      0.16 |      0.14 |      0.05 |      0.14 |      0.03 |      0.01 |           | 
## -------------|-----------|-----------|-----------|-----------|-----------|-----------|-----------|-----------|
##            1 |        11 |        15 |         6 |         6 |        13 |         0 |         0 |        51 | 
##              |     10.68 |     13.09 |      8.96 |      4.82 |     11.37 |      1.72 |      0.34 |           | 
##              |      0.01 |      0.28 |      0.98 |      0.29 |      0.23 |      1.72 |      0.34 |           | 
##              |      0.22 |      0.29 |      0.12 |      0.12 |      0.25 |      0.00 |      0.00 |      0.34 | 
##              |      0.35 |      0.39 |      0.23 |      0.43 |      0.39 |      0.00 |      0.00 |           | 
##              |      0.07 |      0.10 |      0.04 |      0.04 |      0.09 |      0.00 |      0.00 |           | 
## -------------|-----------|-----------|-----------|-----------|-----------|-----------|-----------|-----------|
## Column Total |        31 |        38 |        26 |        14 |        33 |         5 |         1 |       148 | 
##              |      0.21 |      0.26 |      0.18 |      0.09 |      0.22 |      0.03 |      0.01 |           | 
## -------------|-----------|-----------|-----------|-----------|-----------|-----------|-----------|-----------|
## 
##  
## Statistics for All Table Factors
## 
## 
## Pearson's Chi-squared test 
## ------------------------------------------------------------
## Chi^2 =  5.876534     d.f. =  6     p =  0.4371622 
## 
## 
## 

2.2.2 Relationship between ‘Late Start’ and Emergency Classification

There is no statistically significant difference between ‘Late Start’ and Emergency TMS or Emergency Category (p-value >.05)

## 
##  
##    Cell Contents
## |-------------------------|
## |                       N |
## |              Expected N |
## | Chi-square contribution |
## |           N / Row Total |
## |           N / Col Total |
## |         N / Table Total |
## |-------------------------|
## 
##  
## Total Observations in Table:  148 
## 
##  
##              | nominal2 
##     nominal1 |  Elective | Emergency | Row Total | 
## -------------|-----------|-----------|-----------|
##            0 |        85 |        12 |        97 | 
##              |     86.51 |     10.49 |           | 
##              |      0.03 |      0.22 |           | 
##              |      0.88 |      0.12 |      0.66 | 
##              |      0.64 |      0.75 |           | 
##              |      0.57 |      0.08 |           | 
## -------------|-----------|-----------|-----------|
##            1 |        47 |         4 |        51 | 
##              |     45.49 |      5.51 |           | 
##              |      0.05 |      0.42 |           | 
##              |      0.92 |      0.08 |      0.34 | 
##              |      0.36 |      0.25 |           | 
##              |      0.32 |      0.03 |           | 
## -------------|-----------|-----------|-----------|
## Column Total |       132 |        16 |       148 | 
##              |      0.89 |      0.11 |           | 
## -------------|-----------|-----------|-----------|
## 
##  
## Statistics for All Table Factors
## 
## 
## Pearson's Chi-squared test 
## ------------------------------------------------------------
## Chi^2 =  0.7107583     d.f. =  1     p =  0.3991922 
## 
## Pearson's Chi-squared test with Yates' continuity correction 
## ------------------------------------------------------------
## Chi^2 =  0.3187193     d.f. =  1     p =  0.5723783 
## 
## 

## 
##  
##    Cell Contents
## |-------------------------|
## |                       N |
## |              Expected N |
## | Chi-square contribution |
## |           N / Row Total |
## |           N / Col Total |
## |         N / Table Total |
## |-------------------------|
## 
##  
## Total Observations in Table:  16 
## 
##  
##              | nominal2 
##     nominal1 |       E1:Critical Emergency |   E2:Non Critical Emergency | ETRANS:Emergency Transplant |                   Row Total | 
## -------------|-----------------------------|-----------------------------|-----------------------------|-----------------------------|
##            0 |                           4 |                           3 |                           5 |                          12 | 
##              |                        4.50 |                        3.00 |                        4.50 |                             | 
##              |                        0.06 |                        0.00 |                        0.06 |                             | 
##              |                        0.33 |                        0.25 |                        0.42 |                        0.75 | 
##              |                        0.67 |                        0.75 |                        0.83 |                             | 
##              |                        0.25 |                        0.19 |                        0.31 |                             | 
## -------------|-----------------------------|-----------------------------|-----------------------------|-----------------------------|
##            1 |                           2 |                           1 |                           1 |                           4 | 
##              |                        1.50 |                        1.00 |                        1.50 |                             | 
##              |                        0.17 |                        0.00 |                        0.17 |                             | 
##              |                        0.50 |                        0.25 |                        0.25 |                        0.25 | 
##              |                        0.33 |                        0.25 |                        0.17 |                             | 
##              |                        0.12 |                        0.06 |                        0.06 |                             | 
## -------------|-----------------------------|-----------------------------|-----------------------------|-----------------------------|
## Column Total |                           6 |                           4 |                           6 |                          16 | 
##              |                        0.38 |                        0.25 |                        0.38 |                             | 
## -------------|-----------------------------|-----------------------------|-----------------------------|-----------------------------|
## 
##  
## Statistics for All Table Factors
## 
## 
## Pearson's Chi-squared test 
## ------------------------------------------------------------
## Chi^2 =  0.4444444     d.f. =  2     p =  0.8007374 
## 
## 
## 

2.2.3 Relationship between ‘Late Start’ and Transplant cases

There is no statistically significant difference between ‘Late Start’ and Transplant cases (p-value >.05)

## 
##  
##    Cell Contents
## |-------------------------|
## |                       N |
## |              Expected N |
## | Chi-square contribution |
## |           N / Row Total |
## |           N / Col Total |
## |         N / Table Total |
## |-------------------------|
## 
##  
## Total Observations in Table:  148 
## 
##  
##              | nominal2 
##     nominal1 |         0 |         1 | Row Total | 
## -------------|-----------|-----------|-----------|
##            0 |        89 |         8 |        97 | 
##              |     91.10 |      5.90 |           | 
##              |      0.05 |      0.75 |           | 
##              |      0.92 |      0.08 |      0.66 | 
##              |      0.64 |      0.89 |           | 
##              |      0.60 |      0.05 |           | 
## -------------|-----------|-----------|-----------|
##            1 |        50 |         1 |        51 | 
##              |     47.90 |      3.10 |           | 
##              |      0.09 |      1.42 |           | 
##              |      0.98 |      0.02 |      0.34 | 
##              |      0.36 |      0.11 |           | 
##              |      0.34 |      0.01 |           | 
## -------------|-----------|-----------|-----------|
## Column Total |       139 |         9 |       148 | 
##              |      0.94 |      0.06 |           | 
## -------------|-----------|-----------|-----------|
## 
##  
## Statistics for All Table Factors
## 
## 
## Pearson's Chi-squared test 
## ------------------------------------------------------------
## Chi^2 =  2.313041     d.f. =  1     p =  0.1282929 
## 
## Pearson's Chi-squared test with Yates' continuity correction 
## ------------------------------------------------------------
## Chi^2 =  1.343257     d.f. =  1     p =  0.2464604 
## 
## 

2.2.4 Relationship between ‘Late Start’ and Cancelled cases

There is no statistically significant difference between ‘Late Start’ and Cancelled cases which identified as “In Operating Theatre Flag”==No (p-value >.05)

## 
##  
##    Cell Contents
## |-------------------------|
## |                       N |
## |              Expected N |
## | Chi-square contribution |
## |           N / Row Total |
## |           N / Col Total |
## |         N / Table Total |
## |-------------------------|
## 
##  
## Total Observations in Table:  148 
## 
##  
##              | nominal2 
##     nominal1 |         N |         Y | Row Total | 
## -------------|-----------|-----------|-----------|
##            0 |         1 |        96 |        97 | 
##              |      1.31 |     95.69 |           | 
##              |      0.07 |      0.00 |           | 
##              |      0.01 |      0.99 |      0.66 | 
##              |      0.50 |      0.66 |           | 
##              |      0.01 |      0.65 |           | 
## -------------|-----------|-----------|-----------|
##            1 |         1 |        50 |        51 | 
##              |      0.69 |     50.31 |           | 
##              |      0.14 |      0.00 |           | 
##              |      0.02 |      0.98 |      0.34 | 
##              |      0.50 |      0.34 |           | 
##              |      0.01 |      0.34 |           | 
## -------------|-----------|-----------|-----------|
## Column Total |         2 |       146 |       148 | 
##              |      0.01 |      0.99 |           | 
## -------------|-----------|-----------|-----------|
## 
##  
## Statistics for All Table Factors
## 
## 
## Pearson's Chi-squared test 
## ------------------------------------------------------------
## Chi^2 =  0.2167967     d.f. =  1     p =  0.6414916 
## 
## Pearson's Chi-squared test with Yates' continuity correction 
## ------------------------------------------------------------
## Chi^2 =  3.37825e-29     d.f. =  1     p =  1 
## 
## 

3 Cardiac with identified late start

3.1 Data Description

Among cases with late start,  10 having transplant and  3 cases having been cancelled (scroll down for details)

3.2 Data Correlation

3.2.1 No. of late start cases having Cardiac transplant or cancelled

## transplant
##   0   1 
## 180  10

## cancelled
## FALSE  TRUE 
##   187     3

## `summarise()` has grouped output by 'Theatre Year', 'Theatre Month',
## 'TheatreDay'. You can override using the `.groups` argument.
## `summarise()` has grouped output by 'Theatre Year', 'Theatre Month',
## 'TheatreDay'. You can override using the `.groups` argument.

Number of late-start in transplant cases Theatre Year Theatre Month TheatreDay Theatre count 2024 January MON T03-Theatre 3 1 2024 January WED T04-Theatre 4 1 2024 January THU T04-Theatre 4 1 2024 January FRI T03-Theatre 3 2 2024 February SAT T03-Theatre 3 1 2024 March WED T03-Theatre 3 1 2024 April FRI T04-Theatre 4 1 2024 April SAT T03-Theatre 3 1 2024 April SAT T04-Theatre 4 1

Number of late-start in cancelled cases Theatre Year Theatre Month TheatreDay Theatre count 2024 January THU T03-Theatre 3 1 2024 April WED T04-Theatre 4 1 2024 May THU T04-Theatre 4 1

4 Elective Cardiac

4.1 Data Description

• Elective Cardiac: 928 observations

## `summarise()` has grouped output by 'Theatre Year'. You can override using the
## `.groups` argument.

Number of patients on waiting list of Elective Cardiac by Year Theatre Year count 2024 142

Number of patients on waiting list in Elective Cardiac by Month Theatre Year Theatre Month count 2024 January 26 2024 February 24 2024 March 20 2024 April 26 2024 May 21 2024 June 25

4.2 Data Exploration

4.2.1 From SendForPatient to PaintDrape (system) in T3

## List of 11
##  $ call      : language qcc::qcc(data = df_SendForPatient_to_PaintDrape_T3, type = "xbar", labels = df_SendForPatient_to_PaintDrape_T3$th| __truncated__
##  $ type      : chr "xbar"
##  $ data.name : chr "df_SendForPatient_to_PaintDrape_T3"
##  $ data      : num [1:6, 1:2] 1 2 3 4 5 ...
##   ..- attr(*, "dimnames")=List of 2
##  $ statistics: Named num [1:6] 92.8 72.4 80 72.4 86.5 ...
##   ..- attr(*, "names")= chr [1:6] "2024 January" "2024 February" "2024 March" "2024 April" ...
##  $ sizes     : int [1:6] 2 2 2 2 2 2
##  $ center    : num 79.3
##  $ std.dev   : num 134
##  $ nsigmas   : num 3
##  $ limits    : num [1, 1:2] -206 364
##   ..- attr(*, "dimnames")=List of 2
##  $ violations:List of 2
##  - attr(*, "class")= chr "qcc"

## List of 11
##  $ call      : language qcc::qcc(data = df_SendForPatient_to_PaintDrape_T3, type = "S", labels = df_SendForPatient_to_PaintDrape_T3$theat| __truncated__
##  $ type      : chr "S"
##  $ data.name : chr "df_SendForPatient_to_PaintDrape_T3"
##  $ data      : num [1:6, 1:2] 1 2 3 4 5 ...
##   ..- attr(*, "dimnames")=List of 2
##  $ statistics: Named num [1:6] 129.8 99.5 108.9 96.8 115.3 ...
##   ..- attr(*, "names")= chr [1:6] "2024 January" "2024 February" "2024 March" "2024 April" ...
##  $ sizes     : int [1:6] 2 2 2 2 2 2
##  $ center    : num 107
##  $ std.dev   : num 134
##  $ nsigmas   : num 3
##  $ limits    : num [1, 1:2] 0 350
##   ..- attr(*, "dimnames")=List of 2
##  $ violations:List of 2
##  - attr(*, "class")= chr "qcc"

4.3 Data Exploration (cont.)

4.3.1 From SendForPatient to PaintDrape (system) in T4

## List of 11
##  $ call      : language qcc::qcc(data = df_SendForPatient_to_PaintDrape_T4, type = "xbar", labels = df_SendForPatient_to_PaintDrape_T4$th| __truncated__
##  $ type      : chr "xbar"
##  $ data.name : chr "df_SendForPatient_to_PaintDrape_T4"
##  $ data      : num [1:6, 1:2] 1 2 3 4 5 ...
##   ..- attr(*, "dimnames")=List of 2
##  $ statistics: Named num [1:6] 68.7 71 103.5 60 71.5 ...
##   ..- attr(*, "names")= chr [1:6] "2024 January" "2024 February" "2024 March" "2024 April" ...
##  $ sizes     : int [1:6] 2 2 2 2 2 2
##  $ center    : num 73.5
##  $ std.dev   : num 124
##  $ nsigmas   : num 3
##  $ limits    : num [1, 1:2] -190 337
##   ..- attr(*, "dimnames")=List of 2
##  $ violations:List of 2
##  - attr(*, "class")= chr "qcc"

## List of 11
##  $ call      : language qcc::qcc(data = df_SendForPatient_to_PaintDrape_T4, type = "S", labels = df_SendForPatient_to_PaintDrape_T4$theat| __truncated__
##  $ type      : chr "S"
##  $ data.name : chr "df_SendForPatient_to_PaintDrape_T4"
##  $ data      : num [1:6, 1:2] 1 2 3 4 5 ...
##   ..- attr(*, "dimnames")=List of 2
##  $ statistics: Named num [1:6] 95.7 97.6 142.1 79.2 94 ...
##   ..- attr(*, "names")= chr [1:6] "2024 January" "2024 February" "2024 March" "2024 April" ...
##  $ sizes     : int [1:6] 2 2 2 2 2 2
##  $ center    : num 99
##  $ std.dev   : num 124
##  $ nsigmas   : num 3
##  $ limits    : num [1, 1:2] 0 323
##   ..- attr(*, "dimnames")=List of 2
##  $ violations:List of 2
##  - attr(*, "class")= chr "qcc"

4.4 Data Exploration (cont.)

4.4.1 Distribution of duration from “Send For Patient” to “Paint Drape” (mins)

Group by Theatre of In Anaes Room to Dressing Applied in Elective Cardiac Duration Theatre Average Minutes Median Minutes Average Hrs Median Hrs T03-Theatre 3 153.65 151 2.56 2.52 T04-Theatre 4 150.63 136 2.51 2.27

Group by Year of Minutes of In Anaes Room to Dressing Applied in Elective Cardiac Duration Year Average Minutes Median Minutes Average Hrs Median Hrs 2024 151.94 138 2.53 2.3

Group by Weekdays of Minutes of In Anaes Room to Dressing Applied in Elective Cardiac Theatre Average Minutes Median Minutes Average Hrs Median Hrs TUE 197.44 137 3.29 2.28 FRI 147.80 137 2.46 2.28 WED 146.33 138 2.44 2.30 MON 142.79 148 2.38 2.47 THU 128.00 138 2.13 2.30

Group by Month of Minutes of In Anaes Room to Dressing Applied in Elective Cardiac Month Average Minutes Median Minutes Average Hrs Median Hrs March 186.91 138.0 3.12 2.30 January 157.78 156.0 2.63 2.60 May 145.50 137.0 2.42 2.28 February 141.00 141.0 2.35 2.35 April 133.40 127.0 2.22 2.12 June 132.00 131.5 2.20 2.19

##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max.    NA's 
##    28.0    93.0   106.0   114.3   123.0   652.0      68

##       median         mean      SE.mean CI.mean.0.95          var      std.dev 
##  106.0000000  114.3333333    3.3393843    6.5783848 2676.3570432   51.7335195 
##     coef.var 
##    0.4524798

##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max.    NA's 
##    85.0   126.0   138.0   151.9   161.0   611.0     255

##       median         mean      SE.mean CI.mean.0.95          var      std.dev 
##  138.0000000  151.9433962    9.7901573   19.6453879 5079.9005806   71.2734213 
##     coef.var 
##    0.4690788

## binwidth =[1] 12.29026
## Minimum of scale =[1] 0
## Maximum of scale =[1] 652
## 
##  Generalized Shapiro-Wilk test for Multivariate Normality by
##  Villasenor-Alva and Gonzalez-Estrada
## 
## data:  scale
## MVW = 0.74449, p-value < 2.2e-16

## binwidth =[1] 12.29026
## Minimum of scale =[1] 0
## Maximum of scale =[1] 652
## 
##  Generalized Shapiro-Wilk test for Multivariate Normality by
##  Villasenor-Alva and Gonzalez-Estrada
## 
## data:  scale
## MVW = 0.74449, p-value < 2.2e-16

4.5 Data Correlation

4.5.1 Relationship between Time from ‘Send for Patient’ to ‘Paint Drape’ and First Patient In Theatre

As the result of different variance (p-value Bartlett < 0.05), Wilcox-test is applied. There is no statistically significant difference between “SendForPatient to PaintDrape” and whether or not “First Patient in Theatre” (p-value >0.05)

## 
##  Bartlett test of homogeneity of variances
## 
## data:  scale by as.factor(binary)
## Bartlett's K-squared = 20.933, df = 1, p-value = 4.757e-06
## 
## 
##  Welch Two Sample t-test
## 
## data:  scale by binary
## t = -1.3288, df = 48.443, p-value = 0.1901
## alternative hypothesis: true difference in means between group 0 and group 1 is not equal to 0
## 95 percent confidence interval:
##  -47.614034   9.716598
## sample estimates:
## mean in group 0 mean in group 1 
##        138.0000        156.9487

4.5.2 Relationship between Time from ‘Send for Patient’ to ‘Paint Drape’ and Theatre

As the result of different variance (p-value Bartlett < 0.05), Wilcox-test is applied. There is no statistically significant difference between “SendForPatient to PaintDrape” and (T3, T4) theatre (p-value >0.05)

## 
##  Bartlett test of homogeneity of variances
## 
## data:  scale by as.factor(binary)
## Bartlett's K-squared = 14.085, df = 1, p-value = 0.0001748
## 
## 
##  Welch Two Sample t-test
## 
## data:  scale by binary
## t = 0.16584, df = 41.936, p-value = 0.8691
## alternative hypothesis: true difference in means between group T03-Theatre 3 and group T04-Theatre 4 is not equal to 0
## 95 percent confidence interval:
##  -33.71934  39.75702
## sample estimates:
## mean in group T03-Theatre 3 mean in group T04-Theatre 4 
##                    153.6522                    150.6333