MartinMacharia

MartinMacharia / Linear_models.R

Last active October 1, 2015 10:05 — forked from mages/Linear_models.R

	# Markus Gesmann
	library(arm) # for 'display' function only
	icecream <- data.frame(
	# http://www.statcrunch.com/5.0/viewreport.php?reportid=34965&groupid=1848
	temp=c(11.9, 14.2, 15.2, 16.4, 17.2, 18.1,
	18.5, 19.4, 22.1, 22.6, 23.4, 25.1),
	units=c(185L, 215L, 332L, 325L, 408L, 421L,
	406L, 412L, 522L, 445L, 544L, 614L)
	)
	basicPlot <- function(...){