Re: [Rd] Lack of 'seq_len' in 'head' in 'stopifnot'

> Suharto Anggono Suharto Anggono via R-devel > on Sat, 4 Feb 2017 10:18:33 + writes: > Function 'stopifnot' in R devel r72104 has this. > head <- function(x, n = 6L) ## basically utils:::head.default() > x[if(n < 0L) max(length(x) + n, 0L) else min(n, length

[Rd] Lack of 'seq_len' in 'head' in 'stopifnot'

Function 'stopifnot' in R devel r72104 has this. head <- function(x, n = 6L) ## basically utils:::head.default() x[if(n < 0L) max(length(x) + n, 0L) else min(n, length(x))] If definition like utils:::head.default is intended, the index of 'x' should be wrapped in seq_len(...): x[seq_l