I am having a hard time pulling the last column of data for analysis.
BlockData <- read.csv(file.choose(),header=T,sep="\t")
This is a sample the data (I have added the column header c1, c2 and c3):
c1,c2,c3
20170918 045759;50.44;1
20170918 045805;50.44;1
20170918 045820;50.44;1