[Dúvida] Operador Lógico (==).
Pessoal eu tenho uma dúvida. Considere o código abaixo: function(par,x){ beta = par[1] c = par[2] a = par[3] a * beta * c * exp(-(beta*x)^c) * (beta*x)^(c-1) * (1 - exp(-(beta*x)^c))^(a-1) } integrate(f=fdp_expweibull,par=c(1,1,1),0,Inf)$value == 1 Porque o resultado é false? [ ], Pedro Rafael Diniz Marinho.
Acho que percebi. Convertendo o resultado para carácter o valor não é 1. as.character(integrate(f=fdp_expweibull,par=c(1,1,1),0,Inf)$value) [ ], Pedro Rafael Diniz Marinho. Em 5 de julho de 2013 18:00, Pedro Rafael <pedro.rafael.marinho@gmail.com>escreveu:
Pessoal eu tenho uma dúvida. Considere o código abaixo:
function(par,x){ beta = par[1] c = par[2] a = par[3] a * beta * c * exp(-(beta*x)^c) * (beta*x)^(c-1) * (1 - exp(-(beta*x)^c))^(a-1) }
integrate(f=fdp_expweibull,par=c(1,1,1),0,Inf)$value == 1
Porque o resultado é false?
[ ], Pedro Rafael Diniz Marinho.
imagine o tanto de aproximacoes nao aconteceram quando vc chamou integrate()... experimente all.equal(integrate(f=fdp_expweibull,par=c(1,1,1),0,Inf)$value, 1) b Em 5 de julho de 2013 18:23, Pedro Rafael <pedro.rafael.marinho@gmail.com> escreveu:
Acho que percebi. Convertendo o resultado para carácter o valor não é 1.
as.character(integrate(f=fdp_expweibull,par=c(1,1,1),0,Inf)$value)
[ ], Pedro Rafael Diniz Marinho.
Em 5 de julho de 2013 18:00, Pedro Rafael <pedro.rafael.marinho@gmail.com> escreveu:
Pessoal eu tenho uma dúvida. Considere o código abaixo:
function(par,x){ beta = par[1] c = par[2] a = par[3] a * beta * c * exp(-(beta*x)^c) * (beta*x)^(c-1) * (1 - exp(-(beta*x)^c))^(a-1) }
integrate(f=fdp_expweibull,par=c(1,1,1),0,Inf)$value == 1
Porque o resultado é false?
[ ], Pedro Rafael Diniz Marinho.
_______________________________________________ R-br mailing list R-br@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.
Obrigado Benilton pela informação. [ ], Pedro Rafael Diniz Marinho. 2013/7/5 beniltoncarvalho [via R-br] < ml-node+s2285057n4659923h90@n4.nabble.com>
imagine o tanto de aproximacoes nao aconteceram quando vc chamou integrate()... experimente
all.equal(integrate(f=fdp_expweibull,par=c(1,1,1),0,Inf)$value, 1)
b
Em 5 de julho de 2013 18:23, Pedro Rafael <[hidden email] <http://user/SendEmail.jtp?type=node&node=4659923&i=0>> escreveu:
Acho que percebi. Convertendo o resultado para carácter o valor não é 1.
as.character(integrate(f=fdp_expweibull,par=c(1,1,1),0,Inf)$value)
[ ], Pedro Rafael Diniz Marinho.
Em 5 de julho de 2013 18:00, Pedro Rafael <[hidden email]<http://user/SendEmail.jtp?type=node&node=4659923&i=1>>
escreveu:
Pessoal eu tenho uma dúvida. Considere o código abaixo:
function(par,x){ beta = par[1] c = par[2] a = par[3] a * beta * c * exp(-(beta*x)^c) * (beta*x)^(c-1) * (1 - exp(-(beta*x)^c))^(a-1) }
integrate(f=fdp_expweibull,par=c(1,1,1),0,Inf)$value == 1
Porque o resultado é false?
[ ], Pedro Rafael Diniz Marinho.
_______________________________________________ R-br mailing list [hidden email] <http://user/SendEmail.jtp?type=node&node=4659923&i=2> 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.
R-br mailing list [hidden email] <http://user/SendEmail.jtp?type=node&node=4659923&i=3> 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.
------------------------------ If you reply to this email, your message will be added to the discussion below:
http://r-br.2285057.n4.nabble.com/R-br-Duvida-Operador-Logico-tp4659921p4659... To unsubscribe from R-br, click here<http://r-br.2285057.n4.nabble.com/template/NamlServlet.jtp?macro=unsubscribe_by_code&node=3357982&code=cGVkcm8ucmFmYWVsLm1hcmluaG9AZ21haWwuY29tfDMzNTc5ODJ8NTAyMjI0MDYw> . NAML<http://r-br.2285057.n4.nabble.com/template/NamlServlet.jtp?macro=macro_viewer&id=instant_html%21nabble%3Aemail.naml&base=nabble.naml.namespaces.BasicNamespace-nabble.view.web.template.NabbleNamespace-nabble.view.web.template.NodeNamespace&breadcrumbs=notify_subscribers%21nabble%3Aemail.naml-instant_emails%21nabble%3Aemail.naml-send_instant_email%21nabble%3Aemail.naml>
participantes (2)
-
Benilton Carvalho -
Pedro Rafael