次の表があります。
X Y
A 4 8
B 2 6
C 5 4
D 6 3
E 9 13
しかし、これを次のように再配置したいと思います。
AX AY BX BY CX CY......
4 8 2 6 5 4
私はRで作業しており、次のようにしてテーブルを取得しています
table(db[,1],db[,2])
コマンドを変更して目的の出力を取得するにはどうすればよいですか?
次の表があります。
X Y
A 4 8
B 2 6
C 5 4
D 6 3
E 9 13
しかし、これを次のように再配置したいと思います。
AX AY BX BY CX CY......
4 8 2 6 5 4
私はRで作業しており、次のようにしてテーブルを取得しています
table(db[,1],db[,2])
コマンドを変更して目的の出力を取得するにはどうすればよいですか?
名前を気にせず、数値データがある場合、最も簡単な解決策は、次のように行列に強制し、次にベクトルに強制することです。
as.vector( t( x ) )
# [1] 4 8 2 6 5 4 6 3 9 13
名前も保持したい場合は、 を使用expand.grid
して組み合わせを取得します...
# The data
y <- as.vector( t( x ) )
# Combinations of row and column names
nms <- expand.grid( colnames(x) , rownames(x) )
# Rename vector with desired names
names(y) <- paste0( nms[,2] , nms[,1] )
#AX AY BX BY CX CY DX DY EX EY
# 4 8 2 6 5 4 6 3 9 13