[R-br] gráfico de médias

Cesar Rabak cesar.rabak em gmail.com
Quarta Agosto 28 18:21:44 BRT 2013


Alana,

Points precisa das duas coordenadas dos pontos, e medias é apenas a
ordenada das médias, você precisa criar o vetor das abcissas e plotar esses
pontos (supondo, que já exista um gráfico desenhado, posto que a mensagem
de erro dá a entender que não há gráfico para adicionar pontos).



2013/8/28 <alanarocha em sapo.pt>

> alguém me pode esplicar porque este codigo não me esta a devolver o
> grafico das médias?
> medias<-apply(dados[,-1],2,**mean,na.rm=TRUE) # Calcula as médias
> points(medias,col="red",pch=**17) # Adiciona os pontos das médias no
> boxplot
> Error in plot.xy(xy.coords(x, y), type = type, ...) :
>   plot.new has not been called yet
>
>
> obrigada.
> aqui fica tambem o meu script:
> https://dl.dropboxusercontent.**com/u/9337305/teste_hgb.R<https://dl.dropboxusercontent.com/u/9337305/teste_hgb.R>
> Ana
> Quoting r-br-request em listas.c3sl.ufpr.**br<r-br-request em listas.c3sl.ufpr.br>
> :
>
>  Enviar submissões para a lista de discussão R-br para
>>         r-br em listas.c3sl.ufpr.br
>>
>> Para se cadastrar ou descadastrar via WWW, visite o endereço
>>         https://listas.inf.ufpr.br/**cgi-bin/mailman/listinfo/r-br<https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br>
>> ou, via email, envie uma mensagem com a palavra 'help' no assunto ou
>> corpo da mensagem para
>>         r-br-request em listas.c3sl.ufpr.**br<r-br-request em listas.c3sl.ufpr.br>
>>
>> Você poderá entrar em contato com a pessoa que gerencia a lista pelo
>> endereço
>>         r-br-owner em listas.c3sl.ufpr.br
>>
>> Quando responder, por favor edite sua linha Assunto assim ela será
>> mais específica que "Re: Contents of R-br digest..."
>>
>>
>> Tópicos de Hoje:
>>
>>    1. geoestatistica (Hélio Gallo Rocha)
>>    2. Fábio, let's connect on LinkedIn
>>       (Iago Carvalho Cunha via LinkedIn)
>>    3. Re: geoestatistica (Gilbert Queiroz)
>>    4. Re: geoestatistica (Helder Gramacho)
>>    5. path analysis - pacote agricolae (Heloíse Pavanato)
>>    6. Manual (Maicon J. Galiazzi)
>>    7. Re: Manual (Fernando Antonio de souza)
>>    8. Re: geoestatistica (Elias T Krainski)
>>    9. Re: Selecionar variáveis conforme linhas (Éder Comunello)
>>   10. Re: Selecionar variáveis conforme linhas (Éder Comunello)
>>   11. erros (alanarocha em sapo.pt)
>>   12. Re: erros (Rogério Barbosa)
>>
>>
>> ------------------------------**------------------------------**
>> ----------
>>
>> Message: 1
>> Date: Mon, 26 Aug 2013 15:09:28 -0300
>> From: Hélio Gallo Rocha <heliogallorocha em gmail.com>
>> To: r-br <r-br em listas.c3sl.ufpr.br>
>> Subject: [R-br] geoestatistica
>> Message-ID:
>>         <CA+ppPW6jup_**0b9Aff7OyBZyVHTmsiu2HhaykLQMiF**
>> B0vqtkLQw em mail.gmail.com<CA%2BppPW6jup_0b9Aff7OyBZyVHTmsiu2HhaykLQMiFB0vqtkLQw em mail.gmail.com>
>> >
>> Content-Type: text/plain; charset="iso-8859-1"
>>
>> Quem poderia prestar ajudapara Geoestatística, não para comandos do R, mas
>> conceitualmente?
>>
>> --
>> Hélio Gallo Rocha
>> IFSULDEMINAS - Câmpus Muzambinho
>> -------------- Próxima Parte ----------
>> Um anexo em HTML foi limpo...
>> URL: <http://listas.inf.ufpr.br/**pipermail/r-br/attachments/**
>> 20130826/ea4a9a27/attachment-**0001.html<http://listas.inf.ufpr.br/pipermail/r-br/attachments/20130826/ea4a9a27/attachment-0001.html>
>> >
>>
>> ------------------------------
>>
>> Message: 2
>> Date: Mon, 26 Aug 2013 19:17:11 +0000 (UTC)
>> From: Iago Carvalho Cunha via LinkedIn <member em linkedin.com>
>> To: Fábio C. <r-br em listas.c3sl.ufpr.br>
>> Subject: [R-br] Fábio, let's connect on LinkedIn
>> Message-ID:
>>         <886206432.29600108.**1377544631383.JavaMail.app@**
>> ela4-app3746.prod>
>> Content-Type: text/plain; charset="utf-8"
>>
>> LinkedIn
>> ------------
>>
>>
>>
>>
>>     Iago Carvalho Cunha requested to add you as a connection on LinkedIn:
>>
>>
>> ------------------------------**------------
>>
>> I'd like to add you to my professional network on LinkedIn.
>>
>> Accept invitation from Iago Carvalho Cunha
>> http://www.linkedin.com/e/-**33g73l-hku2i88j-z/**vhj1xG42iBdUFK5d_**
>> HMEGL4iFMC511ylQq2qub/blk/**I639788691_10/**
>> 3wOtCVFbmdxnSVFbm8JrnpKqlZJrmZ**zbmNJpjRQnOpBtn9QfmhBt71BoSd1p**
>> 65Lr6lOfP0NnP4VdzwUdPAPdAALe4l**cc4VUslgLdzcVdPcOdjoMdz4LrCBxb**
>> OYWrSlI/eml-comm_invm-b-in_ac-**inv28/?hs=false&tok=**0YDumN81HBkRU1<http://www.linkedin.com/e/-33g73l-hku2i88j-z/vhj1xG42iBdUFK5d_HMEGL4iFMC511ylQq2qub/blk/I639788691_10/3wOtCVFbmdxnSVFbm8JrnpKqlZJrmZzbmNJpjRQnOpBtn9QfmhBt71BoSd1p65Lr6lOfP0NnP4VdzwUdPAPdAALe4lcc4VUslgLdzcVdPcOdjoMdz4LrCBxbOYWrSlI/eml-comm_invm-b-in_ac-inv28/?hs=false&tok=0YDumN81HBkRU1>
>>
>> View profile of Iago Carvalho Cunha
>> http://www.linkedin.com/e/-**33g73l-hku2i88j-z/rso/**
>> 282741063/Q3Ds/name/82777420_**I639788691_10/?hs=false&tok=**
>> 1UeMddg0nBkRU1<http://www.linkedin.com/e/-33g73l-hku2i88j-z/rso/282741063/Q3Ds/name/82777420_I639788691_10/?hs=false&tok=1UeMddg0nBkRU1>
>> ------------------------------**------------
>> You are receiving Invitation emails.
>>
>>
>> This email was intended for Fábio Corrêa.
>> Learn why this is included: http://www.linkedin.com/e/-**
>> 33g73l-hku2i88j-z/plh/http%3A%**2F%2Fhelp%2Elinkedin%2Ecom%**
>> 2Fapp%2Fanswers%2Fdetail%2Fa_**id%2F4788/-GXI/?hs=false&tok=**
>> 0jHQ4lB6PBkRU1<http://www.linkedin.com/e/-33g73l-hku2i88j-z/plh/http%3A%2F%2Fhelp%2Elinkedin%2Ecom%2Fapp%2Fanswers%2Fdetail%2Fa_id%2F4788/-GXI/?hs=false&tok=0jHQ4lB6PBkRU1>
>>
>> (c) 2012, LinkedIn Corporation. 2029 Stierlin Ct, Mountain View, CA
>> 94043, USA.
>>
>>
>>
>> -------------- Próxima Parte ----------
>> Um anexo em HTML foi limpo...
>> URL: <http://listas.inf.ufpr.br/**pipermail/r-br/attachments/**
>> 20130826/8dce3abd/attachment-**0001.html<http://listas.inf.ufpr.br/pipermail/r-br/attachments/20130826/8dce3abd/attachment-0001.html>
>> >
>>
>> ------------------------------
>>
>> Message: 3
>> Date: Mon, 26 Aug 2013 15:57:18 -0700 (PDT)
>> From: Gilbert Queiroz <gilbert_queiroz em yahoo.com.br>
>> To: "r-br em listas.c3sl.ufpr.br" <r-br em listas.c3sl.ufpr.br>
>> Subject: Re: [R-br] geoestatistica
>> Message-ID:
>>         <1377557838.5243.YahooMailNeo@**web162705.mail.bf1.yahoo.com<1377557838.5243.YahooMailNeo em web162705.mail.bf1.yahoo.com>
>> >
>> Content-Type: text/plain; charset="iso-8859-1"
>>
>> Vai no site do INPE - DPI e baixa o livro do Gilberto Câmara.
>> Abs.
>>
>>
>>
>>
>>
>> ______________________________**__
>>  De: Hélio Gallo Rocha <heliogallorocha em gmail.com>
>> Para: r-br <r-br em listas.c3sl.ufpr.br>
>> Enviadas: Segunda-feira, 26 de Agosto de 2013 15:09
>> Assunto: [R-br] geoestatistica
>>
>>
>>
>> Quem poderia prestar ajudapara Geoestatística, não para comandos do R,
>> mas conceitualmente?
>>
>> --
>> Hélio Gallo Rocha
>> IFSULDEMINAS - Câmpus Muzambinho
>>
>> ______________________________**_________________
>> R-br mailing list
>> R-br em listas.c3sl.ufpr.br
>> https://listas.inf.ufpr.br/**cgi-bin/mailman/listinfo/r-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<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/**
>> 20130826/8f6506b1/attachment-**0001.html<http://listas.inf.ufpr.br/pipermail/r-br/attachments/20130826/8f6506b1/attachment-0001.html>
>> >
>>
>> ------------------------------
>>
>> Message: 4
>> Date: Mon, 26 Aug 2013 22:07:17 -0300
>> From: Helder Gramacho <agrohelder em gmail.com>
>> To: r-br em listas.c3sl.ufpr.br, Gilbert Queiroz
>>         <gilbert_queiroz em yahoo.com.br>
>> Subject: Re: [R-br] geoestatistica
>> Message-ID:
>>         <CAM0Q+6iir4LbAdS-1WW46-**Bzqf0zd_qO6mNMB1kxvVPi=Qss=Q@**
>> mail.gmail.com <Q em mail.gmail.com>>
>> Content-Type: text/plain; charset="iso-8859-1"
>>
>> Anderson Medeiros tem postagem onde informa material didático sobre o
>> tema:
>>
>> http://andersonmedeiros.com/**apostilas-geoestatistica/<http://andersonmedeiros.com/apostilas-geoestatistica/>
>>
>> att,
>>
>>
>> Em 26 de agosto de 2013 19:57, Gilbert Queiroz <
>> gilbert_queiroz em yahoo.com.br
>>
>>> escreveu:
>>>
>>
>>  Vai no site do INPE - DPI e baixa o livro do Gilberto Câmara.
>>> Abs.
>>>
>>>
>>>
>>>   ------------------------------
>>>  *De:* Hélio Gallo Rocha <heliogallorocha em gmail.com>
>>> *Para:* r-br <r-br em listas.c3sl.ufpr.br>
>>> *Enviadas:* Segunda-feira, 26 de Agosto de 2013 15:09
>>> *Assunto:* [R-br] geoestatistica
>>>
>>> Quem poderia prestar ajudapara Geoestatística, não para comandos do R,
>>> mas
>>> conceitualmente?
>>>
>>> --
>>> Hélio Gallo Rocha
>>> IFSULDEMINAS - Câmpus Muzambinho
>>>
>>> ______________________________**_________________
>>> R-br mailing list
>>> R-br em listas.c3sl.ufpr.br
>>> https://listas.inf.ufpr.br/**cgi-bin/mailman/listinfo/r-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<http://www.leg.ufpr.br/r-br-guia>)
>>> e forneça
>>> código mínimo reproduzível.
>>>
>>>
>>> ______________________________**_________________
>>> R-br mailing list
>>> R-br em listas.c3sl.ufpr.br
>>> https://listas.inf.ufpr.br/**cgi-bin/mailman/listinfo/r-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<http://www.leg.ufpr.br/r-br-guia>)
>>> e forneça
>>> código mínimo reproduzível.
>>>
>>>
>>
>>
>> --
>> Hélder Gramacho dos Santos
>> Engenheiro Agrônomo
>> Mestrando Ciênc. Geod. Tec. Geoinformação-UFPE
>> *
>> agrohelder em gmail.com <agrohelder em hotmail.com>
>> *
>> -------------- Próxima Parte ----------
>> Um anexo em HTML foi limpo...
>> URL: <http://listas.inf.ufpr.br/**pipermail/r-br/attachments/**
>> 20130826/fafc7cf3/attachment-**0001.html<http://listas.inf.ufpr.br/pipermail/r-br/attachments/20130826/fafc7cf3/attachment-0001.html>
>> >
>>
>> ------------------------------
>>
>> Message: 5
>> Date: Mon, 26 Aug 2013 22:50:25 -0300
>> From: Heloíse Pavanato <helopavanato em gmail.com>
>> To: r-br em listas.c3sl.ufpr.br
>> Subject: [R-br] path analysis - pacote agricolae
>> Message-ID:
>>         <**CAPw23dHezYd1i4Rk8HfoyLA2MQenq**8=HZY=qBMJvRR+A_MAAMA em mail.**
>> gmail.com <qBMJvRR%2BA_MAAMA em mail.gmail.com>>
>> Content-Type: text/plain; charset="iso-8859-1"
>>
>> Boa noite,
>>
>> Estou com uma dúvida sobre path analysis no pacote agricolae.
>>
>> No exemplo do manual do pacote se usa a correlação de Pearson para depois
>> computar os coeficientes da análise.
>>
>> Minha dúvida é se posso utliizar correlação de Spearman ao invés, já que
>> meus dados não são normais, gostaria de saber se isso bastaria.
>> Se alguém tiver alguma outra sugestão será muito bem-vinda.
>>
>> O CRM segue abaixo:
>>
>> # dados:
>> y <- c(77,  92,  94,  95,  79,  87,  91,  70,  65,  69,  68,  56,  71,
>>  67,
>>  62,  95,  91,  78,
>>       90,  85,  83,  78,  65,  77,  87,  43,  55,  63,  66,  87,  67,  70,
>>  69,  30,  28,  44,
>>       67,  89, 82,  36,  60,  52,  14,  19,  51,  22,  37,  15,  86,  79,
>>  31,  35,  15,  96,
>>       89,  88,  92,  90,  18,  15,  13,  93,  95,  83,  95, 100, 100,  84,
>>  90,  93,  74,  78,
>>       73,  69,  75,  67,  68, 100,  95,  94,  94,  88,  93,  83,  73,  88,
>>  95,  71,  69,  71,
>>       74, 100,  71,  77,  73,  56,  52,  62,  75,  93,  88,  44,  72,  60,
>>  27,  33,  69,  35,
>>       44,  27,  93,  87,  56,  52,  27,  98,  94,  90,  96,  95,  26,  20,
>>  16,  94,  97, 100)
>>
>> temp <- c(26.26, 26.26, 26.26, 26.26, 26.26, 26.26, 26.26, 25.83, 25.83,
>> 25.83, 25.83, 25.83,
>>           25.83, 25.83, 25.83, 26.40, 26.40, 26.40, 26.40, 26.40, 26.40,
>> 26.40, 26.40, 26.13,
>>           26.13, 26.13, 26.13, 26.13, 26.13, 26.13, 26.13, 25.60, 25.60,
>> 25.60, 25.60, 25.60,
>>           25.60, 25.60, 25.60, 24.96, 24.96, 24.96, 24.96, 24.96, 24.96,
>> 24.96, 24.96, 25.30,
>>           25.30, 25.30, 25.30, 25.30, 25.30, 25.30, 25.30, 26.76, 26.76,
>> 26.76, 26.76, 26.76,
>>           26.76, 26.76, 26.76, 24.36, 24.36, 24.36, 24.36, 24.36, 24.36,
>> 24.36, 23.80, 23.80,
>>           23.80, 23.80, 23.80, 23.80, 23.80, 24.26, 24.26, 24.26, 24.26,
>> 24.26, 24.26, 24.26,
>>           24.26, 23.70, 23.70, 23.70, 23.70, 23.70, 23.70, 23.70, 23.70,
>> 23.06, 23.06, 23.06,
>>           23.06, 23.06, 23.06, 23.06, 23.06, 21.93, 21.93, 21.93, 21.93,
>> 21.93, 21.93, 21.93,
>>           21.93, 22.30, 22.30, 22.30, 22.30, 22.30, 22.30, 22.30, 22.30,
>> 24.00, 24.00, 24.00,
>>           24.00, 24.00, 24.00, 24.00, 24.00, 24.00)
>>
>> pluv <- c(136.6, 136.6, 136.6, 136.6, 136.6, 136.6, 136.6, 136.0, 136.0,
>> 136.0, 136.0, 136.0,
>>           136.0, 136.0, 136.0, 112.3, 112.3, 112.3, 112.3, 112.3, 112.3,
>> 112.3, 112.3,  65.3,
>>           65.3,  65.3,  65.3,  65.3,  65.3,  65.3,  65.3,  66.0,  66.0,
>>  66.0,  66.0,  66.0,
>>           66.0,  66.0,  66.0,  65.0,  65.0,  65.0,  65.0,  65.0,  65.0,
>>  65.0,  65.0,  53.0,
>>           53.0,  53.0,  53.0,  53.0,  53.0,  53.0,  53.0,  53.0,  53.0,
>>  53.0,  53.0,  53.0,
>>           53.0,  53.0,  53.0, 254.6, 254.6, 254.6, 254.6, 254.6, 254.6,
>> 254.6, 256.6, 256.6,
>>           256.6, 256.6, 256.6, 256.6, 256.6, 231.3, 231.3, 231.3, 231.3,
>> 231.3, 231.3, 231.3,
>>           231.3, 142.6, 142.6, 142.6, 142.6, 142.6, 142.6, 142.6, 142.6,
>> 126.6, 126.6, 126.6,
>>           126.6, 126.6, 126.6, 126.6, 126.6, 118.0, 118.0, 118.0, 118.0,
>> 118.0, 118.0, 118.0,
>>           118.0, 110.6, 110.6, 110.6, 110.6, 110.6, 110.6, 110.6, 110.6,
>>  57.6,  57.6,  57.6,
>>           57.6,  57.6,  57.6,  57.6,  57.6,  57.6)
>>
>> # shapiro-wilk
>> shapiro.test(y)
>> shapiro.test(x$temperatura) # não é normal!
>> shapiro.test(x$pluviosidade)
>>
>> x <- data.frame(temp,pluv)
>>
>> # path analysis
>> require(agricolae)
>> cor.y <- correlation(y,x)$correlation
>> cor.x <- correlation(x)$correlation
>> path.analysis(cor.x,cor.y)
>>
>> Grata,
>> Heloise
>> -------------- Próxima Parte ----------
>> Um anexo em HTML foi limpo...
>> URL: <http://listas.inf.ufpr.br/**pipermail/r-br/attachments/**
>> 20130826/6d0138c9/attachment-**0001.html<http://listas.inf.ufpr.br/pipermail/r-br/attachments/20130826/6d0138c9/attachment-0001.html>
>> >
>>
>> ------------------------------
>>
>> Message: 6
>> Date: Mon, 26 Aug 2013 23:00:08 -0300
>> From: "Maicon J. Galiazzi" <maicon_galiazzi em hotmail.com>
>> To: "r-br em listas.c3sl.ufpr.br" <r-br em listas.c3sl.ufpr.br>
>> Subject: [R-br] Manual
>> Message-ID: <BLU171-**W1095CDC97ABFB13A0029C39C4A0@**phx.gbl>
>> Content-Type: text/plain; charset="iso-8859-1"
>>
>> Olá, estou desenvolvendo um manual de fácil utilização ao usuário, e no
>> momento estou descrevendo a interfacedo software R Stuio 0.97.551, assim
>> como a barra de ferramentas do mesmo.
>>
>> Podem me indicar algum material no qual posso conferir?
>>
>> Desde já agradeço!
>>
>> Att Maicon J. Galiazzi
>> -------------- Próxima Parte ----------
>> Um anexo em HTML foi limpo...
>> URL: <http://listas.inf.ufpr.br/**pipermail/r-br/attachments/**
>> 20130826/05874017/attachment-**0001.html<http://listas.inf.ufpr.br/pipermail/r-br/attachments/20130826/05874017/attachment-0001.html>
>> >
>>
>> ------------------------------
>>
>> Message: 7
>> Date: Mon, 26 Aug 2013 23:21:11 -0300
>> From: Fernando Antonio de souza <nandodesouza em gmail.com>
>> To: r-br em listas.c3sl.ufpr.br
>> Subject: Re: [R-br] Manual
>> Message-ID:
>>         <CAFrWFs=Hx_**ULkhix6XAoEsEBhhdte=y3S51-**
>> vvnxY7q246K1Fg em mail.gmail.com <y3S51-vvnxY7q246K1Fg em mail.gmail.com>>
>> Content-Type: text/plain; charset="iso-8859-1"
>>
>> Este livro aqui http://it-ebooks.info/book/**1575/<http://it-ebooks.info/book/1575/>,
>> é um tutorial sobre
>> Rstudio
>>
>> abçs
>>
>>
>> Em 26 de agosto de 2013 23:00, Maicon J. Galiazzi <
>> maicon_galiazzi em hotmail.com> escreveu:
>>
>>  Olá, estou desenvolvendo um manual de fácil utilização ao usuário, e no
>>> momento estou descrevendo a interface
>>> do software R Stuio 0.97.551, assim como a barra de ferramentas do mesmo.
>>>
>>> Podem me indicar algum material no qual posso conferir?
>>>
>>> Desde já agradeço!
>>>
>>> Att Maicon J. Galiazzi
>>>
>>> ______________________________**_________________
>>> R-br mailing list
>>> R-br em listas.c3sl.ufpr.br
>>> https://listas.inf.ufpr.br/**cgi-bin/mailman/listinfo/r-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<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/**
>> 20130826/c36b7bfe/attachment-**0001.html<http://listas.inf.ufpr.br/pipermail/r-br/attachments/20130826/c36b7bfe/attachment-0001.html>
>> >
>>
>> ------------------------------
>>
>> Message: 8
>> Date: Tue, 27 Aug 2013 09:20:08 +0200
>> From: Elias T Krainski <eliaskrainski em yahoo.com.br>
>> To: r-br em listas.c3sl.ufpr.br
>> Subject: Re: [R-br] geoestatistica
>> Message-ID: <521C5328.3030902 em yahoo.com.br**>
>> Content-Type: text/plain; charset="iso-8859-1"; Format="flowed"
>>
>> Alem desses materiais de abordagem classica sugeridos, se vc e'
>> estatistica, consulte livros com a abordagem 'Model Based':
>> 1 - verossimilhantista:
>> http://www.springer.com/earth+**sciences+and+geography/book/**
>> 978-0-387-32907-9<http://www.springer.com/earth+sciences+and+geography/book/978-0-387-32907-9>
>> 2 - bayesiana:
>> http://www.amazon.com/**Hierarchical-Modeling-**Monographs-Statistics-**
>> Probability/dp/158488410X<http://www.amazon.com/Hierarchical-Modeling-Monographs-Statistics-Probability/dp/158488410X>
>>
>> Att.
>> Elias
>>
>> On 08/27/2013 03:07 AM, Helder Gramacho wrote:
>>
>>> Anderson Medeiros tem postagem onde informa material didático sobre o
>>> tema:
>>>
>>> http://andersonmedeiros.com/**apostilas-geoestatistica/<http://andersonmedeiros.com/apostilas-geoestatistica/>
>>>
>>> att,
>>>
>>>
>>> Em 26 de agosto de 2013 19:57, Gilbert Queiroz
>>> <gilbert_queiroz em yahoo.com.br <mailto:gilbert_queiroz em yahoo.**com.br<gilbert_queiroz em yahoo.com.br>
>>> >>
>>> escreveu:
>>>
>>>     Vai no site do INPE - DPI e baixa o livro do Gilberto Câmara.
>>>     Abs.
>>>
>>>
>>>
>>>     ------------------------------**------------------------------**
>>> ------------
>>>     *De:* Hélio Gallo Rocha <heliogallorocha em gmail.com
>>>     <mailto:heliogallorocha em gmail.**com <heliogallorocha em gmail.com>>>
>>>     *Para:* r-br <r-br em listas.c3sl.ufpr.br
>>>     <mailto:r-br em listas.c3sl.ufpr.**br <r-br em listas.c3sl.ufpr.br>>>
>>>     *Enviadas:* Segunda-feira, 26 de Agosto de 2013 15:09
>>>     *Assunto:* [R-br] geoestatistica
>>>
>>>     Quem poderia prestar ajudapara Geoestatística, não para comandos
>>>     do R, mas conceitualmente?
>>>
>>>     --
>>>     Hélio Gallo Rocha
>>>     IFSULDEMINAS - Câmpus Muzambinho
>>>
>>>     ______________________________**_________________
>>>     R-br mailing list
>>>     R-br em listas.c3sl.ufpr.br <mailto:R-br em listas.c3sl.ufpr.**br<R-br em listas.c3sl.ufpr.br>
>>> >
>>>     https://listas.inf.ufpr.br/**cgi-bin/mailman/listinfo/r-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<http://www.leg.ufpr.br/r-br-guia>)
>>> e
>>>     forneça código mínimo reproduzível.
>>>
>>>
>>>     ______________________________**_________________
>>>     R-br mailing list
>>>     R-br em listas.c3sl.ufpr.br <mailto:R-br em listas.c3sl.ufpr.**br<R-br em listas.c3sl.ufpr.br>
>>> >
>>>     https://listas.inf.ufpr.br/**cgi-bin/mailman/listinfo/r-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<http://www.leg.ufpr.br/r-br-guia>)
>>> e
>>>     forneça código mínimo reproduzível.
>>>
>>>
>>>
>>>
>>> --
>>> Hélder Gramacho dos Santos
>>> Engenheiro Agrônomo
>>> Mestrando Ciênc. Geod. Tec. Geoinformação-UFPE
>>> /
>>> /agrohelder em gmail.com <mailto:agrohelder em hotmail.com**>/
>>> /
>>>
>>>
>>>
>>> ______________________________**_________________
>>> R-br mailing list
>>> R-br em listas.c3sl.ufpr.br
>>> https://listas.inf.ufpr.br/**cgi-bin/mailman/listinfo/r-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<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/**
>> 20130827/0fbb0af0/attachment-**0001.html<http://listas.inf.ufpr.br/pipermail/r-br/attachments/20130827/0fbb0af0/attachment-0001.html>
>> >
>>
>> ------------------------------
>>
>> Message: 9
>> Date: Tue, 27 Aug 2013 06:40:47 -0400
>> From: Éder Comunello <comunello.eder em gmail.com>
>> To: r-br em listas.c3sl.ufpr.br
>> Subject: Re: [R-br] Selecionar variáveis conforme linhas
>> Message-ID:
>>         <CABmC8gkFBHiY8ONL=-xwo7DwsUxK**yisvDg0pOPrxABxAvyuK2w em mail.**
>> gmail.com <xwo7DwsUxKyisvDg0pOPrxABxAvyuK2w em mail.gmail.com>>
>> Content-Type: text/plain; charset="iso-8859-1"
>>
>> Roney, bom dia!
>>
>> Não deve ser a melhor forma, mas o código abaixo pode ser um começo...
>>
>>
>> # <BEGIN>
>> #install.packages('repmis')
>> library(repmis)
>> FinURL <- paste0("
>> https://dl.dropboxusercontent.**com/u/61883020/2013-08-25-r-**br.csv<https://dl.dropboxusercontent.com/u/61883020/2013-08-25-r-br.csv>
>> ")
>>
>> data <- repmis::source_data(FinURL, sep = ",", header = TRUE)
>>
>> dim(data); head(data)
>>
>> data$new   = 0; data$prop  = 0; data$medlnk= 0
>> str(data)
>> for (i in 1:length(data[,1])){  # para cada linha
>>           col    = data[i,2]+2  # coluna do grupo dado
>>           dado   = data[i,col]  # dado para a coluna calculada
>>           nlink  = length(data[1,3:6]>0) # núm de grupos com valor
>> (ligações)
>>           data[i,8]  = dado     # aloja o dado
>>           data[i,9]  = dado/(data[i,7]-dado) # total - dado do grupo
>>           data[i,10] = data[i,7]/nlink       # total/núm ligações
>> }
>> head(data)
>> #<END>
>>
>>
>>  head(data)
>>>
>>   pessoa pessoa.grupo g.1 g.2  g.3 g.4   tc  new      prop medlnk
>> 1      a            3 360 913 1407 674 3354 1407 0.7226502 838.50
>> 2      b            2 235 693  588 384 1900  693 0.5741508 475.00
>> 3      c            4 355 435  285 524 1599  524 0.4874419 399.75
>> 4      e            3  37 129  258  80  504  258 1.0487805 126.00
>> 5      f            1 317  40   14  95  466  317 2.1275168 116.50
>> 6      g            2  17 216   88  27  348  216 1.6363636  87.00
>>
>>
>> --
>> Éder Comunello <c <comunello.eder em gmail.com>omun**ello.eder em gmail.com<omunello.eder em gmail.com>
>> >
>> Dourados, MS - [22 16.5'S, 54 49'W]
>> -------------- Próxima Parte ----------
>> Um anexo em HTML foi limpo...
>> URL: <http://listas.inf.ufpr.br/**pipermail/r-br/attachments/**
>> 20130827/64bf367c/attachment-**0001.html<http://listas.inf.ufpr.br/pipermail/r-br/attachments/20130827/64bf367c/attachment-0001.html>
>> >
>>
>> ------------------------------
>>
>> Message: 10
>> Date: Tue, 27 Aug 2013 09:17:09 -0400
>> From: Éder Comunello <comunello.eder em gmail.com>
>> To: r-br em listas.c3sl.ufpr.br
>> Subject: Re: [R-br] Selecionar variáveis conforme linhas
>> Message-ID:
>>         <CABmC8g=qhcymTougJBpgWn-**1KbGk1nQHg3W1fd54g9i0kfQnQg@**
>> mail.gmail.com<qhcymTougJBpgWn-1KbGk1nQHg3W1fd54g9i0kfQnQg em mail.gmail.com>
>> >
>> Content-Type: text/plain; charset="iso-8859-1"
>>
>> Corrigindo...
>>
>> Tinha um erro no cálculo do nlink, que retornava sempre 4...
>>
>> Segue a modificação.
>>
>> # <BEGIN>
>> #install.packages('repmis')
>> library(repmis)
>> FinURL <- paste0("
>> https://dl.dropboxusercontent.**com/u/61883020/2013-08-25-r-**br.csv<https://dl.dropboxusercontent.com/u/61883020/2013-08-25-r-br.csv>
>> ")
>>
>> data <- repmis::source_data(FinURL, sep = ",", header = TRUE)
>>
>> dim(data); head(data)
>>
>> data$new = 0; data$prop = 0; data$medlnk= 0; data$nlink=0
>> str(data)
>> for (i in 1:length(data[,1])){  # para cada linha
>>           col    = data[i,2]+2  # coluna do grupo dado
>>           dado   = data[i,col]  # dado para a coluna calculada
>>           nlink  = length(which(data[i,3:6]>0)) # núm de grupos com valor
>> (ligações)
>>           data[i,8]  = dado     # aloja o dado
>>           data[i,9]  = dado/(data[i,7]-dado) # total - dado do grupo
>>           data[i,10] = data[i,7]/nlink       # total/núm ligações
>>           data[i,11] = nlink
>> }
>> tail(data)
>> #<END>
>>
>>  tail(data)
>>>
>>    pessoa pessoa.grupo g.1 g.2 g.3 g.4  tc new      prop    medlnk nlink
>> 15      q            3   8  49 157  17 231 157 2.1216216  57.75000     4
>> 16      r            2  27 138  33  27 225 138 1.5862069  56.25000     4
>> 17      s            2  32  82  25  77 216  82 0.6119403  54.00000     4
>> 18      t            3  12  16 183   3 214 183 5.9032258  53.50000     4
>> 19      u            4   0  54  33  90 212  90 0.7377049  70.66667     3
>> 20      v            3   0   0 135  11 211 135 1.7763158 105.50000     2
>>
>>
>>
>>
>> --
>> Éder Comunello <c <comunello.eder em gmail.com>omun**ello.eder em gmail.com<omunello.eder em gmail.com>
>> >
>> Dourados, MS - [22 16.5'S, 54 49'W]
>> -------------- Próxima Parte ----------
>> Um anexo em HTML foi limpo...
>> URL: <http://listas.inf.ufpr.br/**pipermail/r-br/attachments/**
>> 20130827/99c14733/attachment-**0001.html<http://listas.inf.ufpr.br/pipermail/r-br/attachments/20130827/99c14733/attachment-0001.html>
>> >
>>
>> ------------------------------
>>
>> Message: 11
>> Date: Tue, 27 Aug 2013 14:30:55 +0100
>> From: alanarocha em sapo.pt
>> To: sandro.matos em vodafone.com, R-br em listas.c3sl.ufpr.br
>> Subject: [R-br] erros
>> Message-ID:
>>         <20130827143055.Horde.**GRORLQQDb4VSHKoP4OyAGAA em mail.**sapo.pt<20130827143055.Horde.GRORLQQDb4VSHKoP4OyAGAA em mail.sapo.pt>
>> >
>> Content-Type: text/plain; charset=UTF-8; format=flowed; DelSp=Yes
>>
>> estes são os erros de grafico que estou a ter como resolvo?
>> boxplot(dados[,-1], axes=FALSE) # O parametro axes=FALSE faz com que
>> os eixos não sejam desenhados
>> title(col.name="blue",main= 'Indicador Hemoglobina, semestres
>> compreendidos entre 2009 e 2013') # Acrescenta o título do gráfico
>> Warning message:
>> In title(col.name = "blue", main = "Indicador Hemoglobina, semestres
>> compreendidos entre 2009 e 2013") :
>>    "col.name" is not a graphical parameter
>> title(col.xlab="blue",xlab= 'semestres') # Acrescenta o titulo do eixo X
>> Warning message:
>> In title(col.xlab = "blue", xlab = "semestres") :
>>    "col.xlab" is not a graphical parameter
>> title(col.ylab="blue",ylab= 'Percentual') # Acrescenta o titulo do eixo Y
>> Warning message:
>> In title(col.ylab = "blue", ylab = "Percentual") :
>>    "col.ylab" is not a graphical parameter
>> box() # Desenha a caixa em torno do gráfico
>> axis(2) # Coloca o eixo Y (o 2 ali representa o eixo Y) no gráfico
>> axis(1, 1:5, c("1s09", "1s10", "1s11", "1s12", "1s13")) # Coloca no
>> eixo X (representado pelo 1), nos pontos 1 a 5, as etiquetas  dos
>> semestres compreendidos entre 1s09 e 1s2013
>>
>> medias<-apply(dados[,-1],2,**mean,na.rm=TRUE) # Calcula as médias
>>
>>> points(medias,col="red",pch=**17) # Adiciona os pontos das médias no
>>> boxplot
>>>
>> Error in plot.xy(xy.coords(x, y), type = type, ...) :
>>    plot.new has not been called yet
>>
>>
>>
>> ------------------------------
>>
>> Message: 12
>> Date: Tue, 27 Aug 2013 11:03:47 -0300
>> From: Rogério Barbosa <antrologos em gmail.com>
>> To: r-br <r-br em listas.c3sl.ufpr.br>
>> Cc: sandro.matos em vodafone.com
>> Subject: Re: [R-br] erros
>> Message-ID:
>>         <CAM+NV=2OSOdRDuZWw81EZB6NJ7HK**QoXLokqYCC0oA8cMe-xTeA em mail.**
>> gmail.com <2OSOdRDuZWw81EZB6NJ7HKQoXLokqYCC0oA8cMe-xTeA em mail.gmail.com>>
>> Content-Type: text/plain; charset="iso-8859-1"
>>
>> Aqui vai, Alana,
>>
>> Como você não compartilhou um conjunto mínimo de dados para a reprodução
>> do
>> seu exemplo, inventei algumas variáveis.
>>
>> abs,
>> Rogério
>>
>>
>> ##############################**#####
>>
>> rm(list=ls())
>>
>> ####### "Invenção" de um conjunto de dados
>> n=500
>> col.1 = rep(NA,n)
>> s1.2009 = cumsum(rnorm(n))
>> s1.2010 = cumsum(rnorm(n))
>> s1.2011 = cumsum(rnorm(n))
>> s1.2012 = cumsum(rnorm(n))
>> s1.2013 = cumsum(rnorm(n))
>>
>> dados = data.frame(cbind(col.1, s1.2009,s1.2010,
>>                          s1.2011,s1.2012, s1.2013))
>>
>>
>> ####### Gráfico:
>>
>>
>> boxplot(dados[,-1], axes=FALSE) # O parametro axes=FALSE faz com que os
>> eixos não sejam desenhados
>> title(col.main="blue",
>>       main= 'Indicador Hemoglobina, \n semestres compreendidos entre 2009
>> e
>> 2013') # Acrescenta o título do gráfico === o comando era col.main
>>
>> title(col.lab="blue",xlab= 'semestres') # Acrescenta o titulo do eixo X
>>  ==== o comando era apenas col.lab
>> title(col.lab="blue",ylab= 'Percentual') # Acrescenta o titulo do eixo Y
>>
>> box() # Desenha a caixa em torno do gráfico
>> axis(2) # Coloca o eixo Y (o 2 ali representa o eixo Y) no gráfico
>> axis(1, 1:5, c("1s09", "1s10", "1s11", "1s12", "1s13")) # Coloca no eixo X
>> (representado pelo 1), nos pontos 1 a 5, as etiquetas  dos semestres
>> compreendidos entre 1s09 e 1s2013
>>
>> medias<-apply(dados[,-1],2,**mean,na.rm=TRUE) # Calcula as médias
>> points(medias,col="red",pch=**17) # Adiciona os pontos das médias no
>> boxplot
>> === só pode ser usado se o boxplot já estiver plotado.
>>
>>
>>
>>
>>
>> 2013/8/27 <alanarocha em sapo.pt>
>>
>>  estes são os erros de grafico que estou a ter como resolvo?
>>> boxplot(dados[,-1], axes=FALSE) # O parametro axes=FALSE faz com que os
>>> eixos não sejam desenhados
>>> title(col.name="blue",main= 'Indicador Hemoglobina, semestres
>>> compreendidos entre 2009 e 2013') # Acrescenta o título do gráfico
>>> Warning message:
>>> In title(col.name = "blue", main = "Indicador Hemoglobina, semestres
>>> compreendidos entre 2009 e 2013") :
>>>   "col.name" is not a graphical parameter
>>> title(col.xlab="blue",xlab= 'semestres') # Acrescenta o titulo do eixo X
>>> Warning message:
>>> In title(col.xlab = "blue", xlab = "semestres") :
>>>   "col.xlab" is not a graphical parameter
>>> title(col.ylab="blue",ylab= 'Percentual') # Acrescenta o titulo do eixo Y
>>> Warning message:
>>> In title(col.ylab = "blue", ylab = "Percentual") :
>>>   "col.ylab" is not a graphical parameter
>>> box() # Desenha a caixa em torno do gráfico
>>> axis(2) # Coloca o eixo Y (o 2 ali representa o eixo Y) no gráfico
>>> axis(1, 1:5, c("1s09", "1s10", "1s11", "1s12", "1s13")) # Coloca no eixo
>>> X
>>> (representado pelo 1), nos pontos 1 a 5, as etiquetas  dos semestres
>>> compreendidos entre 1s09 e 1s2013
>>>
>>> medias<-apply(dados[,-1],2,****mean,na.rm=TRUE) # Calcula as médias
>>>
>>>  points(medias,col="red",pch=****17) # Adiciona os pontos das médias no
>>>> boxplot
>>>>
>>>>  Error in plot.xy(xy.coords(x, y), type = type, ...) :
>>>   plot.new has not been called yet
>>>
>>> ______________________________****_________________
>>> R-br mailing list
>>> R-br em listas.c3sl.ufpr.br
>>> https://listas.inf.ufpr.br/****cgi-bin/mailman/listinfo/r-br<https://listas.inf.ufpr.br/**cgi-bin/mailman/listinfo/r-br>
>>> <**https://listas.inf.ufpr.br/**cgi-bin/mailman/listinfo/r-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<http://www.leg.ufpr.br/r-br-**guia>
>>> <http://www.leg.ufpr.br/**r-br-guia <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/**
>> 20130827/d426f108/attachment-**0001.html<http://listas.inf.ufpr.br/pipermail/r-br/attachments/20130827/d426f108/attachment-0001.html>
>> >
>>
>> ------------------------------
>>
>> Subject: Legenda do Digest
>>
>> ______________________________**_________________
>> R-br mailing list
>> R-br em listas.c3sl.ufpr.br
>> https://listas.inf.ufpr.br/**cgi-bin/mailman/listinfo/r-br<https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br>
>>
>>
>> ------------------------------
>>
>> Fim da Digest R-br, volume 32, assunto 26
>> *******************************************
>>
>
>
> ______________________________**_________________
> R-br mailing list
> R-br em listas.c3sl.ufpr.br
> https://listas.inf.ufpr.br/**cgi-bin/mailman/listinfo/r-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<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/20130828/8449038e/attachment.html>


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