LAB 6

urlfile<-'https://raw.githubusercontent.com/ati-ozgur/course-r-programming/master/2021/Lab-2021-11-16-ImportData/example-data-bad.csv'
dsin<-read.csv(urlfile)
dsin

##    study_id.patient_id.gender.age_years.age_months.date_inclusion.x
## 1                                             x\t4\tF\t2\t27\t2011-01-01
## 2                                             1\tx\tF\t2\t25\t2011-01-01
## 3                                             1\t1\tx\t2\t27\t2011-01-01
## 4                                             1\t2\tM\tx\t61\t2011-01-01
## 5                                              1\t3\tF\t9\tx\t2011-01-01
## 6                                             1\t3\tM\t1\t17\t2011-01-01
## 7                                           1\t4\tM\t2\t25\t2011-01-01\tx
## 8                                           2\t1\tM\t200\t32\t2011-01-01
## 9                                             2\t2\tM\t3\t24\t2011-01-01
## 10                                            2\t3\tF\t7\t90\t2011-01-01
## 11                                            2\t4\tF\t1\t14\t2011-01-01
## 12                                            2\t5\tF\t2\t25\t1999-13-01
## 13                                            2\t6\tM\t2\t25\t1999-12-32