将向量重新排序为第一个、最后一个、第二个、倒数第二个等

Question

是否真的有一个简单的解决方案来重新排序像
这样的向量第一个元素、最后一个元素、第二个元素、倒数第二个元素等。

所以我期待 c(1,2,3,4,5)得到c(1,5,2,4,3) .

原因是我有一个包含 16 种颜色的调色板，颜色 1 与两种颜色非常相似，但与颜色 16 不相似。但是在我的绘图中，颜色 1 着色的点与颜色 2 着色的点很接近。

对于我的调色板，我使用来自 color brewer 的 Set 1，还使用 ​​colorRampPalette计算两者之间的颜色，使它们变得有点相似。

一个解决方案就是 sample(my_colors)但实际上我想像上面所说的那样重新排序。

Answer 1

这会做你需要的:

a <- c(1,2,3,4,5)
b <- rbind(a,a[5:1])
c <-b [1:5]

希望对你有帮助

这是一个fiddle

您可以将其归纳为

rbind(a,rev(a))[1:length(a)]