Displaying 1 result from an estimated 1 matches for "tp3663943p3663943".
2011 Jul 13
1
exponent function help??
...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.