In [6]:
library(data.table)
ungrouped_data <- fread("../data/Beetles.dat", )
grouped_data <- fread("../data/Beetles2.dat", )

In [ ]:
readta

In [ ]: