R schmelzen Unterkategorien

Question

Ich versuche, eine Tabelle (CSV) mit Unterkategorien zu schmelzen, aber aus irgendeinem Grund nicht das gewünschte Ergebnis mit melt.array bekommen

ich habe:

Region,Sender,Afghanistan,,,, 
,,Adult,,Minor,, 
,,Male ,Female,Male,Female, 
EEA,Austria,165,8,6,10, 
.... 

Notwendigkeit:

Reg Send Rec   Age Gender Value 
EEA Austria Afghanistan Adult Male 165 
EEA Austria Afghanistan Adult Female 8 
EEA Austria Afghanistan Adult Male 6 
EEA Austria Afghanistan Adult Female 10 
.... 

und wäre sehr dankbar für einige Hilfe!

Answer 1

nicht eine sehr elegante Art und Weise haben aufgrund der Struktur, aber Zoo :: na.locf könnte sein, was Sie für

library(zoo) 
data <- structure(list(V1 = structure(c(3L, 1L, 1L, 2L), .Label = c("", 
                    "EEA", "Region"), class = "factor"), V2 = structure(c(3L, 1L, 
                                  1L, 2L), .Label = c("", "Austria", "Sender"), class = "factor"), 
         V3 = structure(c(3L, 2L, 4L, 1L), .Label = c("165", "Adult", 
                    "Afghanistan", "Male "), class = "factor"), V4 = structure(c(1L, 
                                   1L, 3L, 2L), .Label = c("", "8", "Female"), class = "factor"), 
         V5 = structure(c(1L, 4L, 3L, 2L), .Label = c("", "6", "Male", 
                    "Minor"), class = "factor"), V6 = structure(c(1L, 1L, 3L, 
                                2L), .Label = c("", "10", "Female"), class = "factor")), .Names = c("V1", 

data[1:3,][data[1:3,]==""] <- NA 
data <- na.locf(zoo(data), fromLast=F) 
df <- cbind(as.character(data$V1[4]), as.character(temp$V2[4]), 
      data.frame(na.locf(zoo(t(data)), fromLast=F)[-(1:2),])) 
setNames(df, c("Reg","Send","Rec","Age","Gender", "Value"))