i have this function:
RP <- function(TR) { rp <- 1 - (1 - 1/TR) ^ 3.5 }
I know the value of rp: 0.07
How can i obtai