How to prevent usage of loop using `replicate`

Question

I'm trying to simplify code looking like this

someFunc <- function(x) {
   return(x + 3L)
}

x <- 1L
for (i in 1:10) {
   x <- c(x, someFunc(x[length(x)]))
}

I was thinking about reduce like this

replicate(10, x <- c(x, someFunc(x[length(x)]))

but this does not work, since it uses a copy of x. How can I get the logic to work without using a loop. I think there has to be a way in R (someFunc should be arbitrary - I just posted it as an example).

`x <- seq(from=1L, by=3, length.out = 11)` – jogo Apr 30 '20 at 13:33 — jogo, Apr 30 '20 at 13:33
`replicate(10, x <<- c(x, someFunc(x[length(x)])))[[10]]` – jay.sf Apr 30 '20 at 13:36 — jay.sf, Apr 30 '20 at 13:36

ReelSaemon · Answer 1 · 2020-04-30T13:32:45.073

0

If your output for x is

> x
[1]  1  4  7 10 13 16 19 22 25 28 31

you could just use:

x <- seq(0,10) * 3 + 1

edited Apr 30 '20 at 13:32

answered Apr 30 '20 at 13:26

ReelSaemon

33
6

How to prevent usage of loop using `replicate`

1 Answers1