syphilistotal <- read.delim("~/Desktop/cdsc/health literacy/syphilistotal.tsv") View(syphilistotal)