studio - pairs en r

¿Establecer el valor predeterminado en una función?

Question

Tengo una función de densidad simple a continuación:

dpower <- function(x, b, r){
if ((b <= 0 | r <= 0)) 
return("Wrong parameters entered!")
else{
 density.temp <- (r/b)*(x/b)^(r - 1)
 density.temp[which(x >= b | x <= 0)] <- NA
 return(density.temp)
 } 
}

Esta función devuelve la densidad correspondiente al valor x de la distribución especificada con los parámetros b y r. Me gustaría establecer el valor predeterminado en x que, si el usuario no especifica x, pasan los valores predeterminados. Simplemente podemos configurar la función dpower <(x = x.default, b, r) ... sin embargo, mi valor predeterminado depende de r y b. ¿Cómo puedo hacer eso? Supongamos que el valor predeterminado para x es:

seq(from = 0.05, to = b, by = 0.001)

Gracias por tu ayuda,

Answer 1

Puede establecer el valor de X en NULL y hacer que una de las primeras líneas de su función sea

 if(is.null(x))
     x <- seq(from = 0.05, to = b, by = 0.001)

Answer 2

dpower <- function(b, r, x = seq(from = 0.05, to = b, by = 0.001))
....