- html - 出于某种原因,IE8 对我的 Sass 文件中继承的 html5 CSS 不友好?
- JMeter 在响应断言中使用 span 标签的问题
- html - 在 :hover and :active? 上具有不同效果的 CSS 动画
- html - 相对于居中的 html 内容固定的 CSS 重复背景?
也许我遗漏了一些明显的东西,但我试图将 R 中命名列表的命名列表(甚至可能更多嵌套)扁平化为最终一个扁平列表。 purrr
和 rlist
似乎有工具。我怎样才能实现子列表的名称成为扁平结果列表的名称预加密,例如list1.blist.a
在 purrr
?我的实际列表更深入地嵌套了不同数量的级别和不同级别的重复名称。最后我表演purrr::map_df(final_list, bind_rows)
这似乎删除了所有重复名称(即使没有,我也不知道原始重复名称来自哪个分支)。我可以用 rlist
但我曾希望有一个 tidyverse
解决方案(与出色的 rlist
无关,但许多已经安装了 tidyverse
)。
编辑:
另请注意 rlist::list.flatten()
将始终删除除顶部之外的所有级别,而 purrr::flatten()
一次下降一个级别,这有时可能是您所需要的。您可以根据需要多次嵌套 purrr::map(.x, .f = rlist::list.flatten) 来实现相同的效果,但它很麻烦且不美观/可读。
alist <- list(list1 = list(a = 1, b = 2, blist = list(a = 3, b = 4)),
list2 = list(a = 1, b = 2, blist = list(a = 3, b = 4)))
str(alist)
List of 2
$ list1:List of 3
..$ a : num 1
..$ b : num 2
..$ blist:List of 2
.. ..$ a: num 3
.. ..$ b: num 4
$ list2:List of 3
..$ a : num 1
..$ b : num 2
..$ blist:List of 2
.. ..$ a: num 3
.. ..$ b: num 4
alist_flat <- purrr::map(alist, purrr::flatten)
str(alist_flat)
List of 2
$ list1:List of 4
..$ a: num 1
..$ b: num 2
..$ a: num 3
..$ b: num 4
$ list2:List of 4
..$ a: num 1
..$ b: num 2
..$ a: num 3
..$ b: num 4
alist_flattest <- purrr::flatten(alist_flat)
str(alist_flattest)
List of 8
$ a: num 1
$ b: num 2
$ a: num 3
$ b: num 4
$ a: num 1
$ b: num 2
$ a: num 3
$ b: num 4
# works with rlist
alist_flat_names <- map(alist, rlist::list.flatten, use.names = TRUE)
str(alist_flat_names)
List of 2
$ list1:List of 4
..$ a : num 1
..$ b : num 2
..$ blist.a: num 3
..$ blist.b: num 4
$ list2:List of 4
..$ a : num 1
..$ b : num 2
..$ blist.a: num 3
..$ blist.b: num 4
alist_flattest_names <- rlist::list.flatten(alist_flat_names, use.names = TRUE)
str(alist_flattest_names)
List of 8
$ list1.a : num 1
$ list1.b : num 2
$ list1.blist.a: num 3
$ list1.blist.b: num 4
$ list2.a : num 1
$ list2.b : num 2
$ list2.blist.a: num 3
$ list2.blist.b: num 4
最佳答案
我查看了 rlist::list.flatten() 的源代码并将源代码复制到一个新函数中以避免这种依赖性。
my_flatten <- function (x, use.names = TRUE, classes = "ANY")
{
#' Source taken from rlist::list.flatten
len <- sum(rapply(x, function(x) 1L, classes = classes))
y <- vector("list", len)
i <- 0L
items <- rapply(x, function(x) {
i <<- i + 1L
y[[i]] <<- x
TRUE
}, classes = classes)
if (use.names && !is.null(nm <- names(items)))
names(y) <- nm
y
}
alist <- list(list1 = list(a = 1, b = 2, blist = list(a = 3, b = 4)),
list2 = list(a = 1, b = 2, blist = list(a = 3, b = 4)))
flat_list <- my_flatten(alist)
str(flat_list)
List of 8
$ list1.a : num 1
$ list1.b : num 2
$ list1.blist.a: num 3
$ list1.blist.b: num 4
$ list2.a : num 1
$ list2.b : num 2
$ list2.blist.a: num 3
$ list2.blist.b: num 4
关于R (purrr) 将命名列表的列表展平以列出并保留名称,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/49252400/
我正在尝试做这样的事情:Name[i] = "Name"+ (i+1) 在 forloop 中,这样数组的值将是:Name[0] = Name1,Name[1] = Name2,Name[2] = N
我读了here,在GSP中我们可以这样写: ${params.action} 从GSP中,我们可以使用${params.action}作为参数调用Javascript函数(请参阅here)。 是否有其
我的问题:非常具体。我正在尝试想出解析以下文本的最简单方法: ^^domain=domain_value^^version=version_value^^account_type=account_ty
我创建了一条与此类似的路线: Router::connect("/backend/:controller/:action/*"); 现在我想将符合此模式的每个 Controller 路由重命名为类似
我在 Visual Studio 2013 项目中收到以下警告: SQL71502 - Procedure has an unresolved reference to object 最佳答案 这可以
任何人都可以指导我使用名称/值 .NET 集合或 .NET 名称/值字典以获得最佳性能吗?请问最好的方法是什么?我的应用程序是 ASP.NET、WCF/WF Web 应用程序。每个集合应该有 10 到
我在 Zend Framework 2 中有一个默认模块: namespace Application\Controller; use Zend\Mvc\Controller\AbstractActi
这是表格: 关于javascript - 在 javascript 中,这是一个有效的结构吗? : document. 名称.名称.值?,我们在Stack Overflow上找到一个类似的
HtmlHelper.ActionLink(htmlhelper,string linktext,string action) 如何找出正确的路线? 如果我有这个=> HtmlHelper.Actio
我需要一些有关如何将 Controller 定义传递给嵌套在 outer 指令中的 inner 指令的帮助。请参阅http://plnkr.co/edit/Om2vKdvEty9euGXJ5qan一个
请提出一个数据结构来表示内存中的记录列表。每条记录由以下部分组成: 用户名 积分 排名(基于积分)- 可选字段- 可以存储在记录中或可以动态计算 数据结构应该支持高效实现以下操作: Insert(re
错误 : 联合只能在具有兼容列类型的表上执行。 结构(层:字符串,skyward_number:字符串,skyward_points:字符串)<> 结构(skyward_number:字符串,层:字符
我想要一个包含可变数量函数的函数,但我希望在实际使用它们之前不要对它们求值。我可以使用 () => type 语法,但我更愿意使用 => type 语法,因为它似乎是为延迟评估而定制的。 当我尝试这样
我正在编写一个 elisp 函数,它将给定键永久绑定(bind)到当前主要模式的键盘映射中的给定命令。例如, (define-key python-mode-map [C-f1] 'pytho
卡在R中的错误上。 Error in names(x) <- value : 'names' attribute must be the same length as the ve
我有字符串,其中包含名称,有时在字符串中包含用户名,后跟日期时间戳: GN1RLWFH0546-2020-04-10-18-09-52-563945.txt JOHN-DOE-2020-04-10-1
有人知道为什么我会收到此错误吗?这显示将我的项目升级到新版本的Unity3d之后。 Error CS0103: The name `Array' does not exist in the curre
由于 Embarcadero 的 NNTP 服务器从昨天开始就停止响应,我想我可以在这里问:我使用非数据库感知网格,我需要循环遍历数据集以提取列数、它们的名称、数量行数以及每行中每个字段的值。 我知道
在构建Android应用程序的子项目中,我试图根据根build.gradle中的变量设置版本代码/名称。 子项目build.gradle: apply plugin: 'com.android.app
示例用例: 我有一个带有属性“myProperty”的对象,具有 getter 和 setter(自 EcmaScript 5 起支持“Property Getters 和 Setters”:http
我是一名优秀的程序员,十分优秀!