2014-06-06 15 views
5

में मैं 3 चरित्र चरसमूह द्वारा डेटा फ्रेम के सभी सांख्यिक स्तंभ को संक्षेप में आर

catvars <- c("DATE", "COUNTRY_FULL_NAME", "TENOR") 

डेटा फ्रेम के बाकी 20 सांख्यिक चर के होते हैं द्वारा परिभाषित अद्वितीय समूहों है कि एक डेटा फ्रेम है (करने के लिए इसे संघनक नीचे दिए गए नमूना)

numvars <- c("X1", "Y1, "Z1") 

मैं हर संख्यात्मक चर के लिए मतलब के साथ एक नया डेटा फ्रेम बनाने के लिए कोशिश कर रहा हूँ में 3 समूह

द्वारा की गणना करता है एक एकल चर के लिए, मैं plyr पैकेज से ddply उपयोग कर सकते हैं:

DFsum <- ddply(DF, catvars, summarize, X1mean = mean(X, na.rm=TRUE)) 

लेकिन मैं समझ नहीं कैसे इस ddply आदेश को संशोधित करने के सभी संख्यात्मक चर शामिल करने के लिए। कोई सुझाव? धन्यवाद

उत्तर

6

मुझे लगता है कि आप numcolwise देख रहे हैं?

ddply(diamonds,.(cut),numcolwise(mean,na.rm = TRUE)) 
     cut  carat depth table price  x  y  z 
1  Fair 1.0461366 64.04168 59.05379 4358.758 6.246894 6.182652 3.982770 
2  Good 0.8491847 62.36588 58.69464 3928.864 5.838785 5.850744 3.639507 
3 Very Good 0.8063814 61.81828 57.95615 3981.760 5.740696 5.770026 3.559801 
4 Premium 0.8919549 61.26467 58.74610 4584.258 5.973887 5.944879 3.647124 
5  Ideal 0.7028370 61.70940 55.95167 3457.542 5.507451 5.520080 3.401448 
+0

बहुत बहुत धन्यवाद - यह काम करता है। क्या वे संख्यात्मक चर निर्दिष्ट करने का कोई तरीका है जिसे मैं शामिल करना चाहता हूं? – ec0n0micus

+0

@ ec0n0micus 'colwise' और '.cols' तर्क देखें; लेकिन इस तरह आपको स्तंभों को मैन्युअल रूप से निर्दिष्ट करना होगा या प्रत्येक को शामिल करने के लिए परीक्षण करने के लिए अपना स्वयं का फ़ंक्शन लिखना होगा। – joran

संबंधित मुद्दे