last commit before abandong for R
remove write methods, just print out
just stripped the patient names do indexing in R
main function