9

我有以下数据框，我想按第五列（“距离”）排序。当我尝试`

df.order <- df[order(df[, 5]), ]

我总是收到以下错误消息。

Error in order(df[, 5]) : unimplemented type 'list' in 'orderVector1'`

我不知道为什么 R 将我的数据框视为列表。运行is.data.frame(df)返回TRUE。我不得不承认，is.list(df)也有回报TRUE。是否可以强制我的数据框只是一个数据框而不是列表？谢谢你的帮助。

structure(list(ID = list(1, 2, 3, 4, 5, 6, 7, 8, 9, 10), 
               Latitude = list(50.7368, 50.7368, 50.7368, 50.7369, 50.7369, 50.737, 50.737, 50.7371, 50.7371, 50.7371), 
               Longitude = list(6.0873, 6.0873, 6.0873, 6.0872, 6.0872, 6.0872, 6.0872, 6.0872, 6.0872, 6.0872), 
               Elevation = list(269.26, 268.99, 268.73, 268.69, 268.14, 267.87, 267.61, 267.31, 267.21, 267.02), 
               Distance = list(119.4396, 119.4396, 119.4396, 121.199, 121.199, 117.5658, 117.5658, 114.9003, 114.9003, 114.9003), 
               RxPower = list(-52.6695443922406, -52.269130891243, -52.9735258244422, -52.2116571930007, -51.7784534281727, -52.7703448813654, -51.6558862949081, -52.2892907635308, -51.8322993596551, -52.4971436682333)), 
          .Names = c("ID", "Latitude", "Longitude", "Elevation", "Distance", "RxPower"),
          row.names = c(NA, 10L), class = "data.frame")
4

4 回答 4

10

您的数据框包含列表，而不是向量。as.data.frame您可以使用and将此数据框转换为“经典”格式unlist：

df2 <- as.data.frame(lapply(df, unlist))

现在，可以按预期方式对新数据框进行排序：

df2[order(df2[, 5]), ]
于 2013-01-25T12:30:40.373 回答
3

我用一个小例子说明了问题所在：

df <- structure(list(ID = c(1, 2, 3, 4), 
          Latitude = c(50.7368, 50.7368, 50.7368, 50.7369), 
          Longitude = c(6.0873, 6.0873, 6.0873, 6.0872), 
          Elevation = c(269.26, 268.99, 268.73, 268.69), 
          Distance = c(119.4396, 119.4396, 119.4396, 121.199), 
          RxPower = c(-52.6695443922406, -52.269130891243, -52.9735258244422, 
                         -52.2116571930007)), 
          .Names = c("ID", "Latitude", "Longitude", "Elevation", "Distance", "RxPower"), 
          row.names = c(NA, 4L), class = "data.frame")

请注意，list这只发生一次。并且所有值都由c(.)而不是包裹list(.)。这就是为什么sapply(df, class)对您的数据执行操作会导致所有列都具有 class list。

现在，

> sapply(df, classs)
#       ID  Latitude Longitude Elevation  Distance   RxPower 
# "numeric" "numeric" "numeric" "numeric" "numeric" "numeric"

现在order工作：

> df[order(df[,4]), ]  
#   ID Latitude Longitude Elevation Distance   RxPower
# 4  4  50.7369    6.0872    268.69 121.1990 -52.21166
# 3  3  50.7368    6.0873    268.73 119.4396 -52.97353
# 2  2  50.7368    6.0873    268.99 119.4396 -52.26913
# 1  1  50.7368    6.0873    269.26 119.4396 -52.66954
于 2013-01-25T12:17:33.060 回答
1

这会将您的 data.frame 列表转换为矩阵：

mat <- sapply(df,unlist)

现在你可以订购了。

mat[order(mat[,5]),]

如果所有列都是一种类型，例如数字，则矩阵通常更可取，因为对矩阵的操作比对 data.frames 的操作要快。但是，您可以使用as.data.frame(mat).

顺便说一句，data.frame 是一种特殊的列表，因此会为每个 data.frameis.list返回TRUE。

于 2013-01-25T12:24:18.890 回答
0

遇到同样的问题。这对我有用（也许它可能会帮助遇到同样问题并偶然发现此页面的其他人）。

我的结构如下：

lst <- list(row1 = list(col1="A",col2=1,col3="!"), row2 = list(col1="B",col2=2,col3="@"))
> lst
$row1
$row1$col1
[1] "A"

$row1$col2
[1] 1

$row1$col3
[1] "!"


$row2
$row2$col1
[1] "B"

$row2$col2
[1] 2

$row2$col3
[1] "@"

我在做：

df <- as.data.frame(do.call(rbind, lst))

当我尝试这样做时，我一直收到与您相同的错误df[order(df$col1),]。原来我必须这样做：

df <- do.call(rbind.data.frame, lst)
于 2019-02-28T16:38:38.843 回答