Ola antonio, Coloque no google rfish. La aparecera um site que tem o que vc quer. Humberto
Enviado via iPhone Em Jun 6, 2011, às 11:19 PM, Antonio Silva <[email protected]> escreveu: > Olá Paulo e Walmes > > Obrigado pela atenção. Vamos lá: > > 1) Colocar os colchetes entre aspas "[" não deu certo: > > plot(1:10, 1:10) > > legend(locator(1),bty="n",expression(L[i]==L["\U221E"]%*%"["1-e^{-k%*%(t-t[0])}"]"),cex=1.5) > Erro: constante numérica inesperado em > "legend(locator(1),bty="n",expression(L[i]==L["\U221E"]%*%"["1" > > ou > > text(locator(1),expression(L[i]==L[infinity]%*%"["1-e^{-k%*%(t-t[0])}"]"),cex=1.5) > Erro: constante numérica inesperado em > "text(2,4,expression(L[i]==L[infinity]%*%"["1" > > não funciona, mesmo simplificando > > text(6,6, expression("["1-e^-k(t-t[0])"]")) > Erro: constante numérica inesperado em "text(6,6, expression("["1" > > > 2) com group funciona em parte. > > Se simplifico a fórmula para > text(locator(1),expression(group("[",1-e^{-k%*%(t-t[0])},"]")),cex=1.5) > > Tudo OK, [1-e-k×(t-t0)] é plotado corretamente, mas se coloco %*% > > > text(locator(1),expression(group(%*%,"[",1-e^{-k%*%(t-t[0])},"]")),cex=1.5) > Erro: SPECIAL inesperado em "text(locator(1),expression(group(%*%" > > 3) No Linux (Ubuntu pelo menos) infinity retorna um pequeno círculo e não > aquele "oito" deitado. Isto ocorre inclusive nos exemplos do demo(plotmath), > por isso utilizo o código "\U221E" > > > > > > > > Em 6 de junho de 2011 21:01, Paulo Justiniano <[email protected]> escreveu: > Antonio > > agradito que group() vai resolver o seu problema > > Veja este exemplo mais simples: > > plot(1:10, 1:10) > text(2,4, expression(group("[", list(5,7), "]"))) > > > alem disto no seu exemplo considere usar infinity para fazer o símbolo de > infinito > > P.J. > > > > On Mon, 6 Jun 2011, Antonio Silva wrote: > > Olá, > > Quero escrever a equação de von Bertalanffy como um legenda em um gráfico. > Utilizo o R no Ubuntu. > > A forma mais adequada de escrever a equação é Li=L∞×[1-e-k×(t-t0)], sendo "i" > e "∞" subscritos e "-k×(t-t0)" sobrescrito. O "0" do > "t0" também é subscrito. > > Para tal escrevi: > legend(locator(1),bty="n",expression(L[i]==L["\U221E"]%*%(1-e^{-k%*%(t-t[0])})),cex=1.5) > > Notem que não consegui colocar os colchetes, repito os parêntesis ... > > Tentei várias formas como "[" ou mesmo "\U005B" mas não deu certo. > > Agradeço qualquer dica. > > Abraços, > > Antônio > > -- > Antônio Olinto Ávila da Silva > Biólogo / Oceanógrafo > Instituto de Pesca (Fisheries Institute) > São Paulo, Brasil > > > > _______________________________________________ > R-br mailing list > [email protected] > https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br > > > > > -- > Antônio Olinto Ávila da Silva > Biólogo / Oceanógrafo > Instituto de Pesca (Fisheries Institute) > São Paulo, Brasil > > _______________________________________________ > R-br mailing list > [email protected] > https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
_______________________________________________ R-br mailing list [email protected] https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
