lines = 'Game Winner_Team Winner_League Winner_Score QB_is_MVP Network_Share Year Loser_Team Loser_League Loser_Score Network I Green_Bay NFL 35 1 79 1967 Kansas_City AFL 10 CBS_N_NBC II Green_Bay NFL 33 1 68 1968 Oakland AFL 14 CBS III NY_Jets AFL 16 1 71 1969 Baltimore NFL 7 NBC IV Kansas_City AFL 23 1 69 1970 Minnesota NFL 7 CBS V Baltimore AFC 16 0 75 1971 Dallas NFC 13 NBC VI Dallas NFC 24 1 74 1972 Miami AFC 3 CBS VII Miami AFC 14 0 72 1973 Washington NFC 7 NBC VIII Miami AFC 24 0 73 1974 Minnesota NFC 7 CBS IX Pittsburgh AFC 16 0 72 1975 Minnesota NFC 6 NBC X Pittsburgh AFC 21 0 78 1976 Dallas NFC 17 CBS XI Oakland AFC 32 0 73 1977 Minnesota NFC 14 NBC XII Dallas NFC 27 0 67 1978 Denver AFC 10 CBS XIII Pittsburgh AFC 35 1 74 1979 Dallas NFC 31 NBC XIV Pittsburgh AFC 31 1 67 1980 Los_Angeles AFC 19 CBS XV Oakland AFC 27 1 63 1981 Philadelphia NFC 10 NBC XVI San_Francisco NFC 26 1 73 1982 Cincinnati AFC 21 CBS XVII Washington NFC 27 0 69 1983 Miami AFC 17 NBC XVIII LA_Raiders AFC 38 0 71 1984 Washington NFC 9 CBS XIX San_Francisco NFC 38 1 63 1985 Miami AFC 16 ABC XX Chicago NFC 46 0 70 1986 New_England AFC 10 NBC XXI NY_Giants NFC 39 1 66 1987 Denver AFC 20 CBS XXII Washington NFC 42 1 62 1988 Denver AFC 10 ABC XXIII San_Francisco NFC 20 0 68 1989 Cincinnati AFC 16 NBC XXIV San_Francisco NFC 55 1 63 1990 Denver AFC 10 CBS' con = textConnection( lines ) DF = read.table( con, header=TRUE ) close(con)