boa tarde pessoal
Tenho uma função que sei o resultado, e quero encontrar o valor do parâmetro c para cada resultado que tenho , semelhante a função atingir meta do Excel
#Vetor com valores de cv para cada parcela
cv<-c(0.2901,0.2836,0.3150,0.2535,0.2762,0.2578,0.2729,0.2737,0.2943,0.2243)
# Função para estimar c ---------------------------------------------------
cvcalculado<-function(c){
sqrt((exp(log(gamma(1+(2/c)))))-(exp(log(gamma(1+
(1/c))))^2))/(exp(log(gamma(1+(1/c)))))
}
Necessito obter qual o valor do parâmetro c
para cada valor do vetor cv
, onde os valores do vetor cv
são a resposta da função dado um valor qualquer de c
Portanto terei uma estimativa de c
para cada valor do vetor cv
Tentei fazer por esse caminho, porém não é obtida uma resposta para cada valor de cv
, mas sim uma resposta global
optimise(cvcalculado, cv)
desde já agradeço
curve(cvcalculado, 1, 100)
. Em segundo lugar, quer o valor dec
para o qualcvcalculado(c) == cv[1]
e depois o valor dec
para o qualcvcalculado(c) == cv[2]
, etc?