This is the parent cleaning function for the endoscopy report. It contains all the other functions for the endoscopy report to be cleaned up. It relies on the columns being named in a standardised way as below
EndoscAll(dataframe)
dataframe | the dataframe |
---|
# Rename the columns in whatever endoscopy dataframe you have names(Myendo)<-c("OGDReportWhole","HospitalNumber","PatientName", "GeneralPractitioner","Dateofprocedure","Endoscopist","Secondendoscopist", "Medications","Instrument","ExtentofExam","Indications","ProcedurePerformed", "Findings" ) #Now use the function bb<-EndoscAll(Myendo) rm(Myendo)