Code I've wrote for my R programming course at CSU East Bay