Project 1
library(readr)
library(stringr)
data <- readLines("~/tournamentinfo.txt")## Warning in readLines("~/tournamentinfo.txt"): incomplete final line found
## on '~/tournamentinfo.txt'data[1:10]## [1] "-----------------------------------------------------------------------------------------"
## [2] " Pair | Player Name |Total|Round|Round|Round|Round|Round|Round|Round| "
## [3] " Num | USCF ID / Rtg (Pre->Post) | Pts | 1 | 2 | 3 | 4 | 5 | 6 | 7 | "
## [4] "-----------------------------------------------------------------------------------------"
## [5] " 1 | GARY HUA |6.0 |W 39|W 21|W 18|W 14|W 7|D 12|D 4|"
## [6] " ON | 15445895 / R: 1794 ->1817 |N:2 |W |B |W |B |W |B |W |"
## [7] "-----------------------------------------------------------------------------------------"
## [8] " 2 | DAKSHESH DARURI |6.0 |W 63|W 58|L 4|W 17|W 16|W 20|W 7|"
## [9] " MI | 14598900 / R: 1553 ->1663 |N:2 |B |W |B |W |B |W |B |"
## [10] "-----------------------------------------------------------------------------------------"Remove separated lines:
line_sign <-str_detect(data,"\\-----")
textdata<-data[!line_sign]Remove 1 to 2 line, and “|” separator:
textdata1<-textdata[3:length(textdata)]
textdata1<-str_split(textdata1,"\\|")
textdata1## [[1]]
## [1] " 1 "
## [2] " GARY HUA "
## [3] "6.0 "
## [4] "W 39"
## [5] "W 21"
## [6] "W 18"
## [7] "W 14"
## [8] "W 7"
## [9] "D 12"
## [10] "D 4"
## [11] ""
##
## [[2]]
## [1] " ON "
## [2] " 15445895 / R: 1794 ->1817 "
## [3] "N:2 "
## [4] "W "
## [5] "B "
## [6] "W "
## [7] "B "
## [8] "W "
## [9] "B "
## [10] "W "
## [11] ""
##
## [[3]]
## [1] " 2 "
## [2] " DAKSHESH DARURI "
## [3] "6.0 "
## [4] "W 63"
## [5] "W 58"
## [6] "L 4"
## [7] "W 17"
## [8] "W 16"
## [9] "W 20"
## [10] "W 7"
## [11] ""
##
## [[4]]
## [1] " MI "
## [2] " 14598900 / R: 1553 ->1663 "
## [3] "N:2 "
## [4] "B "
## [5] "W "
## [6] "B "
## [7] "W "
## [8] "B "
## [9] "W "
## [10] "B "
## [11] ""
##
## [[5]]
## [1] " 3 "
## [2] " ADITYA BAJAJ "
## [3] "6.0 "
## [4] "L 8"
## [5] "W 61"
## [6] "W 25"
## [7] "W 21"
## [8] "W 11"
## [9] "W 13"
## [10] "W 12"
## [11] ""
##
## [[6]]
## [1] " MI "
## [2] " 14959604 / R: 1384 ->1640 "
## [3] "N:2 "
## [4] "W "
## [5] "B "
## [6] "W "
## [7] "B "
## [8] "W "
## [9] "B "
## [10] "W "
## [11] ""
##
## [[7]]
## [1] " 4 "
## [2] " PATRICK H SCHILLING "
## [3] "5.5 "
## [4] "W 23"
## [5] "D 28"
## [6] "W 2"
## [7] "W 26"
## [8] "D 5"
## [9] "W 19"
## [10] "D 1"
## [11] ""
##
## [[8]]
## [1] " MI "
## [2] " 12616049 / R: 1716 ->1744 "
## [3] "N:2 "
## [4] "W "
## [5] "B "
## [6] "W "
## [7] "B "
## [8] "W "
## [9] "B "
## [10] "B "
## [11] ""
##
## [[9]]
## [1] " 5 "
## [2] " HANSHI ZUO "
## [3] "5.5 "
## [4] "W 45"
## [5] "W 37"
## [6] "D 12"
## [7] "D 13"
## [8] "D 4"
## [9] "W 14"
## [10] "W 17"
## [11] ""
##
## [[10]]
## [1] " MI "
## [2] " 14601533 / R: 1655 ->1690 "
## [3] "N:2 "
## [4] "B "
## [5] "W "
## [6] "B "
## [7] "W "
## [8] "B "
## [9] "W "
## [10] "B "
## [11] ""
##
## [[11]]
## [1] " 6 "
## [2] " HANSEN SONG "
## [3] "5.0 "
## [4] "W 34"
## [5] "D 29"
## [6] "L 11"
## [7] "W 35"
## [8] "D 10"
## [9] "W 27"
## [10] "W 21"
## [11] ""
##
## [[12]]
## [1] " OH "
## [2] " 15055204 / R: 1686 ->1687 "
## [3] "N:3 "
## [4] "W "
## [5] "B "
## [6] "W "
## [7] "B "
## [8] "B "
## [9] "W "
## [10] "B "
## [11] ""
##
## [[13]]
## [1] " 7 "
## [2] " GARY DEE SWATHELL "
## [3] "5.0 "
## [4] "W 57"
## [5] "W 46"
## [6] "W 13"
## [7] "W 11"
## [8] "L 1"
## [9] "W 9"
## [10] "L 2"
## [11] ""
##
## [[14]]
## [1] " MI "
## [2] " 11146376 / R: 1649 ->1673 "
## [3] "N:3 "
## [4] "W "
## [5] "B "
## [6] "W "
## [7] "B "
## [8] "B "
## [9] "W "
## [10] "W "
## [11] ""
##
## [[15]]
## [1] " 8 "
## [2] " EZEKIEL HOUGHTON "
## [3] "5.0 "
## [4] "W 3"
## [5] "W 32"
## [6] "L 14"
## [7] "L 9"
## [8] "W 47"
## [9] "W 28"
## [10] "W 19"
## [11] ""
##
## [[16]]
## [1] " MI "
## [2] " 15142253 / R: 1641P17->1657P24 "
## [3] "N:3 "
## [4] "B "
## [5] "W "
## [6] "B "
## [7] "W "
## [8] "B "
## [9] "W "
## [10] "W "
## [11] ""
##
## [[17]]
## [1] " 9 "
## [2] " STEFANO LEE "
## [3] "5.0 "
## [4] "W 25"
## [5] "L 18"
## [6] "W 59"
## [7] "W 8"
## [8] "W 26"
## [9] "L 7"
## [10] "W 20"
## [11] ""
##
## [[18]]
## [1] " ON "
## [2] " 14954524 / R: 1411 ->1564 "
## [3] "N:2 "
## [4] "W "
## [5] "B "
## [6] "W "
## [7] "B "
## [8] "W "
## [9] "B "
## [10] "B "
## [11] ""
##
## [[19]]
## [1] " 10 "
## [2] " ANVIT RAO "
## [3] "5.0 "
## [4] "D 16"
## [5] "L 19"
## [6] "W 55"
## [7] "W 31"
## [8] "D 6"
## [9] "W 25"
## [10] "W 18"
## [11] ""
##
## [[20]]
## [1] " MI "
## [2] " 14150362 / R: 1365 ->1544 "
## [3] "N:3 "
## [4] "W "
## [5] "W "
## [6] "B "
## [7] "B "
## [8] "W "
## [9] "B "
## [10] "W "
## [11] ""
##
## [[21]]
## [1] " 11 "
## [2] " CAMERON WILLIAM MC LEMAN "
## [3] "4.5 "
## [4] "D 38"
## [5] "W 56"
## [6] "W 6"
## [7] "L 7"
## [8] "L 3"
## [9] "W 34"
## [10] "W 26"
## [11] ""
##
## [[22]]
## [1] " MI "
## [2] " 12581589 / R: 1712 ->1696 "
## [3] "N:3 "
## [4] "B "
## [5] "W "
## [6] "B "
## [7] "W "
## [8] "B "
## [9] "W "
## [10] "B "
## [11] ""
##
## [[23]]
## [1] " 12 "
## [2] " KENNETH J TACK "
## [3] "4.5 "
## [4] "W 42"
## [5] "W 33"
## [6] "D 5"
## [7] "W 38"
## [8] "H "
## [9] "D 1"
## [10] "L 3"
## [11] ""
##
## [[24]]
## [1] " MI "
## [2] " 12681257 / R: 1663 ->1670 "
## [3] "N:3 "
## [4] "W "
## [5] "B "
## [6] "W "
## [7] "B "
## [8] " "
## [9] "W "
## [10] "B "
## [11] ""
##
## [[25]]
## [1] " 13 "
## [2] " TORRANCE HENRY JR "
## [3] "4.5 "
## [4] "W 36"
## [5] "W 27"
## [6] "L 7"
## [7] "D 5"
## [8] "W 33"
## [9] "L 3"
## [10] "W 32"
## [11] ""
##
## [[26]]
## [1] " MI "
## [2] " 15082995 / R: 1666 ->1662 "
## [3] "N:3 "
## [4] "B "
## [5] "W "
## [6] "B "
## [7] "B "
## [8] "W "
## [9] "W "
## [10] "B "
## [11] ""
##
## [[27]]
## [1] " 14 "
## [2] " BRADLEY SHAW "
## [3] "4.5 "
## [4] "W 54"
## [5] "W 44"
## [6] "W 8"
## [7] "L 1"
## [8] "D 27"
## [9] "L 5"
## [10] "W 31"
## [11] ""
##
## [[28]]
## [1] " MI "
## [2] " 10131499 / R: 1610 ->1618 "
## [3] "N:3 "
## [4] "W "
## [5] "B "
## [6] "W "
## [7] "W "
## [8] "B "
## [9] "B "
## [10] "W "
## [11] ""
##
## [[29]]
## [1] " 15 "
## [2] " ZACHARY JAMES HOUGHTON "
## [3] "4.5 "
## [4] "D 19"
## [5] "L 16"
## [6] "W 30"
## [7] "L 22"
## [8] "W 54"
## [9] "W 33"
## [10] "W 38"
## [11] ""
##
## [[30]]
## [1] " MI "
## [2] " 15619130 / R: 1220P13->1416P20 "
## [3] "N:3 "
## [4] "B "
## [5] "B "
## [6] "W "
## [7] "W "
## [8] "B "
## [9] "B "
## [10] "W "
## [11] ""
##
## [[31]]
## [1] " 16 "
## [2] " MIKE NIKITIN "
## [3] "4.0 "
## [4] "D 10"
## [5] "W 15"
## [6] "H "
## [7] "W 39"
## [8] "L 2"
## [9] "W 36"
## [10] "U "
## [11] ""
##
## [[32]]
## [1] " MI "
## [2] " 10295068 / R: 1604 ->1613 "
## [3] "N:3 "
## [4] "B "
## [5] "W "
## [6] " "
## [7] "B "
## [8] "W "
## [9] "B "
## [10] " "
## [11] ""
##
## [[33]]
## [1] " 17 "
## [2] " RONALD GRZEGORCZYK "
## [3] "4.0 "
## [4] "W 48"
## [5] "W 41"
## [6] "L 26"
## [7] "L 2"
## [8] "W 23"
## [9] "W 22"
## [10] "L 5"
## [11] ""
##
## [[34]]
## [1] " MI "
## [2] " 10297702 / R: 1629 ->1610 "
## [3] "N:3 "
## [4] "W "
## [5] "B "
## [6] "W "
## [7] "B "
## [8] "W "
## [9] "B "
## [10] "W "
## [11] ""
##
## [[35]]
## [1] " 18 "
## [2] " DAVID SUNDEEN "
## [3] "4.0 "
## [4] "W 47"
## [5] "W 9"
## [6] "L 1"
## [7] "W 32"
## [8] "L 19"
## [9] "W 38"
## [10] "L 10"
## [11] ""
##
## [[36]]
## [1] " MI "
## [2] " 11342094 / R: 1600 ->1600 "
## [3] "N:3 "
## [4] "B "
## [5] "W "
## [6] "B "
## [7] "W "
## [8] "B "
## [9] "W "
## [10] "B "
## [11] ""
##
## [[37]]
## [1] " 19 "
## [2] " DIPANKAR ROY "
## [3] "4.0 "
## [4] "D 15"
## [5] "W 10"
## [6] "W 52"
## [7] "D 28"
## [8] "W 18"
## [9] "L 4"
## [10] "L 8"
## [11] ""
##
## [[38]]
## [1] " MI "
## [2] " 14862333 / R: 1564 ->1570 "
## [3] "N:3 "
## [4] "W "
## [5] "B "
## [6] "W "
## [7] "B "
## [8] "W "
## [9] "W "
## [10] "B "
## [11] ""
##
## [[39]]
## [1] " 20 "
## [2] " JASON ZHENG "
## [3] "4.0 "
## [4] "L 40"
## [5] "W 49"
## [6] "W 23"
## [7] "W 41"
## [8] "W 28"
## [9] "L 2"
## [10] "L 9"
## [11] ""
##
## [[40]]
## [1] " MI "
## [2] " 14529060 / R: 1595 ->1569 "
## [3] "N:4 "
## [4] "W "
## [5] "B "
## [6] "W "
## [7] "B "
## [8] "W "
## [9] "B "
## [10] "W "
## [11] ""
##
## [[41]]
## [1] " 21 "
## [2] " DINH DANG BUI "
## [3] "4.0 "
## [4] "W 43"
## [5] "L 1"
## [6] "W 47"
## [7] "L 3"
## [8] "W 40"
## [9] "W 39"
## [10] "L 6"
## [11] ""
##
## [[42]]
## [1] " ON "
## [2] " 15495066 / R: 1563P22->1562 "
## [3] "N:3 "
## [4] "B "
## [5] "W "
## [6] "B "
## [7] "W "
## [8] "W "
## [9] "B "
## [10] "W "
## [11] ""
##
## [[43]]
## [1] " 22 "
## [2] " EUGENE L MCCLURE "
## [3] "4.0 "
## [4] "W 64"
## [5] "D 52"
## [6] "L 28"
## [7] "W 15"
## [8] "H "
## [9] "L 17"
## [10] "W 40"
## [11] ""
##
## [[44]]
## [1] " MI "
## [2] " 12405534 / R: 1555 ->1529 "
## [3] "N:4 "
## [4] "W "
## [5] "B "
## [6] "W "
## [7] "B "
## [8] " "
## [9] "W "
## [10] "B "
## [11] ""
##
## [[45]]
## [1] " 23 "
## [2] " ALAN BUI "
## [3] "4.0 "
## [4] "L 4"
## [5] "W 43"
## [6] "L 20"
## [7] "W 58"
## [8] "L 17"
## [9] "W 37"
## [10] "W 46"
## [11] ""
##
## [[46]]
## [1] " ON "
## [2] " 15030142 / R: 1363 ->1371 "
## [3] " "
## [4] "B "
## [5] "W "
## [6] "B "
## [7] "W "
## [8] "B "
## [9] "W "
## [10] "B "
## [11] ""
##
## [[47]]
## [1] " 24 "
## [2] " MICHAEL R ALDRICH "
## [3] "4.0 "
## [4] "L 28"
## [5] "L 47"
## [6] "W 43"
## [7] "L 25"
## [8] "W 60"
## [9] "W 44"
## [10] "W 39"
## [11] ""
##
## [[48]]
## [1] " MI "
## [2] " 13469010 / R: 1229 ->1300 "
## [3] "N:4 "
## [4] "B "
## [5] "W "
## [6] "B "
## [7] "B "
## [8] "W "
## [9] "W "
## [10] "B "
## [11] ""
##
## [[49]]
## [1] " 25 "
## [2] " LOREN SCHWIEBERT "
## [3] "3.5 "
## [4] "L 9"
## [5] "W 53"
## [6] "L 3"
## [7] "W 24"
## [8] "D 34"
## [9] "L 10"
## [10] "W 47"
## [11] ""
##
## [[50]]
## [1] " MI "
## [2] " 12486656 / R: 1745 ->1681 "
## [3] "N:4 "
## [4] "B "
## [5] "W "
## [6] "B "
## [7] "W "
## [8] "B "
## [9] "W "
## [10] "B "
## [11] ""
##
## [[51]]
## [1] " 26 "
## [2] " MAX ZHU "
## [3] "3.5 "
## [4] "W 49"
## [5] "W 40"
## [6] "W 17"
## [7] "L 4"
## [8] "L 9"
## [9] "D 32"
## [10] "L 11"
## [11] ""
##
## [[52]]
## [1] " ON "
## [2] " 15131520 / R: 1579 ->1564 "
## [3] "N:4 "
## [4] "B "
## [5] "W "
## [6] "B "
## [7] "W "
## [8] "B "
## [9] "W "
## [10] "W "
## [11] ""
##
## [[53]]
## [1] " 27 "
## [2] " GAURAV GIDWANI "
## [3] "3.5 "
## [4] "W 51"
## [5] "L 13"
## [6] "W 46"
## [7] "W 37"
## [8] "D 14"
## [9] "L 6"
## [10] "U "
## [11] ""
##
## [[54]]
## [1] " MI "
## [2] " 14476567 / R: 1552 ->1539 "
## [3] "N:4 "
## [4] "W "
## [5] "B "
## [6] "W "
## [7] "B "
## [8] "W "
## [9] "B "
## [10] " "
## [11] ""
##
## [[55]]
## [1] " 28 "
## [2] " SOFIA ADINA STANESCU-BELLU "
## [3] "3.5 "
## [4] "W 24"
## [5] "D 4"
## [6] "W 22"
## [7] "D 19"
## [8] "L 20"
## [9] "L 8"
## [10] "D 36"
## [11] ""
##
## [[56]]
## [1] " MI "
## [2] " 14882954 / R: 1507 ->1513 "
## [3] "N:3 "
## [4] "W "
## [5] "W "
## [6] "B "
## [7] "W "
## [8] "B "
## [9] "B "
## [10] "W "
## [11] ""
##
## [[57]]
## [1] " 29 "
## [2] " CHIEDOZIE OKORIE "
## [3] "3.5 "
## [4] "W 50"
## [5] "D 6"
## [6] "L 38"
## [7] "L 34"
## [8] "W 52"
## [9] "W 48"
## [10] "U "
## [11] ""
##
## [[58]]
## [1] " MI "
## [2] " 15323285 / R: 1602P6 ->1508P12 "
## [3] "N:4 "
## [4] "B "
## [5] "W "
## [6] "B "
## [7] "W "
## [8] "W "
## [9] "B "
## [10] " "
## [11] ""
##
## [[59]]
## [1] " 30 "
## [2] " GEORGE AVERY JONES "
## [3] "3.5 "
## [4] "L 52"
## [5] "D 64"
## [6] "L 15"
## [7] "W 55"
## [8] "L 31"
## [9] "W 61"
## [10] "W 50"
## [11] ""
##
## [[60]]
## [1] " ON "
## [2] " 12577178 / R: 1522 ->1444 "
## [3] " "
## [4] "W "
## [5] "B "
## [6] "B "
## [7] "W "
## [8] "W "
## [9] "B "
## [10] "B "
## [11] ""
##
## [[61]]
## [1] " 31 "
## [2] " RISHI SHETTY "
## [3] "3.5 "
## [4] "L 58"
## [5] "D 55"
## [6] "W 64"
## [7] "L 10"
## [8] "W 30"
## [9] "W 50"
## [10] "L 14"
## [11] ""
##
## [[62]]
## [1] " MI "
## [2] " 15131618 / R: 1494 ->1444 "
## [3] " "
## [4] "B "
## [5] "W "
## [6] "B "
## [7] "W "
## [8] "B "
## [9] "W "
## [10] "B "
## [11] ""
##
## [[63]]
## [1] " 32 "
## [2] " JOSHUA PHILIP MATHEWS "
## [3] "3.5 "
## [4] "W 61"
## [5] "L 8"
## [6] "W 44"
## [7] "L 18"
## [8] "W 51"
## [9] "D 26"
## [10] "L 13"
## [11] ""
##
## [[64]]
## [1] " ON "
## [2] " 14073750 / R: 1441 ->1433 "
## [3] "N:4 "
## [4] "W "
## [5] "B "
## [6] "W "
## [7] "B "
## [8] "W "
## [9] "B "
## [10] "W "
## [11] ""
##
## [[65]]
## [1] " 33 "
## [2] " JADE GE "
## [3] "3.5 "
## [4] "W 60"
## [5] "L 12"
## [6] "W 50"
## [7] "D 36"
## [8] "L 13"
## [9] "L 15"
## [10] "W 51"
## [11] ""
##
## [[66]]
## [1] " MI "
## [2] " 14691842 / R: 1449 ->1421 "
## [3] " "
## [4] "B "
## [5] "W "
## [6] "B "
## [7] "W "
## [8] "B "
## [9] "W "
## [10] "B "
## [11] ""
##
## [[67]]
## [1] " 34 "
## [2] " MICHAEL JEFFERY THOMAS "
## [3] "3.5 "
## [4] "L 6"
## [5] "W 60"
## [6] "L 37"
## [7] "W 29"
## [8] "D 25"
## [9] "L 11"
## [10] "W 52"
## [11] ""
##
## [[68]]
## [1] " MI "
## [2] " 15051807 / R: 1399 ->1400 "
## [3] " "
## [4] "B "
## [5] "W "
## [6] "B "
## [7] "B "
## [8] "W "
## [9] "B "
## [10] "W "
## [11] ""
##
## [[69]]
## [1] " 35 "
## [2] " JOSHUA DAVID LEE "
## [3] "3.5 "
## [4] "L 46"
## [5] "L 38"
## [6] "W 56"
## [7] "L 6"
## [8] "W 57"
## [9] "D 52"
## [10] "W 48"
## [11] ""
##
## [[70]]
## [1] " MI "
## [2] " 14601397 / R: 1438 ->1392 "
## [3] " "
## [4] "W "
## [5] "W "
## [6] "B "
## [7] "W "
## [8] "B "
## [9] "B "
## [10] "W "
## [11] ""
##
## [[71]]
## [1] " 36 "
## [2] " SIDDHARTH JHA "
## [3] "3.5 "
## [4] "L 13"
## [5] "W 57"
## [6] "W 51"
## [7] "D 33"
## [8] "H "
## [9] "L 16"
## [10] "D 28"
## [11] ""
##
## [[72]]
## [1] " MI "
## [2] " 14773163 / R: 1355 ->1367 "
## [3] "N:4 "
## [4] "W "
## [5] "B "
## [6] "W "
## [7] "B "
## [8] " "
## [9] "W "
## [10] "B "
## [11] ""
##
## [[73]]
## [1] " 37 "
## [2] " AMIYATOSH PWNANANDAM "
## [3] "3.5 "
## [4] "B "
## [5] "L 5"
## [6] "W 34"
## [7] "L 27"
## [8] "H "
## [9] "L 23"
## [10] "W 61"
## [11] ""
##
## [[74]]
## [1] " MI "
## [2] " 15489571 / R: 980P12->1077P17 "
## [3] " "
## [4] " "
## [5] "B "
## [6] "W "
## [7] "W "
## [8] " "
## [9] "B "
## [10] "W "
## [11] ""
##
## [[75]]
## [1] " 38 "
## [2] " BRIAN LIU "
## [3] "3.0 "
## [4] "D 11"
## [5] "W 35"
## [6] "W 29"
## [7] "L 12"
## [8] "H "
## [9] "L 18"
## [10] "L 15"
## [11] ""
##
## [[76]]
## [1] " MI "
## [2] " 15108523 / R: 1423 ->1439 "
## [3] "N:4 "
## [4] "W "
## [5] "B "
## [6] "W "
## [7] "W "
## [8] " "
## [9] "B "
## [10] "B "
## [11] ""
##
## [[77]]
## [1] " 39 "
## [2] " JOEL R HENDON "
## [3] "3.0 "
## [4] "L 1"
## [5] "W 54"
## [6] "W 40"
## [7] "L 16"
## [8] "W 44"
## [9] "L 21"
## [10] "L 24"
## [11] ""
##
## [[78]]
## [1] " MI "
## [2] " 12923035 / R: 1436P23->1413 "
## [3] "N:4 "
## [4] "B "
## [5] "W "
## [6] "B "
## [7] "W "
## [8] "B "
## [9] "W "
## [10] "W "
## [11] ""
##
## [[79]]
## [1] " 40 "
## [2] " FOREST ZHANG "
## [3] "3.0 "
## [4] "W 20"
## [5] "L 26"
## [6] "L 39"
## [7] "W 59"
## [8] "L 21"
## [9] "W 56"
## [10] "L 22"
## [11] ""
##
## [[80]]
## [1] " MI "
## [2] " 14892710 / R: 1348 ->1346 "
## [3] " "
## [4] "B "
## [5] "B "
## [6] "W "
## [7] "W "
## [8] "B "
## [9] "W "
## [10] "W "
## [11] ""
##
## [[81]]
## [1] " 41 "
## [2] " KYLE WILLIAM MURPHY "
## [3] "3.0 "
## [4] "W 59"
## [5] "L 17"
## [6] "W 58"
## [7] "L 20"
## [8] "X "
## [9] "U "
## [10] "U "
## [11] ""
##
## [[82]]
## [1] " MI "
## [2] " 15761443 / R: 1403P5 ->1341P9 "
## [3] " "
## [4] "B "
## [5] "W "
## [6] "B "
## [7] "W "
## [8] " "
## [9] " "
## [10] " "
## [11] ""
##
## [[83]]
## [1] " 42 "
## [2] " JARED GE "
## [3] "3.0 "
## [4] "L 12"
## [5] "L 50"
## [6] "L 57"
## [7] "D 60"
## [8] "D 61"
## [9] "W 64"
## [10] "W 56"
## [11] ""
##
## [[84]]
## [1] " MI "
## [2] " 14462326 / R: 1332 ->1256 "
## [3] " "
## [4] "B "
## [5] "W "
## [6] "B "
## [7] "B "
## [8] "W "
## [9] "W "
## [10] "B "
## [11] ""
##
## [[85]]
## [1] " 43 "
## [2] " ROBERT GLEN VASEY "
## [3] "3.0 "
## [4] "L 21"
## [5] "L 23"
## [6] "L 24"
## [7] "W 63"
## [8] "W 59"
## [9] "L 46"
## [10] "W 55"
## [11] ""
##
## [[86]]
## [1] " MI "
## [2] " 14101068 / R: 1283 ->1244 "
## [3] " "
## [4] "W "
## [5] "B "
## [6] "W "
## [7] "W "
## [8] "B "
## [9] "B "
## [10] "W "
## [11] ""
##
## [[87]]
## [1] " 44 "
## [2] " JUSTIN D SCHILLING "
## [3] "3.0 "
## [4] "B "
## [5] "L 14"
## [6] "L 32"
## [7] "W 53"
## [8] "L 39"
## [9] "L 24"
## [10] "W 59"
## [11] ""
##
## [[88]]
## [1] " MI "
## [2] " 15323504 / R: 1199 ->1199 "
## [3] " "
## [4] " "
## [5] "W "
## [6] "B "
## [7] "B "
## [8] "W "
## [9] "B "
## [10] "W "
## [11] ""
##
## [[89]]
## [1] " 45 "
## [2] " DEREK YAN "
## [3] "3.0 "
## [4] "L 5"
## [5] "L 51"
## [6] "D 60"
## [7] "L 56"
## [8] "W 63"
## [9] "D 55"
## [10] "W 58"
## [11] ""
##
## [[90]]
## [1] " MI "
## [2] " 15372807 / R: 1242 ->1191 "
## [3] " "
## [4] "W "
## [5] "B "
## [6] "W "
## [7] "B "
## [8] "W "
## [9] "B "
## [10] "W "
## [11] ""
##
## [[91]]
## [1] " 46 "
## [2] " JACOB ALEXANDER LAVALLEY "
## [3] "3.0 "
## [4] "W 35"
## [5] "L 7"
## [6] "L 27"
## [7] "L 50"
## [8] "W 64"
## [9] "W 43"
## [10] "L 23"
## [11] ""
##
## [[92]]
## [1] " MI "
## [2] " 15490981 / R: 377P3 ->1076P10 "
## [3] " "
## [4] "B "
## [5] "W "
## [6] "B "
## [7] "W "
## [8] "B "
## [9] "W "
## [10] "W "
## [11] ""
##
## [[93]]
## [1] " 47 "
## [2] " ERIC WRIGHT "
## [3] "2.5 "
## [4] "L 18"
## [5] "W 24"
## [6] "L 21"
## [7] "W 61"
## [8] "L 8"
## [9] "D 51"
## [10] "L 25"
## [11] ""
##
## [[94]]
## [1] " MI "
## [2] " 12533115 / R: 1362 ->1341 "
## [3] " "
## [4] "W "
## [5] "B "
## [6] "W "
## [7] "B "
## [8] "W "
## [9] "B "
## [10] "W "
## [11] ""
##
## [[95]]
## [1] " 48 "
## [2] " DANIEL KHAIN "
## [3] "2.5 "
## [4] "L 17"
## [5] "W 63"
## [6] "H "
## [7] "D 52"
## [8] "H "
## [9] "L 29"
## [10] "L 35"
## [11] ""
##
## [[96]]
## [1] " MI "
## [2] " 14369165 / R: 1382 ->1335 "
## [3] " "
## [4] "B "
## [5] "W "
## [6] " "
## [7] "B "
## [8] " "
## [9] "W "
## [10] "B "
## [11] ""
##
## [[97]]
## [1] " 49 "
## [2] " MICHAEL J MARTIN "
## [3] "2.5 "
## [4] "L 26"
## [5] "L 20"
## [6] "D 63"
## [7] "D 64"
## [8] "W 58"
## [9] "H "
## [10] "U "
## [11] ""
##
## [[98]]
## [1] " MI "
## [2] " 12531685 / R: 1291P12->1259P17 "
## [3] " "
## [4] "W "
## [5] "W "
## [6] "B "
## [7] "W "
## [8] "B "
## [9] " "
## [10] " "
## [11] ""
##
## [[99]]
## [1] " 50 "
## [2] " SHIVAM JHA "
## [3] "2.5 "
## [4] "L 29"
## [5] "W 42"
## [6] "L 33"
## [7] "W 46"
## [8] "H "
## [9] "L 31"
## [10] "L 30"
## [11] ""
##
## [[100]]
## [1] " MI "
## [2] " 14773178 / R: 1056 ->1111 "
## [3] " "
## [4] "W "
## [5] "B "
## [6] "W "
## [7] "B "
## [8] " "
## [9] "B "
## [10] "W "
## [11] ""
##
## [[101]]
## [1] " 51 "
## [2] " TEJAS AYYAGARI "
## [3] "2.5 "
## [4] "L 27"
## [5] "W 45"
## [6] "L 36"
## [7] "W 57"
## [8] "L 32"
## [9] "D 47"
## [10] "L 33"
## [11] ""
##
## [[102]]
## [1] " MI "
## [2] " 15205474 / R: 1011 ->1097 "
## [3] " "
## [4] "B "
## [5] "W "
## [6] "B "
## [7] "W "
## [8] "B "
## [9] "W "
## [10] "W "
## [11] ""
##
## [[103]]
## [1] " 52 "
## [2] " ETHAN GUO "
## [3] "2.5 "
## [4] "W 30"
## [5] "D 22"
## [6] "L 19"
## [7] "D 48"
## [8] "L 29"
## [9] "D 35"
## [10] "L 34"
## [11] ""
##
## [[104]]
## [1] " MI "
## [2] " 14918803 / R: 935 ->1092 "
## [3] "N:4 "
## [4] "B "
## [5] "W "
## [6] "B "
## [7] "W "
## [8] "B "
## [9] "W "
## [10] "B "
## [11] ""
##
## [[105]]
## [1] " 53 "
## [2] " JOSE C YBARRA "
## [3] "2.0 "
## [4] "H "
## [5] "L 25"
## [6] "H "
## [7] "L 44"
## [8] "U "
## [9] "W 57"
## [10] "U "
## [11] ""
##
## [[106]]
## [1] " MI "
## [2] " 12578849 / R: 1393 ->1359 "
## [3] " "
## [4] " "
## [5] "B "
## [6] " "
## [7] "W "
## [8] " "
## [9] "W "
## [10] " "
## [11] ""
##
## [[107]]
## [1] " 54 "
## [2] " LARRY HODGE "
## [3] "2.0 "
## [4] "L 14"
## [5] "L 39"
## [6] "L 61"
## [7] "B "
## [8] "L 15"
## [9] "L 59"
## [10] "W 64"
## [11] ""
##
## [[108]]
## [1] " MI "
## [2] " 12836773 / R: 1270 ->1200 "
## [3] " "
## [4] "B "
## [5] "B "
## [6] "W "
## [7] " "
## [8] "W "
## [9] "B "
## [10] "W "
## [11] ""
##
## [[109]]
## [1] " 55 "
## [2] " ALEX KONG "
## [3] "2.0 "
## [4] "L 62"
## [5] "D 31"
## [6] "L 10"
## [7] "L 30"
## [8] "B "
## [9] "D 45"
## [10] "L 43"
## [11] ""
##
## [[110]]
## [1] " MI "
## [2] " 15412571 / R: 1186 ->1163 "
## [3] " "
## [4] "W "
## [5] "B "
## [6] "W "
## [7] "B "
## [8] " "
## [9] "W "
## [10] "B "
## [11] ""
##
## [[111]]
## [1] " 56 "
## [2] " MARISA RICCI "
## [3] "2.0 "
## [4] "H "
## [5] "L 11"
## [6] "L 35"
## [7] "W 45"
## [8] "H "
## [9] "L 40"
## [10] "L 42"
## [11] ""
##
## [[112]]
## [1] " MI "
## [2] " 14679887 / R: 1153 ->1140 "
## [3] " "
## [4] " "
## [5] "B "
## [6] "W "
## [7] "W "
## [8] " "
## [9] "B "
## [10] "W "
## [11] ""
##
## [[113]]
## [1] " 57 "
## [2] " MICHAEL LU "
## [3] "2.0 "
## [4] "L 7"
## [5] "L 36"
## [6] "W 42"
## [7] "L 51"
## [8] "L 35"
## [9] "L 53"
## [10] "B "
## [11] ""
##
## [[114]]
## [1] " MI "
## [2] " 15113330 / R: 1092 ->1079 "
## [3] " "
## [4] "B "
## [5] "W "
## [6] "W "
## [7] "B "
## [8] "W "
## [9] "B "
## [10] " "
## [11] ""
##
## [[115]]
## [1] " 58 "
## [2] " VIRAJ MOHILE "
## [3] "2.0 "
## [4] "W 31"
## [5] "L 2"
## [6] "L 41"
## [7] "L 23"
## [8] "L 49"
## [9] "B "
## [10] "L 45"
## [11] ""
##
## [[116]]
## [1] " MI "
## [2] " 14700365 / R: 917 -> 941 "
## [3] " "
## [4] "W "
## [5] "B "
## [6] "W "
## [7] "B "
## [8] "W "
## [9] " "
## [10] "B "
## [11] ""
##
## [[117]]
## [1] " 59 "
## [2] " SEAN M MC CORMICK "
## [3] "2.0 "
## [4] "L 41"
## [5] "B "
## [6] "L 9"
## [7] "L 40"
## [8] "L 43"
## [9] "W 54"
## [10] "L 44"
## [11] ""
##
## [[118]]
## [1] " MI "
## [2] " 12841036 / R: 853 -> 878 "
## [3] " "
## [4] "W "
## [5] " "
## [6] "B "
## [7] "B "
## [8] "W "
## [9] "W "
## [10] "B "
## [11] ""
##
## [[119]]
## [1] " 60 "
## [2] " JULIA SHEN "
## [3] "1.5 "
## [4] "L 33"
## [5] "L 34"
## [6] "D 45"
## [7] "D 42"
## [8] "L 24"
## [9] "H "
## [10] "U "
## [11] ""
##
## [[120]]
## [1] " MI "
## [2] " 14579262 / R: 967 -> 984 "
## [3] " "
## [4] "W "
## [5] "B "
## [6] "B "
## [7] "W "
## [8] "B "
## [9] " "
## [10] " "
## [11] ""
##
## [[121]]
## [1] " 61 "
## [2] " JEZZEL FARKAS "
## [3] "1.5 "
## [4] "L 32"
## [5] "L 3"
## [6] "W 54"
## [7] "L 47"
## [8] "D 42"
## [9] "L 30"
## [10] "L 37"
## [11] ""
##
## [[122]]
## [1] " ON "
## [2] " 15771592 / R: 955P11-> 979P18 "
## [3] " "
## [4] "B "
## [5] "W "
## [6] "B "
## [7] "W "
## [8] "B "
## [9] "W "
## [10] "B "
## [11] ""
##
## [[123]]
## [1] " 62 "
## [2] " ASHWIN BALAJI "
## [3] "1.0 "
## [4] "W 55"
## [5] "U "
## [6] "U "
## [7] "U "
## [8] "U "
## [9] "U "
## [10] "U "
## [11] ""
##
## [[124]]
## [1] " MI "
## [2] " 15219542 / R: 1530 ->1535 "
## [3] " "
## [4] "B "
## [5] " "
## [6] " "
## [7] " "
## [8] " "
## [9] " "
## [10] " "
## [11] ""
##
## [[125]]
## [1] " 63 "
## [2] " THOMAS JOSEPH HOSMER "
## [3] "1.0 "
## [4] "L 2"
## [5] "L 48"
## [6] "D 49"
## [7] "L 43"
## [8] "L 45"
## [9] "H "
## [10] "U "
## [11] ""
##
## [[126]]
## [1] " MI "
## [2] " 15057092 / R: 1175 ->1125 "
## [3] " "
## [4] "W "
## [5] "B "
## [6] "W "
## [7] "B "
## [8] "B "
## [9] " "
## [10] " "
## [11] ""
##
## [[127]]
## [1] " 64 "
## [2] " BEN LI "
## [3] "1.0 "
## [4] "L 22"
## [5] "D 30"
## [6] "L 31"
## [7] "D 49"
## [8] "L 46"
## [9] "L 42"
## [10] "L 54"
## [11] ""
##
## [[128]]
## [1] " MI "
## [2] " 15006561 / R: 1163 ->1112 "
## [3] " "
## [4] "B "
## [5] "W "
## [6] "W "
## [7] "B "
## [8] "W "
## [9] "B "
## [10] "B "
## [11] ""Extract the name
ext_data<-str_extract_all(textdata1,"[[:alpha:][:blank:][:alpha:]-?]{3,}")
names_loc<-str_detect(unlist(ext_data),"[[:alpha:]]{3,}")
names<-unlist(ext_data)[names_loc]
names## [1] " GARY HUA "
## [2] " DAKSHESH DARURI "
## [3] " ADITYA BAJAJ "
## [4] " PATRICK H SCHILLING "
## [5] " HANSHI ZUO "
## [6] " HANSEN SONG "
## [7] " GARY DEE SWATHELL "
## [8] " EZEKIEL HOUGHTON "
## [9] " STEFANO LEE "
## [10] " ANVIT RAO "
## [11] " CAMERON WILLIAM MC LEMAN "
## [12] " KENNETH J TACK "
## [13] " TORRANCE HENRY JR "
## [14] " BRADLEY SHAW "
## [15] " ZACHARY JAMES HOUGHTON "
## [16] " MIKE NIKITIN "
## [17] " RONALD GRZEGORCZYK "
## [18] " DAVID SUNDEEN "
## [19] " DIPANKAR ROY "
## [20] " JASON ZHENG "
## [21] " DINH DANG BUI "
## [22] " EUGENE L MCCLURE "
## [23] " ALAN BUI "
## [24] " MICHAEL R ALDRICH "
## [25] " LOREN SCHWIEBERT "
## [26] " MAX ZHU "
## [27] " GAURAV GIDWANI "
## [28] " SOFIA ADINA STANESCU-BELLU "
## [29] " CHIEDOZIE OKORIE "
## [30] " GEORGE AVERY JONES "
## [31] " RISHI SHETTY "
## [32] " JOSHUA PHILIP MATHEWS "
## [33] " JADE GE "
## [34] " MICHAEL JEFFERY THOMAS "
## [35] " JOSHUA DAVID LEE "
## [36] " SIDDHARTH JHA "
## [37] " AMIYATOSH PWNANANDAM "
## [38] " BRIAN LIU "
## [39] " JOEL R HENDON "
## [40] " FOREST ZHANG "
## [41] " KYLE WILLIAM MURPHY "
## [42] " JARED GE "
## [43] " ROBERT GLEN VASEY "
## [44] " JUSTIN D SCHILLING "
## [45] " DEREK YAN "
## [46] " JACOB ALEXANDER LAVALLEY "
## [47] " ERIC WRIGHT "
## [48] " DANIEL KHAIN "
## [49] " MICHAEL J MARTIN "
## [50] " SHIVAM JHA "
## [51] " TEJAS AYYAGARI "
## [52] " ETHAN GUO "
## [53] " JOSE C YBARRA "
## [54] " LARRY HODGE "
## [55] " ALEX KONG "
## [56] " MARISA RICCI "
## [57] " MICHAEL LU "
## [58] " VIRAJ MOHILE "
## [59] " SEAN M MC CORMICK "
## [60] " JULIA SHEN "
## [61] " JEZZEL FARKAS "
## [62] " ASHWIN BALAJI "
## [63] " THOMAS JOSEPH HOSMER "
## [64] " BEN LI "Extract the state
state_location<-str_detect(unlist(ext_data),"[[:alpha:]]{2}")
state<-unlist(ext_data)[(state_location)&(!names_loc)]
state## [1] " ON " " MI " " MI " " MI " " MI " " OH " " MI "
## [8] " MI " " ON " " MI " " MI " " MI " " MI " " MI "
## [15] " MI " " MI " " MI " " MI " " MI " " MI " " ON "
## [22] " MI " " ON " " MI " " MI " " ON " " MI " " MI "
## [29] " MI " " ON " " MI " " ON " " MI " " MI " " MI "
## [36] " MI " " MI " " MI " " MI " " MI " " MI " " MI "
## [43] " MI " " MI " " MI " " MI " " MI " " MI " " MI "
## [50] " MI " " MI " " MI " " MI " " MI " " MI " " MI "
## [57] " MI " " MI " " MI " " MI " " ON " " MI " " MI "
## [64] " MI "Extract the point
num_data<-str_extract_all(textdata1,"\\d\\.\\d")
point_loc<-str_detect(unlist(num_data),"\\d\\.\\d")
pts<-unlist(num_data)[(point_loc)]
pts## [1] "6.0" "6.0" "6.0" "5.5" "5.5" "5.0" "5.0" "5.0" "5.0" "5.0" "4.5"
## [12] "4.5" "4.5" "4.5" "4.5" "4.0" "4.0" "4.0" "4.0" "4.0" "4.0" "4.0"
## [23] "4.0" "4.0" "3.5" "3.5" "3.5" "3.5" "3.5" "3.5" "3.5" "3.5" "3.5"
## [34] "3.5" "3.5" "3.5" "3.5" "3.0" "3.0" "3.0" "3.0" "3.0" "3.0" "3.0"
## [45] "3.0" "3.0" "2.5" "2.5" "2.5" "2.5" "2.5" "2.5" "2.0" "2.0" "2.0"
## [56] "2.0" "2.0" "2.0" "2.0" "1.5" "1.5" "1.0" "1.0" "1.0"Extract the Pre-rating
rtg_data<-str_extract_all(textdata1,"(( \\:)|(\\>))?.?\\d{1,}P*\\.?")
pre_loc<-str_detect(unlist(rtg_data),"\\b\\d{3,4}P?\\b")
post_loc<-str_detect(unlist(rtg_data),"\\>.?\\b\\d{3,4}P?\\b")
pre_rating<-unlist(rtg_data)[(pre_loc)&(!post_loc)]
pre_rating<-str_replace_all(pre_rating,"P","")
pre_rating## [1] " 1794" " 1553" " 1384" " 1716" " 1655" " 1686" " 1649" " 1641"
## [9] " 1411" " 1365" " 1712" " 1663" " 1666" " 1610" " 1220" " 1604"
## [17] " 1629" " 1600" " 1564" " 1595" " 1563" " 1555" " 1363" " 1229"
## [25] " 1745" " 1579" " 1552" " 1507" " 1602" " 1522" " 1494" " 1441"
## [33] " 1449" " 1399" " 1438" " 1355" " 980" " 1423" " 1436" " 1348"
## [41] " 1403" " 1332" " 1283" " 1199" " 1242" " 377" " 1362" " 1382"
## [49] " 1291" " 1056" " 1011" " 935" " 1393" " 1270" " 1186" " 1153"
## [57] " 1092" " 917" " 853" " 967" " 955" " 1530" " 1175" " 1163"Calculate the Opponent
pre_rating <- str_replace_all(str_trim(unlist(str_extract_all(unlist(data1), "R: [[:digit:] ]*"))), "R: ", "")
x <- str_sub(unlist(data1), start = 48, end = 89)[c(seq(1, length(unlist(data1)), by = 3))]
opp_rating <- str_extract_all(x, "( |\\d){4}")
opp_rating <- as.numeric(unlist(opp_rating))
opp_rating <- as.numeric(pre_rating[opp_rating])
opp_rating_mtx <- matrix(opp_rating, nrow=7, ncol=64)
opp_rating_avg <- colMeans(opp_rating_mtx, na.rm=T)
opp_rating_avg## [1] NaN NaN NaN NaN NaN NaN NaN NaN NaN NaN NaN NaN NaN NaN NaN NaN NaN
## [18] NaN NaN NaN NaN NaN NaN NaN NaN NaN NaN NaN NaN NaN NaN NaN NaN NaN
## [35] NaN NaN NaN NaN NaN NaN NaN NaN NaN NaN NaN NaN NaN NaN NaN NaN NaN
## [52] NaN NaN NaN NaN NaN NaN NaN NaN NaN NaN NaN NaN NaNrating <- data.frame(names, state, pts, pre_rating, opp_rating_avg)
rating## names state pts pre_rating opp_rating_avg
## 1 GARY HUA ON 6.0 1794 NaN
## 2 DAKSHESH DARURI MI 6.0 1553 NaN
## 3 ADITYA BAJAJ MI 6.0 1384 NaN
## 4 PATRICK H SCHILLING MI 5.5 1716 NaN
## 5 HANSHI ZUO MI 5.5 1655 NaN
## 6 HANSEN SONG OH 5.0 1686 NaN
## 7 GARY DEE SWATHELL MI 5.0 1649 NaN
## 8 EZEKIEL HOUGHTON MI 5.0 1641 NaN
## 9 STEFANO LEE ON 5.0 1411 NaN
## 10 ANVIT RAO MI 5.0 1365 NaN
## 11 CAMERON WILLIAM MC LEMAN MI 4.5 1712 NaN
## 12 KENNETH J TACK MI 4.5 1663 NaN
## 13 TORRANCE HENRY JR MI 4.5 1666 NaN
## 14 BRADLEY SHAW MI 4.5 1610 NaN
## 15 ZACHARY JAMES HOUGHTON MI 4.5 1220 NaN
## 16 MIKE NIKITIN MI 4.0 1604 NaN
## 17 RONALD GRZEGORCZYK MI 4.0 1629 NaN
## 18 DAVID SUNDEEN MI 4.0 1600 NaN
## 19 DIPANKAR ROY MI 4.0 1564 NaN
## 20 JASON ZHENG MI 4.0 1595 NaN
## 21 DINH DANG BUI ON 4.0 1563 NaN
## 22 EUGENE L MCCLURE MI 4.0 1555 NaN
## 23 ALAN BUI ON 4.0 1363 NaN
## 24 MICHAEL R ALDRICH MI 4.0 1229 NaN
## 25 LOREN SCHWIEBERT MI 3.5 1745 NaN
## 26 MAX ZHU ON 3.5 1579 NaN
## 27 GAURAV GIDWANI MI 3.5 1552 NaN
## 28 SOFIA ADINA STANESCU-BELLU MI 3.5 1507 NaN
## 29 CHIEDOZIE OKORIE MI 3.5 1602 NaN
## 30 GEORGE AVERY JONES ON 3.5 1522 NaN
## 31 RISHI SHETTY MI 3.5 1494 NaN
## 32 JOSHUA PHILIP MATHEWS ON 3.5 1441 NaN
## 33 JADE GE MI 3.5 1449 NaN
## 34 MICHAEL JEFFERY THOMAS MI 3.5 1399 NaN
## 35 JOSHUA DAVID LEE MI 3.5 1438 NaN
## 36 SIDDHARTH JHA MI 3.5 1355 NaN
## 37 AMIYATOSH PWNANANDAM MI 3.5 980 NaN
## 38 BRIAN LIU MI 3.0 1423 NaN
## 39 JOEL R HENDON MI 3.0 1436 NaN
## 40 FOREST ZHANG MI 3.0 1348 NaN
## 41 KYLE WILLIAM MURPHY MI 3.0 1403 NaN
## 42 JARED GE MI 3.0 1332 NaN
## 43 ROBERT GLEN VASEY MI 3.0 1283 NaN
## 44 JUSTIN D SCHILLING MI 3.0 1199 NaN
## 45 DEREK YAN MI 3.0 1242 NaN
## 46 JACOB ALEXANDER LAVALLEY MI 3.0 377 NaN
## 47 ERIC WRIGHT MI 2.5 1362 NaN
## 48 DANIEL KHAIN MI 2.5 1382 NaN
## 49 MICHAEL J MARTIN MI 2.5 1291 NaN
## 50 SHIVAM JHA MI 2.5 1056 NaN
## 51 TEJAS AYYAGARI MI 2.5 1011 NaN
## 52 ETHAN GUO MI 2.5 935 NaN
## 53 JOSE C YBARRA MI 2.0 1393 NaN
## 54 LARRY HODGE MI 2.0 1270 NaN
## 55 ALEX KONG MI 2.0 1186 NaN
## 56 MARISA RICCI MI 2.0 1153 NaN
## 57 MICHAEL LU MI 2.0 1092 NaN
## 58 VIRAJ MOHILE MI 2.0 917 NaN
## 59 SEAN M MC CORMICK MI 2.0 853 NaN
## 60 JULIA SHEN MI 1.5 967 NaN
## 61 JEZZEL FARKAS ON 1.5 955 NaN
## 62 ASHWIN BALAJI MI 1.0 1530 NaN
## 63 THOMAS JOSEPH HOSMER MI 1.0 1175 NaN
## 64 BEN LI MI 1.0 1163 NaNwrite.table(rank, file = "rating.csv", sep = ",", row.names = FALSE)