R中的重排因子变量

Question

感谢您的帮助！

我想要向量：

fb_ad %>% filter(geo == d_choices[2]) %>% group_by(ad_name) %>% summarise_at(ycol[3], funs(n = sum) )

成为

SELECT COALLESCE(o.email, c.email) AS email , o.user_id , c.sessions FROM datasource o FULL JOIN datasource2 c ON o.email = c.email 。

我没有排序！

Answer 1

使用rleid

data.table::rleid(s)
[1] 1 1 1 2 2 3 4 5

Answer 2

以R为底

cumsum(c(TRUE, diff(s) != 0))
#[1] 1 1 1 2 2 3 4 5

Answer 3

使用基数R中的rle和inverse.rle。

s <- c(2, 2, 2, 4, 4, 3, 5, 1)

rl <- rle(s)
rl$values <- sort(unique(s))
s <- inverse.rle(rl)

s
# [1] 1 1 1 2 2 3 4 5