Pessoal,

Estou rodando um script e preciso extrair os dados dos coeficientes ajustados para um modelo. No meu exemplo, quero extrair e separar os valores "k" e "n".

> data.frame(A)
     M     R
1   10 24.61
2   20 29.41
3   30 33.07
4   40 37.37
5   50 38.22
6   60 41.14
7   70 41.61
8   80 43.41
9   90 47.18
10 100 48.77
11 110 51.02
12 120 52.95
13 130 52.98
14 140 52.92

> model<-nls(R~k*M^n, start=list(k=0.5,n=1))
> summary(model)


Obrigado


----

Pedro Henrique Campelo Felix
Bachelor of Food Engineering (UNI-BH)
Msc. Chemical Engineering (UFMG)
PhD Student of Food Science (UFLA)

+55 (31) 97560-1545 (TIM)
"Nós somos aquilo que fazemos repetidamente. Excelência, então, não é um modo de agir, mas um hábito." Aristóteles