Comment each function in R