Added First Functions R source file - columnmeans function with NA removal