[解決済み】警告メッセージ。In `...` : invalid factor level, NA generated 警告メッセージ：...`は無効な因子レベルです。

質問

以下のようなコードを実行すると、警告が表示されます。  invalid factor level, NA generated .

> fixed <- data.frame("Type" = character(3), "Amount" = numeric(3))
> fixed[1, ] <- c("lunch", 100)
Warning message:
In `[<-.factor`(`*tmp*`, iseq, value = "lunch") :
  invalid factor level, NA generated
> fixed
  Type Amount
1 <NA>    100
2           0
3           0

解決方法は？

警告メッセージは、変数 "Type" が要因として作成され、"lunch" が定義されたレベルでなかったためです。この場合 stringsAsFactors = FALSE フラグを使用してデータフレームを作成し、強制的に文字にします。

> fixed <- data.frame("Type" = character(3), "Amount" = numeric(3))
> str(fixed)
'data.frame':   3 obs. of  2 variables:
 $ Type  : Factor w/ 1 level "": NA 1 1
 $ Amount: chr  "100" "0" "0"
> 
> fixed <- data.frame("Type" = character(3), "Amount" = numeric(3),stringsAsFactors=FALSE)
> fixed[1, ] <- c("lunch", 100)
> str(fixed)
'data.frame':   3 obs. of  2 variables:
 $ Type  : chr  "lunch" "" ""
 $ Amount: chr  "100" "0" "0"