[R-br] ggplot2_apresentar equação no gráfico

Henrique Boriolo Dias henrique.bdias em yahoo.com.br
Terça Junho 5 00:06:21 -03 2018


Pois é,Acho que to misturando tudo. Enfim, vou estudar melhor antes.Obrigado pelas sugestões e esclarecimentos.Henrique 

    Em Terça-feira, 5 de Junho de 2018 10:25, Cesar Rabak <cesar.rabak em gmail.com> escreveu:
 

 Henrique,
Se você está pedindo para o SW, via geom_smooth(method = lm, formula = y ~ exp(-x), se = FALSE)fazer o alisamento de uma curva usando a equação y ~ exp(-x), como você esperaria que o SW "adivinhasse" que você quer calcular um coeficiente para o expoente?
Por outro lado, se você está se perguntando qual coeficiente poderia ser usado para fazer uma equação fechada considerando as duas curvas, bastaria você pegar os dados do procedimento proposto por Cayan e dividir os coeficientes para obter o fator, não seria isso?
HTH--Cesar Rabak


2018-06-04 20:29 GMT-03:00 Henrique Boriolo Dias via R-br <r-br em listas.c3sl.ufpr.br>:

Obrigado Cayan.
Todavia, acho que não me expressei direito com relação ao que procuro.
Saberia me dizer se nessa equação y ~ exp(-x) tem algum número que multiplica o 'x' ?
Tem como escrever essa equação, por exemplo, y ~ exp(-xz). O 'z' que gostaria de descobrir/ajustar, se for possível com essa função.
Outra dificuldade, é plotar a equação usando o facet_wrap, ou seja, uma equação (y ~ exp(-xz)) e regressão (a, b, R²) para cada gráfico. Não sei se isso é possível ou se é melhor fazer um loop para cada gráfico.
Perdão a falha ao explicar. Nem sei se é possível ou não, mas está ai para discussão.Obrigado mais uma vez.
Henrique 

    Em Terça-feira, 5 de Junho de 2018 1:21, Cayan Portela via R-br <r-br em listas.c3sl.ufpr.br> escreveu:
 

 Você pode gerar um modelo utilizando a função lm e extrair os coeficientes.

De acordo com https://stackoverflow.com/ questions/30144785/how-to- extract-intercept-and-slope- from-a-plot-for-large-number- of-variables ,
no seu caso ficaria assim:

db %>% 
  group_by(type) %>% 
  do({
    mod = lm(y ~ exp(-x), data = .)
    data.frame(Intercept = coef(mod)[1],
              Slope = coef(mod)[2])
  })

Cayan

______________________________ _______
Sent from http://r-br.2285057.n4.nabble. com

______________________________ _________________
R-br mailing list
R-br em listas.c3sl.ufpr.br
https://listas.inf.ufpr.br/ cgi-bin/mailman/listinfo/r-br
Leia o guia de postagem (http://www.leg.ufpr.br/r-br- guia) e fornea cdigo mnimo reproduzvel.

   
______________________________ _________________
R-br mailing list
R-br em listas.c3sl.ufpr.br
https://listas.inf.ufpr.br/ cgi-bin/mailman/listinfo/r-br
Leia o guia de postagem (http://www.leg.ufpr.br/r-br- guia) e forneça código mínimo reproduzível.




   
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20180605/ec1ce02b/attachment.html>


Mais detalhes sobre a lista de discussão R-br