Seu código está fazendo exatamente o que especificou. Você forneceu um valor de x e um valor de y, e foi esse o resultado retornado:
> 0^0+0
[1] 1
Para usar for
, você deve especificar uma sequência, por exemplo:
x <- 3
> for(i in x) print(i+1)
[1] 4
> for(i in 1:x) print(i+1)
[1] 2
[1] 3
[1] 4
Para armazenar os valores, deve ter um objeto de dimensão apropriada para receber o resultado de cada volta, ou terá apenas o último valor:
for(i in 0:x) y = x ^ i + x
> y
[1] 30
# o objeto y teve o valor atualizado a cada volta
y <- rep(NA, x+1)
for(i in 0:x) y[i+1] = x ^ i + x
> y
[1] 4 6 12 30
Mas R é otimizado para operações vetoriais, é melhor evitar loops sempre que possível. Você já chegou na solução quando editou sua questão, apenas não percebeu que era apenas isso:
suaFuncao <- function(y, x) sum(y^(0:x))
> suaFuncao(2, 3)
[1] 15
sum
, já é uma função do R; 1) Comece comsum <- 0
; 2) Tire o ciclo de dentro, não está lá a fazer nada.sum <- 1
mas então o ciclofor
será para valores1:x
e não0:x
.