read txt.gz file

I am sorry it cant works there are error :

A <- Data[, 3]
Error in [.data.frame(Data, , 3) : undefined columns selected

when I try REPR oducible EX ample (reprex)

head(Data)
V1
1 Lat, Lon, HourlyPrecipRate, HourlyPrecipRateGC
2 54.95, 0.05, 0.00, 0.00
3 54.85, 0.05, 0.00, 0.00
4 54.75, 0.05, 0.00, 0.00
5 54.65, 0.05, 0.00, 0.00
6 54.55, 0.05, 0.00, 0.00

head(Data)
V1
1 Lat, Lon, HourlyPrecipRate, HourlyPrecipRateGC
2 54.95, 0.05, 0.00, 0.00
3 54.85, 0.05, 0.00, 0.00
4 54.75, 0.05, 0.00, 0.00
5 54.65, 0.05, 0.00, 0.00
6 54.55, 0.05, 0.00, 0.00

when I try 2 column,it still cant get the data :

head(Data, 5)[, c('HourlyPrecipRate', 'HourlyPrecipRateGC')]
Error in [.data.frame(head(Data, 5), , c("HourlyPrecipRate", "HourlyPrecipRateGC")) :
undefined columns selected