1.
c_to_f <- function(temp){
	# converts the temperature from celsius to farenheit
	return(temp * 9/5 + 32)
}

2.
length_normalize <- function(v){
	# normalize all the values in v by the sum of the
	# values in the vector
	return(v/sum(v))
}