How to write a function with an specific interval for the first 10 numbers then a new interval for the second 10 and so on using R

Question

I want to get all the numbers with an increase like this 10^(seq(1,9,by=1)) then the next 10 10^(seq(10,90,by=10)) ... 10^(seq(a,b,by=a))

After `10^(seq(10,90,by=10))` would it be `10^(seq(100,900,by=100))` ? Most of the numbers in that vector become infinity. — Ronak Shah, Aug 11 '20 at 07:12

score 1 · Accepted Answer · answered Aug 11 '20 at 07:55

1

Maybe you can try the code like below

c(sapply(10**(0:log10(a)),function(x) 10**seq(x,9*x,by = x)))

answered Aug 11 '20 at 07:55

ThomasIsCoding

Kestutis Vinciunas · Answer 2 · 2020-08-11T09:01:19.287

0

If I understood correctly, thus is what you are looking for:

get_pwr <- function(a) {
  b <- 10^a - a
  10^(seq(a, b, by=a))
}

lapply(seq(1,9,by=1), get_pwr)

bur remember the limitation of the sizes: R in a 64 bit world

edited Aug 11 '20 at 09:01

answered Aug 11 '20 at 07:32

I think you mean `b <- 10^a - a`? (Otherwise, the end of one list is duplicated by the start of the next.) And maybe wrap the `lapply` in `unlist`? – Limey Aug 11 '20 at 07:36

2 Answers2