r - 関数で機能する na.rm=TRUE を取得できません

Question

関数の作成とテストを練習しています。次の関数を作成しましたが、na.rm=TRUE を指定しようとすると、NA が削除されません。

my.mean <- function(x, na.rm) {
 stopifnot(is.numeric(x))
 answer <- sum(x)/length(x)
 return(answer)
}

私のテストベクトルは

t <- c(12,14,NA,1)

結果

my.mean(t, na.rm = TRUE)
[1] NA

答えが得られない理由がわかりません 9. 指定してみました

na.rm = FALSE

元の関数ではありませんが、そうする必要はないことを知っています。

何か案は？

ありがとうございました。

PS平均はRIの組み込み関数であることは知っていますが、練習しているだけです。また、それは私の他の書かれた機能でも起こっています。