You can use fread() function of data.table library to read a gzip tsv file.
library(data.table)v = fread(filename, sep="\t")
If the file has header, you can try the following code:
library(data.table)v = fread(filename, sep="\t", header=TRUE)