Create functions_fortopGOAnalysis.r