次のようなテーブルがあります。
あくまでもサンプルです！次のように読みます。
a1 は状態 fl と nc に存在します。
a2 は、状態 fl および nc に存在し、そのため、1 つおよびこれまでです。
州の名前を列 (fl、nc など) として使用し
、a1、a2 を行として使用してテーブルを作成しました。
a1 が fl に存在する場合、1 があり、それ以外の場合は 0 です。
最後に、0 と 1 の表を作成します。
次のコードを使用して作成しました。
st <- levels(data$X2)[-1] # to get the names of the states
v <- as.character(unlist(data[1,][-1])) # to get the names of the states where a1 is present. Here fl and nc.
as.integer(st %in% v) # Compare st and vt and we give one if we have an element in st which is equal to an element in v
data_rs <- t(apply(data, 1, function(v) as.integer(st %in% as.character(unlist(v)))))
問題は、MCA (パッケージ factorminer) を実行すると、次のエラー メッセージが表示されることです。
Error in xj[i] : only 0's may be mixed with negative subscripts
私の説明が明確だったことを願っています。
ありがとう