AT1R-tutorial.R