पुनर्व्यवस्थित एक मेज के dataframe, के विपरीत "पिघल"

Question

मैं इस तरह विशाल dataframe है:

SN = c(1:100, 1:100, 1:100, 1:100) 
class = c(rep("A1", 100), rep("B2", 100), rep("C3", 100), rep("D4", 100)) # total 6000 levels 
myvar = rnorm(400) 
mydf = data.frame(SN, class, myvar) 

मैं चाहता हूँ करने के लिए भरा में एकल स्तंभ और myVar के रूप में प्रत्येक स्तर के साथ एक तालिका में "unmelt":

SN   A1   B2   C3   D4  .............and so on for all 6000 

मैं इसे कैसे प्राप्त कर सकता हूं, मुझे पता है कि यह आसान सवाल है, लेकिन मुझे पता नहीं लगा सका।

Answer 1

> dcast(mydf, SN ~ class) 

    SN   A1   B2   C3   D4 
1 1 0.1461258 0.8325014 0.33562088 -0.07294576 
2 2 0.5964182 0.4593710 -0.23652803 -1.52539568 
3 3 2.0247742 -1.1235963 1.79875447 -1.87462227 
4 4 0.8184004 1.3486721 0.76076486 -1.18311991 
5 5 -0.6577212 0.3666741 -0.06057506 1.38825487 
6 6 0.1590443 0.2043661 0.08161778 0.10421797 
... 

Answer 2

molten = melt(mydf , id.vars = c("SN" , "class") , measure.vars = "myvar") 
casted = dcast(molten , SN~class) 

Answer 3

आधार आर में आप इसे इस तरह कर सकता है ...

# get it sorted so that all you need to do is make a matrix out of it 
mydf <- mydf[order(mydf$class, mydf$SN),] 
# save the unique values of SN 
SNu <- unique(mydf$SN) 
# combine a matrix with SN 
mydfw <- data.frame(SNu, matrix(mydf$myvar, nrow = length(SNu))) 
# name your columns  
colnames(mydfw) <- c('SN', levels(mydf$class)) 

या, अधिक संक्षिप्त अभिव्यक्ति के लिए split साथ कुल

aggregate(myvar~SN, mydf, 'c') 
# column names don't come out great 
colnames(mydfw) <- c('SN', levels(mydf$class)) 

Answer 4

एक और दृष्टिकोण का उपयोग कर:

mydfSplit <- split(mydf[,-2], mydf$class, drop=TRUE) 

परिणाम एक सूची है जो आसानी से एक data.frame में बदला जा सकता घटक है, तो है ही आयाम (जो इस उदाहरण में सच है):

mydf2 <- do.call(cbind, mydfSplit) 

इस समाधान के साथ समस्या यह है कि के नाम है अंतिम परिणाम की सफाई की जरूरत है। हालांकि, अधिक सामान्य डेटा के लिए, यह उपयोगी हो सकता है यदि SN प्रत्येक वर्ग के लिए अलग है।