[解決済み] エラー： 'na.rm' が FALSE の場合、欠損値および NaN は許可されません。

質問

r4dsの複数のモデルの章を試したところ、最後にエラーメッセージが表示されました。

エラー：'na.rm' が FALSE の場合、欠損値および NaN は許可されません。 さらに 警告メッセージです。 In ns(as.numeric(Month), 4) : NAs introduced by coercion.

と

ADA_model<- function(ADA_mutiple_model){
   lm(ADA ~ ns(as.numeric(Month), 4), data=ADA_mutiple_model)
}

ADA_mutiple_model <- ADA_mutiple_model %>% 
     mutate(model=map(data,ADA_model)) 

を、エラーを発生させるコードとして使用しました。

関数がどのようなものかは、以下のmod3を参照してください。

解決方法は？

の使用とは関係ありません。 lm の中にある。 splines::ns 自然立方スプラインのBスプライン基底を生成するとき。 おそらく Month は文字変数 を使用することはできません。 as.numeric を強制することができます。

添付の図、確認しました。プロットのX軸は、私が推測したことを検証しています。には1:12を使用する必要があります。 Month JAN", "FEB" などではなく、"JAN" "です。