How to remove automated text in function?

Question

I am new to functions, and trying to learn

Let us say that I have

norm <- function(z){

  n = as.numeric(table(is.na(z))[1])
  m = mean(z, na.rm=T)
  st