CA

hospital <- data.frame(
  patientID = c(101,102,103,104,105),
  patientName = c("Aman","Riya","Karan","Neha","Rohit"),
  Gender = factor(c("Male","Female","Male","Female","Male")),
  ward = factor(c("General","ICU","General","Private","General")),
  TreatmentCost = c(1200,2500,15000,3000,NA),
  MedicineCost = c(3000,5000,4000,6000,4500),
  DaysAdmitted = c(3,5,2,6,4)
)

hospital

##   patientID patientName Gender    ward TreatmentCost MedicineCost DaysAdmitted
## 1       101        Aman   Male General          1200         3000            3
## 2       102        Riya Female     ICU          2500         5000            5
## 3       103       Karan   Male General         15000         4000            2
## 4       104        Neha Female Private          3000         6000            6
## 5       105       Rohit   Male General            NA         4500            4