从R中的github下载压缩的csv

Question

我必须缺少一些简单的东西，但是我似乎无法在R中创建调用以从我的github中提取此压缩的csv

这是我尝试过的：

library(tidyverse)
library(curl)

test <- read_csv(url('https://github.com/Jeffery-777/NBA-PBP-Scrape/blob/master/nba_pbp_96_97.csv.gz'))

它拉出一列随机内容，我什至不知道是什么。在创建代码以将数据正确提取到R环境中的任何帮助将不胜感激。