lines = 'Admitting_Diagnosis Average_SRE SIRS Dandruff 26 21 Varicose_veins 130 173 Psoriasis 317 174 Eczema 231 204 Anemia 325 312 Hyperthyroidism 816 393 Gallstones 563 454 Arthritis 312 468 Peptic_ulcer 603 500 High_blood_pressure 405 520 Diabetes 599 621 Emphysema 357 636 Alcoholism 688 688 Cirrhosis 443 733 Schizophrenia 609 776 Heart_failure 772 824 Cancer 777 1020' con = textConnection( lines ) DF = read.table( con, header=TRUE ) close(con)