Mimics old sample_stats table

Source: R/db-and-table-functions.R

This function needs to be removed and the code that relies on sample_stats_tbl be updated.

sample_stats_tbl(x)