Before After Control Impact studies in R