Select shape(s)

Nothing but x[i]

pick(x, i)

Arguments

x	the shape to clone
i	indices of shapes to retain

shapes[4] %>% clone(121)
#> 121 coo with 710 +/- 0 coordinates
shapes[14:16] %>% clone(27)
#> 81 coo with 700 +/- 72 coordinates