代码之家 › 专栏 › 技术社区 › masher

保持不同类型的第一次出现的原始相对位置的排序数据

tidyverse dplyr r

masher · 技术社区 · 3 年前

我有一张桌子, d ,安排如下: value 正在减少。

我还是想收集 type ,同时保持每个项目第一次进入的相关安排 . 如图所示 d_sorted

group_by() 对我不起作用。

如何对数据进行排序?

library(tidyverse)

#before
d <- tribble(
  ~"type", ~"value",
  "R" , 109,
  "C" , 105,
  "B" , 80,
  "W" , 77,
  "R" , 70,
  "W" , 66,
  "A" , 58,
  "C" , 55
)


#after
d_sorted <- tribble(
  ~"type", ~"value",
  "R" , 109,
  "R" , 70,
  "C" , 105,
  "C" , 55,
  "B" , 80,
  "W" , 77,
  "W" , 66,
  "A" , 58
)

^{于2021年4月15日由

reprex package

(v1.0.0)}

1 回复 | 直到 3 年前

Ronak Shah 3 年前

你可以用 arrange 具有 match

library(dplyr)
d %>% arrange(match(type, unique(type)))

#  type  value
#  <chr> <dbl>
#1 R       109
#2 R        70
#3 C       105
#4 C        55
#5 B        80
#6 W        77
#7 W        66
#8 A        58

在R基中:

d[order(match(d$type, unique(d$type))), ]

TarJae 3 年前

unique

d %>% arrange(type = factor(type, unique(type)))

# A tibble: 8 x 2
  type  value
  <chr> <dbl>
1 R       109
2 R        70
3 C       105
4 C        55
5 B        80
6 W        77
7 W        66
8 A        58

mt1022 3 年前

data.table 加入:

library(tibble)
setDT(d)
d[CJ(type, sorted = F, unique = T), on = .(type)]
   type value
1:    R   109
2:    R    70
3:    C   105
4:    C    55
5:    B    80
6:    W    77
7:    W    66
8:    A    58

推荐文章

Marc B. · 使用ggplot2创建条形图时“缺少值”

1 年前

deschen · tidyverse与外部向量发生突变,该外部向量的元素是数据帧中的列值

1 年前

Laura · 在Shiny中使用可排序的包拖放名称,这些名称将成为图表

1 年前

Mallikarjun M · 如何使用随机森林进行时间序列预测?

1 年前

ly li · 模型摘要:当表格形状改变时,拟合优度消失

1 年前

C.Robin · 将marginaffects::predictions()的结果连接回main df?

1 年前

monotonic · 如何将格式为“col1+col3+col4”的数据帧的行名转换为一列数字向量“c(1,3,4)”?

2 年前

Shawn Hemelstrand · 为什么我的自定义errorbar函数不能在R中工作?

2 年前

RoyBatty · 统计每个字符在整个数据集中出现的次数

2 年前

stats_noob · R: 记录某个“行为”发生的循环的索引?

2 年前