Transponieren von Datensatz

Question

My-Datensatz sieht wie folgt aus:

A B C B E 
1 144 119 120 52 
2 102 44 97 40 
3 128 81 88 39 

Jetzt habe ich den Datensatz in folgendem Format umsetzen wollen:

A Vars Values 
1 B  43 
2 B  78 
3 B  110 
1 C  46 
2 C  49 
3 C  130 
1 B  39 
2 B  86 
3 B  143 
1 E  59 
2 E  134 
3 E  49 

Aber wenn ich mit dem folgenden Code, einer der Die doppelte Variable kommt nicht in das Dataset.

Ich kann die doppelte Variable "B" vor dem Transponieren nicht umbenennen, da die Position von B dynamisch ist. Z.B. Es könnte 2 oder 3 oder mehr Variablen vor "B" geben. Also, jedes Mal, wenn man den Ort von "B" findet, ist das Umbenennen und anschließende Transponieren etwas hektisch.

Kann mir bitte jemand helfen, das Problem zu lösen?

Vielen Dank!

Answer 1

Das ist nicht schön, aber es funktioniert:

data.frame(A=df$A, Vars=rep(names(df)[-1], each=nrow(df)), Values=c(as.matrix(df[-1]))) 

oder:

data.frame(A=df$A, Vars=rep(names(df)[-1], each=nrow(df)), Values=stack(df[-1])[[1]]) 

verwendet Daten:

df <- read.table(header=TRUE, check.names=FALSE, text= 
"A B C B E 
1 144 119 120 52 
2 102 44 97 40 
3 128 81 88 39") 

Answer 2

Wie wäre es so etwas wie,

data.frame(df1$A, stack(df1[,-1])) 
# df1.A values ind 
#1  1 144 B 
#2  2 102 B 
#3  3 128 B 
#4  1 119 C 
#5  2  44 C 
#6  3  81 C 
#7  1 120 B.1 
#8  2  97 B.1 
#9  3  88 B.1 
#10  1  52 E 
#11  2  40 E 
#12  3  39 E