Construct a lens into a prefix of a vector

This constructs a lens into the first n elements of an object or the if negative indexing is used, as many as length(x) - n.

take_l(n)

Arguments

n	number of elements to take, or if negative the number of elements at the end to not take.

Examples

x <- 1:10
view(x, take_l(3))
#> [1] 1 2 3
view(x, take_l(-7))
#> [1] 1 2 3
set(x, take_l(2), c(100,200))
#>  [1] 100 200   3   4   5   6   7   8   9  10
set(x, take_l(-8), c(100,200))
#>  [1] 100 200   3   4   5   6   7   8   9  10