代码之家 › 专栏 › 技术社区 › âÊÊá¸á¸½á¸

过滤掉purr中最长的字符串

purrr r

âÊÊá¸á¸½á¸ · 技术社区 · 6 年前

考虑这个例子

list('test', 'one')

我想将这个列表子集,并且只保留列表中最长的字符串。使用 purrr::keep 似乎不起作用。

> list('test', 'one') %>% keep(~ nchar(.x) == max(nchar(.)))
[[1]]
[1] "test"

[[2]]
[1] "one"

有什么想法吗? 谢谢!

2 回复 | 直到 6 年前

Julius Vainora 6 年前

如果 l 是存储的,那么事实上,基R似乎是最好的:

l <- list('test', 'one')

# If you want only the first one or there is a unique element
l[which.max(nchar(l))]
# [[1]]
# [1] "test"

# General
l[nchar(l) == max(nchar(l))]
# [[1]]
# [1] "test"

现在用 keep 我们可以这样做

list('test', 'one') %>% keep(function(x) nchar(x) == max(nchar(.)))
# [[1]]
# [1] "test"

问题似乎是两者都有 . 和 .x 只是列表中的单个元素 ~ nchar(.x) == max(nchar(.)) .

YOLO 6 年前

你可以做简单的:

k <- list('test', 'one')
k[which.max(lapply(k, nchar))]

[[1]]
[1] "test"

推荐文章

MCP_infiltrator · 在“tible”中添加一列,给出其列表位置

2 年前

sbac · 如何对R中数据帧的几列应用统计测试

2 年前

John-Henry · 使用“purrr::map”将“lm”对象循环到“broom::tidy”`

2 年前

deschen · 将列乘以向量的tidyverse解决方案

2 年前

Nuller · 无法对嵌套数据中的列进行子集设置。框架

2 年前

chrischi · R Purrr-系数最高

6 年前

Richard Herron · 从purr的pmap()调用var()返回NA

6 年前

Davide Lorino · 嵌套数据帧上的函数向量算法

6 年前

âÊÊá¸á¸½á¸ · 如何使用purrr从两个元素的列表中提取元素?

6 年前

andrew_reece · map\u dfr:填充。具有字符串标签的id列,而不是没有字符串标签的索引。x已命名

6 年前