Here are a few possibilies:
x <- c(4, 12, 20)
rep(x, each = 3) + 0:2
rep(x, each = 3) + sequence(rep(3, length(x))) - 1
c(sapply(x, seq, length = 3))
On 7/25/06, etienne <etiennesky at yahoo.com>
wrote:> I need sequences that have gaps in them, such as the
> following:
>
> 4 5 6 | 12 13 14 | 20 21 22
>
> a simple question, I've been scratching my head for a
> R function that will do this
>
> The : and seq do not allow this, and the c() can be
> used although not in an automatic way. I'm sure there
> is a way to do it without using a for() construct.
>
> Thank you
>
> ______________________________________________
> R-help at stat.math.ethz.ch mailing list
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide
http://www.R-project.org/posting-guide.html
> and provide commented, minimal, self-contained, reproducible code.
>