如何生成与其正镜像配对的负数列表？答案

【问题标题】：How to generate a list of negative numbers paired with their positive mirrors?如何生成与其正镜像配对的负数列表？
【发布时间】：2017-07-20 21:35:56
【问题描述】：

我想知道如何生成从c(-30, 30)、c(-29, 29)、...、c(-20, 20) 开始的配对值列表？

（每一对都有一个负数和它的正镜像）。

我尝试了类似以下的方法但没有成功：

c(-30:-20, 30:20)

【问题讨论】：

lapply(seq(-30,-20), function(x){c(x, abs(x))}) 或 list(p1= -30:-20, p2 = 30: 20) 或 data.frame(p1= -30:-20, p2 = 30:20) ?
与上述评论类似，lapply(30:20, function(x) c(-x, x))。

【解决方案1】：

试试这个：

mapply(c, as.list(20:30), as.list(-20:-30), SIMPLIFY = FALSE)

【讨论】：

也可以Map(c, as.list(20:30), as.list(-20:-30))。 Map 是 mapply 的包装器，SIMPLIFY 设置为 FALSE。