R: Sort Across/Horizontally

Question

I have a table that looks like this:

V1 V2 V3 V4
E
O  W  I
F  A  Z  C
S  D  K  L

I want sort across/horizontally so that it looks like this:

V1 V2 V3 V4
E
I  O  W
A  C  F  Z
D  K  L  S

I tried using sort and order, but I can only get it to sort vertically or reorder entire columns. Is it possible to sort horizontally for individual row?

Thanks.

Note: I don't see the similarities between my question and "Sort data by row". The solution is not even the same.

Shouldn't it be `I O W` in the second row? – Rich Scriven Dec 25 '14 at 05:09 — Rich Scriven, Dec 25 '14 at 05:09

akrun · Accepted Answer · 2014-12-25T05:15:57.000

3

You can try

df[] <- t(apply(df,1,function(x) c(sort(x[x!='']), x[x==''])))
df
#  V1 V2 V3 V4
#1  E         
#2  I  O  W   
#3  A  C  F  Z
#4  D  K  L  S

It may be also better to have missing elements as NA instead of ''

df[df==''] <- NA
df[] <- t(apply(df, 1, function(x) x[order(x)]))
df[is.na(df)] <- '' #if needed

data

df <- structure(list(V1 = c("E", "O", "F", "S"), V2 = c("", "W", "A", 
"D"), V3 = c("", "I", "Z", "K"), V4 = c("", "", "C", "L")), .Names = c("V1", 
"V2", "V3", "V4"), class = "data.frame", row.names = c(NA, -4L))

edited Dec 25 '14 at 05:15

answered Dec 25 '14 at 05:08

akrun

874,273
37
540
662

@AvinashRaj, these are the column names as per the data provided by the OPs. – David Arenburg Dec 25 '14 at 08:28
@AvinashRaj This is the output of `dput`. He didn't write it by hand. Create a data set and then use `dput(df)` – David Arenburg Dec 25 '14 at 08:31

R: Sort Across/Horizontally

1 Answers1

data

Linked