Is there a way to multiply with seq in R?

Question

I want to create a vector that starts at a predefined value and the next value is the previous times another predefined value.

dcdefmax <- 16500 
dcdefgrowth &