Wisconsin Healthcare Cost Analysis

This is a survey of hospital costs in the city of Wisconsin conducted by the US Agency for Healthcare. It consists of inpatient hospital records of patients in the age group 0-17 years.

Summary of Data

    data <- "HospitalCosts.csv"
    df = read.csv(data, header=TRUE)
    summary(df)

##       AGE             FEMALE           LOS              RACE      
##  Min.   : 0.000   Min.   :0.000   Min.   : 0.000   Min.   :1.000  
##  1st Qu.: 0.000   1st Qu.:0.000   1st Qu.: 2.000   1st Qu.:1.000  
##  Median : 0.000   Median :1.000   Median : 2.000   Median :1.000  
##  Mean   : 5.086   Mean   :0.512   Mean   : 2.828   Mean   :1.078  
##  3rd Qu.:13.000   3rd Qu.:1.000   3rd Qu.: 3.000   3rd Qu.:1.000  
##  Max.   :17.000   Max.   :1.000   Max.   :41.000   Max.   :6.000  
##                                                    NA's   :1      
##      TOTCHG          APRDRG     
##  Min.   :  532   Min.   : 21.0  
##  1st Qu.: 1216   1st Qu.:640.0  
##  Median : 1536   Median :640.0  
##  Mean   : 2774   Mean   :616.4  
##  3rd Qu.: 2530   3rd Qu.:751.0  
##  Max.   :48388   Max.   :952.0  
## 

Shinny Apps

https://sunnysoon.shinyapps.io/ShinyApp/

Basic instruction

• Click on the radio button to select gender
• Select data from the drop down box
• Click [Display Chart] button

Screenshot of Application interface