R - Sorting and Sub-setting Maximum Values within Columns -

-

i trying iteratively sort data within columns extract n maximum values.

my data set first , second columns containing occupation titles , codes, , of rest of columns containing comparative values (in case location quotients had calculated each city) occupations various cities:

    *occ_code  city1  ...   city300*      occ1      5      ...    7      occ2      20     ...   22      .         .       .     .      .         .       .     .      occ800    20     ...   25

for each city want sort maximum values, select subset of maximum values matched respective occupations titles , titles. thought relatively trivial but...

edit clarification: want end sorted subset of data analysis.

     occ_code   city1      occ200     10      occ90      8      occ20      2      occ95      1.5

at same time want able repeat sort column-wise (so i've tried lots of order commands through calling columns directly: data[,2]; able run same analysis functions on entire dataset.

i've been messing plyr past 3 days , feel setup of dataset not conducive how plyer meant used.

i'm not sure desired output according example snippit. here's how data frame every city using plyr , reshape

#using same df nico's answer library(reshape) df.m <- melt(df, id = 1) a.cities <- cast(df.m, codes ~ . | variable)  library(plyr) a.cities.max <- aaply(a.cities, 1, function(x) arrange(x, desc(`(all)`))[1:4,])

now, a.cities.max array of data frames, 4 largest values each city in each data frame. 1 of these data frames, can index with

a.cities.max$x13

i don't know you'll doing data, might want in data frame format.

df.cities.max <- adply(a.cities.max, 1)

Comments

Post a Comment

Popular posts from this blog

c++ - How do I get a multi line tooltip in MFC -

-
right now, have tool tip pops when hover on edit box. problem tool tip contains multiple error messages , in 1 long line. need have each error message on own line. error messages contained in cstring new line seperating them. my existing code below. bool ontooltiptext(uint, nmhdr* pnmhdr, lresult* presult) { assert(pnmhdr->code == ttn_needtexta || pnmhdr->code == ttn_needtextw); // need handle both ansi , unicode versions of message tooltiptexta* pttta = (tooltiptexta*)pnmhdr; tooltiptextw* ptttw = (tooltiptextw*)pnmhdr; // tchar szfulltext[256]; cstring strtiptext=_t(""); uint nid = pnmhdr->idfrom; if (pnmhdr->code == ttn_needtexta && (pttta->uflags & ttf_idishwnd) || pnmhdr->code == ttn_needtextw && (ptttw->uflags & ttf_idishwnd)) { // idfrom hwnd of tool nid = ::getdlgctrlid((hwnd)nid); } //m_errprojaccel[ch] contains 1 or more error messages each...
Read more

asp.net - In javascript how to find the height and width -

-
i having .aspx , masterpage page. in masterpage loading aspx page . in aspx page design using generating table structure using code-behind server in javascript how find height , width . regards, kumar if you're looking table height , width, should it var tbl = document.getelementbyid('tbldemo'); alert(tbl.offsetwidth + '\n' + tbl.offsetheight);
Read more

c# - DataTable to EnumerableRowCollection -

-
i have datatable according client requirement can contain invalid date "00/00/1999",null,empty string.(typed datset) when collect them enumerables wish convert of invalid forms empty string. (i.e) enumerablerowcollection<datarow> query = order in _table.asenumerable() select new { orderdate= string.isnullorempty(convert.tostring(order.field<datetime>("orderdate")) || (how check date invalid date) ? string.empty : order.field<datetime>("orderdate") } how check whether date valid date or not? datetime.tryparse...like given current code: datetime date; enumerablerowcollection<datarow> query = order in _table.asenumerable() select new { orderdate= string.isnullorempty(convert.tostring(order.field<datetime>("orderdate")) || !datetime.tryparse(convert.tostring(order.field<datetime...
Read more