Update useful_epi_functions.R

Added lincom function.