4
promessa já em avaliação: referência recursiva ao argumento padrão ou problemas anteriores?
Aqui está o meu código R. As funções são definidas como: f <- function(x, T) { 10 * sin(0.3 * x) * sin(1.3 * x ^ 2) + 0.001 * x ^ 3 + 0.2 * x + 80 } g <- function(x, T, f=f) { exp(-f(x) / T) } …
143
r