Davi Serrano daviosa

daviosa / regression_dalgaard.r

Created August 16, 2013 12:24 — forked from rpietro/regression_dalgaard.r

	# regression models from dalgaard

	library("ISwR")
	?thuesen
	thuesen
	attach(thuesen)
	lm(short.velocity~blood.glucose)
	summary(lm(short.velocity~blood.glucose)) #the median should not be far from zero, and the minimum and maximum should be roughly equal in absolute value
	plot(blood.glucose,short.velocity)
	abline(lm(short.velocity~blood.glucose))

daviosa / data_management.r

Created August 14, 2013 12:05 — forked from rpietro/data_management.r

	# reading data into R: http://goo.gl/bAUmj

	library("ISwR")

	#factors

	pain <- c(0,3,2,2,1)
	fpain <- factor(pain,levels=0:3)
	levels(fpain) <- c("none","mild","medium","severe")
	fpain

daviosa / dalgaard.r

Created August 13, 2013 12:31 — forked from rpietro/dalgaard.r