[解決済み] cbind warnings : 行名が短い変数から見つかり、破棄されました。

質問

以下のようなcbindのコードがあるのですが、毎回警告メッセージが出ます。 この警告を解決する方法はあるのでしょうか？

dateset = subset(all_data[,c("VAR1","VAR2","VAR3","VAR4","VAR5","RATE1","RATE2","RATE3")])
dateset = cbind(dateset[c(1,2,3,4,5)],stack(dateset[,-c(1,2,3,4,5)]))

警告:

Warning message:
   In data.frame(..., check.names = FALSE) :
        row names were found from a short variable and have been discarded

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

どのように解決するのですか？

あなたの data.frame は row.names :

A <- data.frame(a = c("A", "B", "C"), 
                b = c(1, 2, 3), 
                c = c(4, 5, 6), 
                row.names=c("A", "B", "C"))

cbind(A[1], stack(A[-1]))
#   a values ind
# 1 A      1   b
# 2 B      2   b
# 3 C      3   b
# 4 A      4   c
# 5 B      5   c
# 6 C      6   c
# Warning message:
# In data.frame(..., check.names = FALSE) :
#   row names were found from a short variable and have been discarded

ここで起こっていることは、デフォルトでは、重複した row.names の中に data.frame を複製するようにRに指示することはありません。 row.names 最初の列を、積み重ねた列と同じ数の行に再利用するとき、R は単に row.names .

同じような data.frame しかし row.names :

B <- data.frame(a = c("A", "B", "C"), 
                b = c(1, 2, 3), 
                c = c(4, 5, 6))

cbind(B[1], stack(B[-1]))
#   a values ind
# 1 A      1   b
# 2 B      2   b
# 3 C      3   b
# 4 A      4   c
# 5 B      5   c
# 6 C      6   c

または row.names = NULL の中で cbind ステートメントを使用します。

cbind(A[1], stack(A[-1]), row.names = NULL)
#   a values ind
# 1 A      1   b
# 2 B      2   b
# 3 C      3   b
# 4 A      4   c
# 5 B      5   c
# 6 C      6   c

もし、あなたのオリジナルの row.names が重要な場合、それらを一緒に追加し直すこともできます。

cbind(rn = rownames(A), A[1], stack(A[-1]), row.names = NULL)
#   rn a values ind
# 1  A A      1   b
# 2  B B      2   b
# 3  C C      3   b
# 4  A A      4   c
# 5  B B      5   c
# 6  C C      6   c