I'm trying to make a function that will output the exponent... so f2(2,2) =
4
and f2(2,3)=8. But I don't want to just use the x^n function, I want to do
it another way, and without a recursion. I did the follow code but for some
reason it doesn't work. Help please?
f2 <- function(x, n) #without recursion {
y <- 1
if (n==0) {return(1)} else {
if (length(y) < (n+1) {
y <-append(y, x, after = length(y))
} else {return(prod(y))}
}
}
--
View this message in context:
http://r.789695.n4.nabble.com/exponent-function-help-tp3663943p3663943.html
Sent from the R help mailing list archive at Nabble.com.
mousy0815 <mousy0815 <at> gmail.com> writes:> I'm trying to make a function that will output the exponent... so f2(2,2) = 4 > and f2(2,3)=8. But I don't want to just use the x^n function, I want to do > it another way, and without a recursion. I did the follow code but for some > reason it doesn't work. Help please? > > f2 <- function(x, n) #without recursion { > y <- 1 > if (n==0) {return(1)} else { > if (length(y) < (n+1) { > y <-append(y, x, after = length(y)) > } else {return(prod(y))} > > } > } >Since this list is not intended for homework (see the posting guide) can you please tell us why (other than homework) you might be trying to do this? Ben Bolker