- R-br - DINF UFPR

Legenda em gráfico
by alanarocha＠sapo.pt 26 Jul '13

26 Jul '13

boa tarde, Eu estou a experimentar o codigo da Fátima, mas não estou a perceber a diferença entre haver uma linha ou duas linhas na legenda, o codigo correcto é este? Usei os seguintes comandos: sob.km3=survfit(Surv(tempo,status)~eletiva,data=sob) plot(sob.km3,conf.int=F,mark.time=F,lty=c(1,2),xlab="Dias",ylab="S(t)") legend(x="bottomleft",legend=c(1,2),title="Eletiva") obrigada Ana Quoting r-br-request(a)listas.c3sl.ufpr.br: > Enviar submissões para a lista de discussão R-br para > r-br(a)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 > ou, via email, envie uma mensagem com a palavra 'help' no assunto ou > corpo da mensagem para > r-br-request(a)listas.c3sl.ufpr.br > > Você poderá entrar em contato com a pessoa que gerencia a lista pelo > endereço > r-br-owner(a)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. Ubuntu em disco GPT [Off Topic] > (Sérgio Henrique almeida da silva ju) > 2. Re: Ubuntu em disco GPT [Off Topic] (Benilton Carvalho) > 3. Re: Error in scan - line 666895 did not have 12 elements > (Adriano Borges Costa) > 4. Re: Error in scan - line 666895 did not have 12 elements > (Rodrigo Coster) > 5. Legenda em gráfico (Fátima Lima Paula) > 6. return com if (Alisson Lucrecio) > 7. Re: Ubuntu em disco GPT [Off Topic] (Fernando Mayer) > 8. Re: return com if (Benilton Carvalho) > 9. Re: Legenda em gráfico (Fernando Antonio de souza) > 10. Re: Legenda em gráfico (Fátima Lima Paula) > 11. Re: return com if (Alisson Lucrecio) > 12. Re: Legenda em gráfico (Fátima Lima Paula) > 13. Re: Ubuntu em disco GPT [Off Topic] > (Sérgio Henrique almeida da silva ju) > 14. Re: Legenda em gráfico (Fernando Antonio de souza) > 15. Re: Error in scan - line 666895 did not have 12 elements > (Marcos Silva) > 16. Re: Datas em R (Henrique Dallazuanna) > 17. Novo problema para mudar projeção de um raster (ASANTOS) > 18. Título do eixo x de gráfico em barras (Aline Lipsky) > > > ---------------------------------------------------------------------- > > Message: 1 > Date: Thu, 25 Jul 2013 12:02:30 -0300 > From: Sérgio Henrique almeida da silva ju <sergio.edfisica(a)gmail.com> > To: "r-br(a)listas.c3sl.ufpr.br" <r-br(a)listas.c3sl.ufpr.br> > Subject: [R-br] Ubuntu em disco GPT [Off Topic] > Message-ID: > <CAEuVWs3Rt360Jt1edsg8B36chedfTHGMD_rtHt14ZpAoZsHcOg(a)mail.gmail.com> > Content-Type: text/plain; charset="iso-8859-1" > > Prezados > > Estou com um notebook lenovo Ideapad S400 que veio com Windows 8 e gostaria > de transforma-lo em Dual Boot e instalar o Ubuntu, porém não estou > conseguindo, ele até instala, mas só inicia no Windows 8. > Andei pesquisando e vi que o disco está em GPT. > > Alguém tem ideia como posso resolver isso? > > Abraços > > > -- > Sérgio Henrique Almeida da Silva Junior > Doutorando em Epidemiologia em Saúde Pública > Escola Nacional de Saúde Pública Sérgio Arouca - ENSP/FIOCRUZ > http://lattes.cnpq.br/1611345552843383 > Tel: (21) 68463637 > http://www.linkedin.com/profile/view?id=250437145&trk=tab_pro > -------------- Próxima Parte ---------- > Um anexo em HTML foi limpo... > URL: > <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20130725/3beb975e/atta…> > > ------------------------------ > > Message: 2 > Date: Thu, 25 Jul 2013 12:24:27 -0300 > From: Benilton Carvalho <beniltoncarvalho(a)gmail.com> > To: r-br <r-br(a)listas.c3sl.ufpr.br> > Subject: Re: [R-br] Ubuntu em disco GPT [Off Topic] > Message-ID: > <CAO-arWMhZb8bgR7AyYWLuOqC5eb4p91bvs3ee_zjB-Y72SnRFg(a)mail.gmail.com> > Content-Type: text/plain; charset=ISO-8859-1 > > Pode ser util: > http://www.makeuseof.com/tag/tired-of-windows-8-how-to-dual-boot-windows-ub… > > Em 25 de julho de 2013 12:02, Sérgio Henrique almeida da silva ju > <sergio.edfisica(a)gmail.com> escreveu: >> Prezados >> >> Estou com um notebook lenovo Ideapad S400 que veio com Windows 8 e gostaria >> de transforma-lo em Dual Boot e instalar o Ubuntu, porém não estou >> conseguindo, ele até instala, mas só inicia no Windows 8. >> Andei pesquisando e vi que o disco está em GPT. >> >> Alguém tem ideia como posso resolver isso? >> >> Abraços >> >> >> >> >> -- >> Sérgio Henrique Almeida da Silva Junior >> Doutorando em Epidemiologia em Saúde Pública >> Escola Nacional de Saúde Pública Sérgio Arouca - ENSP/FIOCRUZ >> http://lattes.cnpq.br/1611345552843383 >> Tel: (21) 68463637 >> http://www.linkedin.com/profile/view?id=250437145&trk=tab_pro >> >> _______________________________________________ >> R-br mailing list >> R-br(a)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. > > > ------------------------------ > > Message: 3 > Date: Thu, 25 Jul 2013 14:27:10 -0300 > From: Adriano Borges Costa <adrianobfc(a)gmail.com> > To: r-br(a)listas.c3sl.ufpr.br > Subject: Re: [R-br] Error in scan - line 666895 did not have 12 > elements > Message-ID: > <CAOmiUQYt2UGoP_izTcBQVZLcMjXYAqFPQZ-OoBWz0hPmwPP8pA(a)mail.gmail.com> > Content-Type: text/plain; charset="iso-8859-1" > > Caro Rodrigo, > > Obrigado pela resposta. Acabei viajando e pude apenas agora testar o que > você me indicou. > > Dei um scan como você me indicou e a resposta foi a seguinte: > >> scan("rais96.txt", skip=666890, n=10)Erro em scan(file, what, nmax, >> sep, dec, quote, skip, nlines, na.strings, : > scan() esperava 'a real', obteve '100941853000128522480000000003SP' > > > Você pode me ajudar a entender o que aconteceu? > > Obrigado > > Adriano > > > Em 24 de julho de 2013 13:33, Rodrigo Coster <rcoster(a)gmail.com> escreveu: > >> Adriano, >> >> da um scan('rais.txt', skip=666890, n=10) e ve se ele tem o mesmo tamanho >> das demais (isso vai pegar 10 linhas, incluindo a problematica). Para ver >> se tem o mesmo tamanho da para usar nchar(scan('rais.txt', skip=666890, >> n=10)) >> >> >> 2013/7/24 Adriano Borges Costa <adrianobfc(a)gmail.com> >> >>> Caros, >>> >>> Boa tarde! >>> >>> Estou tendo dificuldades para importar uma base de dados da RAIS que >>> tenho que trabalhar no R. Trata-se de uma base com mais de um 1GB, com 12 >>> variáveis, separadas por espaços fixos. >>> >>> Estou usando o comando abaixo: >>> rais96<-read.fwf("rais.txt", widths = c(1,14,5,10,12,6,1,45,18,52,19,8), >>> sep="\t", h=FALSE, stringsAsFactors=FALSE, comment.char='') >>> >>> Após vários minutos tem me retornado a mensagem abaixo: >>> Error in scan(file, what, nmax, sep, dec, quote, skip, nlines, >>> na.strings, : >>> line 666895 did not have 12 elements >>> >>> Estou usando o parâmetro comment.char='' porque existem caracteres # >>> utilizados para observações vazias. >>> >>> Eu não consigo abrir esse arquivo .txt no bloco de notas para analisar a >>> linha com erro. Existe alguma forma de eu conseguir no R acessar essa linha >>> específica para ver se tem algum erro? Você podem me dar alguma dica de >>> como resolver esse problema? >>> >>> Obrigado pela ajuda de sempre. >>> >>> Abraços >>> >>> -- >>> Adriano Borges Costa >>> >>> _______________________________________________ >>> R-br mailing list >>> R-br(a)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. >>> >> >> >> _______________________________________________ >> R-br mailing list >> R-br(a)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. >> > > > > -- > Adriano Borges Costa > -------------- Próxima Parte ---------- > Um anexo em HTML foi limpo... > URL: > <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20130725/4a362d82/atta…> > > ------------------------------ > > Message: 4 > Date: Thu, 25 Jul 2013 14:33:56 -0300 > From: Rodrigo Coster <rcoster(a)gmail.com> > To: "r-br(a)listas.c3sl.ufpr.br" <r-br(a)listas.c3sl.ufpr.br> > Subject: Re: [R-br] Error in scan - line 666895 did not have 12 > elements > Message-ID: > <CAKU4wosavR68pv-tznKF+9yB8djYP=OUyy_35zhiycDuE0Arxw(a)mail.gmail.com> > Content-Type: text/plain; charset="iso-8859-1" > > Adriano, > > Falha minha... o scan() funciona só com numeros, o que tu precisa é > readLines(). A desvantagem é que nao temos como pular linhas, então vamos > ter que ler todo o arquivo até a linha com problema > > test <- readLines("rais96.txt", n=666895) > nchar(tail(teste)) # Se todos forem iguais, importante ver qual que é > o que tem na linha 666895 > teste[666895] > > > []'s > -------------- Próxima Parte ---------- > Um anexo em HTML foi limpo... > URL: > <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20130725/1fc41433/atta…> > > ------------------------------ > > Message: 5 > Date: Thu, 25 Jul 2013 16:09:40 -0300 > From: Fátima Lima Paula <fatima.lima.paula(a)gmail.com> > To: "r-br(a)listas.c3sl.ufpr.br" <r-br(a)listas.c3sl.ufpr.br> > Subject: [R-br] Legenda em gráfico > Message-ID: > <CAJzNC0ubrKVe0GKCZ4frGYkfwQxAA_joFQnO4eH0wu-ThZviXw(a)mail.gmail.com> > Content-Type: text/plain; charset="iso-8859-1" > > Prezados, como sei qual será o tipo da linha que corresponderá à respectiva > variável quando faço uma análise de sobrevivência. Por exemplo, tenho uma > variável chamada eletiva que tem os valores sim e nao. Usei os seguintes > comandos: > > sob.km3=survfit(Surv(tempo,status)~eletiva,data=sob) > plot(sob.km3,conf.int=F,mark.time=F,lty=c(1,2),xlab="Dias",ylab="S(t)") > legend(x="bottomleft",legend=c("sim","não"),lty=c(1,2),title="Eletiva") > > Como sei que a linha1 será o sim da variável e a linha 2 o não, ou > vice-versa, se não especifiquei em momento nenhum? > Obrigada > Abs > Fátima > > > > -- > "Minha felicidade depende da qualidade dos meus pensamentos" > -------------- Próxima Parte ---------- > Um anexo em HTML foi limpo... > URL: > <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20130725/4c036ef5/atta…> > > ------------------------------ > > Message: 6 > Date: Thu, 25 Jul 2013 12:25:10 -0700 (PDT) > From: Alisson Lucrecio <alissonluc(a)yahoo.com.br> > To: "r-br(a)listas.c3sl.ufpr.br" <r-br(a)listas.c3sl.ufpr.br> > Subject: [R-br] return com if > Message-ID: > <1374780310.56167.YahooMailNeo(a)web160703.mail.bf1.yahoo.com> > Content-Type: text/plain; charset="iso-8859-1" > > Caros colegas, > > Boa tarde. Vocês poderia me ajudar nesse script, eu preciso fazer > retornar somente quando as data.frame forem criadas. > > Obrigado. > > return(list(anova=anova, cv=cv, shapiro.test=shapiro.test, > bart.test=bart.test, > if(!is.null(table1)) {table1 = table1}, > if(!is.null(table2)) {table2 = table2}) > > Alisson Lucrécio da Costa > -------------- Próxima Parte ---------- > Um anexo em HTML foi limpo... > URL: > <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20130725/b77043c7/atta…> > > ------------------------------ > > Message: 7 > Date: Thu, 25 Jul 2013 16:25:24 -0300 > From: Fernando Mayer <fernandomayer(a)gmail.com> > To: r-br(a)listas.c3sl.ufpr.br > Subject: Re: [R-br] Ubuntu em disco GPT [Off Topic] > Message-ID: > <CAO4bAdNyFXuLLaVJEvGwA0RY-G4gOFmUiesM+J2Oxu7BSA83qQ(a)mail.gmail.com> > Content-Type: text/plain; charset=ISO-8859-1 > > Primeiro vc precisa desabilitar o SecureBoot na BIOS (ou UEFI BIOS > provavelmente). O windows criou essa restrição para dificultar a > instlação do Linux. > > Na instalação do Ubuntu vc precisa criar uma partição pequena (~200 > MB) que aponte para /boot/efi e com a flag boot. Veja os detalhes e > tente seguir por aqui: https://help.ubuntu.com/community/UEFI > > > > --- > Fernando de Pol Mayer > Doutorando em Estatística e Experimentação Agronômica > Escola Superior de Agricultura "Luiz de Queiroz" - ESALQ > Universidade de São Paulo - USP > URL: http://fernandomayer.github.com > e-mail: fernando.mayer [@] {gmail.com, usp.br} > > > 2013/7/25 Benilton Carvalho <beniltoncarvalho(a)gmail.com>: >> Pode ser util: >> http://www.makeuseof.com/tag/tired-of-windows-8-how-to-dual-boot-windows-ub… >> >> Em 25 de julho de 2013 12:02, Sérgio Henrique almeida da silva ju >> <sergio.edfisica(a)gmail.com> escreveu: >>> Prezados >>> >>> Estou com um notebook lenovo Ideapad S400 que veio com Windows 8 e gostaria >>> de transforma-lo em Dual Boot e instalar o Ubuntu, porém não estou >>> conseguindo, ele até instala, mas só inicia no Windows 8. >>> Andei pesquisando e vi que o disco está em GPT. >>> >>> Alguém tem ideia como posso resolver isso? >>> >>> Abraços >>> >>> >>> >>> >>> -- >>> Sérgio Henrique Almeida da Silva Junior >>> Doutorando em Epidemiologia em Saúde Pública >>> Escola Nacional de Saúde Pública Sérgio Arouca - ENSP/FIOCRUZ >>> http://lattes.cnpq.br/1611345552843383 >>> Tel: (21) 68463637 >>> http://www.linkedin.com/profile/view?id=250437145&trk=tab_pro >>> >>> _______________________________________________ >>> R-br mailing list >>> R-br(a)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. >> _______________________________________________ >> R-br mailing list >> R-br(a)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. > > > ------------------------------ > > Message: 8 > Date: Thu, 25 Jul 2013 16:29:38 -0300 > From: Benilton Carvalho <beniltoncarvalho(a)gmail.com> > To: r-br <r-br(a)listas.c3sl.ufpr.br>, Alisson Lucrecio > <alissonluc(a)yahoo.com.br> > Subject: Re: [R-br] return com if > Message-ID: > <CAO-arWP=uD-oO=x7Mc4p43jWFfuHYkPy4V8+3V7DnJ=Q9QmhLw(a)mail.gmail.com> > Content-Type: text/plain; charset=ISO-8859-1 > > f = function(...){ > blah bleh blih > out = list(anova=anova, cv=cv, etc=etc) > if (!is.null(table1)) out$table1=table1 > if (!is.null(table2)) out$table2=table2 > return(out) > } > > 2013/7/25 Alisson Lucrecio <alissonluc(a)yahoo.com.br>: >> Caros colegas, >> >> Boa tarde. Vocês poderia me ajudar nesse script, eu preciso fazer retornar >> somente quando as data.frame forem criadas. >> >> Obrigado. >> >> return(list(anova=anova, cv=cv, shapiro.test=shapiro.test, >> bart.test=bart.test, >> if(!is.null(table1)) {table1 = table1}, >> if(!is.null(table2)) {table2 = table2}) >> >> Alisson Lucrécio da Costa >> >> _______________________________________________ >> R-br mailing list >> R-br(a)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. > > > ------------------------------ > > Message: 9 > Date: Thu, 25 Jul 2013 16:38:06 -0300 > From: Fernando Antonio de souza <nandodesouza(a)gmail.com> > To: r-br(a)listas.c3sl.ufpr.br > Subject: Re: [R-br] Legenda em gráfico > Message-ID: > <CAFrWFskhxw_JzbjPypcr1KJcUdBkw7763wYeSmJ-JNm4dFep4Q(a)mail.gmail.com> > Content-Type: text/plain; charset="iso-8859-1" > > Ele não sabe! ele atribuirá uma legenda na ordem que você informou no > argumento legend = c("sim","não") . Ele atribuirá os valores do argumento > lty =c(1,2) para sim e não respectivamente. > > Você que especificou esses tipos de linhas quando utilizou a função plot. > Quando vc fez isso você especificou dois tipos de linhas > plot(...lty=c(1,2)...). logicamente a mesma linha que você informou no plot > deve ser informada no legend ( para que le adicione a linha e seu > significado no plot) > > > Em 25 de julho de 2013 16:09, Fátima Lima Paula <fatima.lima.paula(a)gmail.com >> escreveu: > >> Prezados, como sei qual será o tipo da linha que corresponderá à >> respectiva variável quando faço uma análise de sobrevivência. Por exemplo, >> tenho uma variável chamada eletiva que tem os valores sim e nao. Usei os >> seguintes comandos: >> >> sob.km3=survfit(Surv(tempo,status)~eletiva,data=sob) >> plot(sob.km3,conf.int=F,mark.time=F,lty=c(1,2),xlab="Dias",ylab="S(t)") >> legend(x="bottomleft",legend=c("sim","não"),lty=c(1,2),title="Eletiva") >> >> Como sei que a linha1 será o sim da variável e a linha 2 o não, ou >> vice-versa, se não especifiquei em momento nenhum? >> Obrigada >> Abs >> Fátima >> >> >> >> -- >> "Minha felicidade depende da qualidade dos meus pensamentos" >> >> _______________________________________________ >> R-br mailing list >> R-br(a)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/20130725/9f76fc4d/atta…> > > ------------------------------ > > Message: 10 > Date: Thu, 25 Jul 2013 17:02:48 -0300 > From: Fátima Lima Paula <fatima.lima.paula(a)gmail.com> > To: "r-br(a)listas.c3sl.ufpr.br" <r-br(a)listas.c3sl.ufpr.br> > Subject: Re: [R-br] Legenda em gráfico > Message-ID: > <CAJzNC0uM24xHF3zUwGjB2NeXUiRpTp-jKhsDEBu3S7rDORhqbw(a)mail.gmail.com> > Content-Type: text/plain; charset="iso-8859-1" > > Ok. Isso eu entendo, mas a linha 1 será o quê? > Para ficar mais fácil para entender, vamos dizer que eu tenha as variáveis > 1 e 0 no data.frame. > Só eu sei que 1 é sim e 2 é não, ok? > Quando vou fazer a legenda, digo que quero as linhas 1 e 2. > Para eu dizer que a linha 1 é sim e a linha 2 é não, ou vice versa, preciso > saber qual ele fará com a linha 1 e qual fará com a linha 2. > Aí sim, dependendo dessa ordem eu vou criar a legenda. > O problema é saber isso, entendeu? > > > > Em 25 de julho de 2013 16:38, Fernando Antonio de souza < > nandodesouza(a)gmail.com> escreveu: > >> Ele não sabe! ele atribuirá uma legenda na ordem que você informou no >> argumento legend = c("sim","não") . Ele atribuirá os valores do argumento >> lty =c(1,2) para sim e não respectivamente. >> >> Você que especificou esses tipos de linhas quando utilizou a função plot. >> Quando vc fez isso você especificou dois tipos de linhas >> plot(...lty=c(1,2)...). logicamente a mesma linha que você informou no plot >> deve ser informada no legend ( para que le adicione a linha e seu >> significado no plot) >> >> >> Em 25 de julho de 2013 16:09, Fátima Lima Paula < >> fatima.lima.paula(a)gmail.com> escreveu: >> >>> Prezados, como sei qual será o tipo da linha que corresponderá à >>> respectiva variável quando faço uma análise de sobrevivência. Por exemplo, >>> tenho uma variável chamada eletiva que tem os valores sim e nao. Usei os >>> seguintes comandos: >>> >>> sob.km3=survfit(Surv(tempo,status)~eletiva,data=sob) >>> plot(sob.km3,conf.int=F,mark.time=F,lty=c(1,2),xlab="Dias",ylab="S(t)") >>> legend(x="bottomleft",legend=c("sim","não"),lty=c(1,2),title="Eletiva") >>> >>> Como sei que a linha1 será o sim da variável e a linha 2 o não, ou >>> vice-versa, se não especifiquei em momento nenhum? >>> Obrigada >>> Abs >>> Fátima >>> >>> >>> >>> -- >>> "Minha felicidade depende da qualidade dos meus pensamentos" >>> >>> _______________________________________________ >>> R-br mailing list >>> R-br(a)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. >>> >> >> >> _______________________________________________ >> R-br mailing list >> R-br(a)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. >> > > > > -- > "Minha felicidade depende da qualidade dos meus pensamentos" > -------------- Próxima Parte ---------- > Um anexo em HTML foi limpo... > URL: > <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20130725/f6b8bf57/atta…> > > ------------------------------ > > Message: 11 > Date: Thu, 25 Jul 2013 13:07:07 -0700 (PDT) > From: Alisson Lucrecio <alissonluc(a)yahoo.com.br> > To: Benilton Carvalho <beniltoncarvalho(a)gmail.com>, r-br > <r-br(a)listas.c3sl.ufpr.br> > Subject: Re: [R-br] return com if > Message-ID: > <1374782827.22028.YahooMailNeo(a)web160702.mail.bf1.yahoo.com> > Content-Type: text/plain; charset="iso-8859-1" > > Caro Benilton, > > Obrigado. > > Alisson Lucrécio da Costa > > > ________________________________ > From: Benilton Carvalho <beniltoncarvalho(a)gmail.com> > To: r-br <r-br(a)listas.c3sl.ufpr.br>; Alisson Lucrecio > <alissonluc(a)yahoo.com.br> > Sent: Thursday, July 25, 2013 4:29 PM > Subject: Re: [R-br] return com if > > > f = function(...){ > blah bleh blih > out = list(anova=anova, cv=cv, etc=etc) > if (!is.null(table1)) out$table1=table1 > if (!is.null(table2)) out$table2=table2 > return(out) > } > > 2013/7/25 Alisson Lucrecio <alissonluc(a)yahoo.com.br>: >> Caros colegas, >> >> Boa tarde. Vocês poderia me ajudar nesse script, eu preciso fazer retornar >> somente quando as data.frame forem criadas. >> >> Obrigado. >> >> return(list(anova=anova, cv=cv, shapiro.test=shapiro.test, >> bart.test=bart.test, >> if(!is.null(table1)) {table1 = table1}, >> if(!is.null(table2)) {table2 = table2}) >> >> Alisson Lucrécio da Costa >> >> _______________________________________________ >> R-br mailing list >> R-br(a)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/20130725/9fe83990/atta…> > > ------------------------------ > > Message: 12 > Date: Thu, 25 Jul 2013 17:13:40 -0300 > From: Fátima Lima Paula <fatima.lima.paula(a)gmail.com> > To: "r-br(a)listas.c3sl.ufpr.br" <r-br(a)listas.c3sl.ufpr.br> > Subject: Re: [R-br] Legenda em gráfico > Message-ID: > <CAJzNC0txzt3n=yhPtTBJ4YXny--VGAy5_do6iuu4F-JhdFPiog(a)mail.gmail.com> > Content-Type: text/plain; charset="iso-8859-1" > > Pessoal, acabei de descobrir. A ordem com que vem os tipos de linha no > survfit é a mesma da que vem descrita nos níveis das "factors". > Obrigada > Fátima > > > Em 25 de julho de 2013 17:02, Fátima Lima Paula <fatima.lima.paula(a)gmail.com >> escreveu: > >> Ok. Isso eu entendo, mas a linha 1 será o quê? >> Para ficar mais fácil para entender, vamos dizer que eu tenha as variáveis >> 1 e 0 no data.frame. >> Só eu sei que 1 é sim e 2 é não, ok? >> Quando vou fazer a legenda, digo que quero as linhas 1 e 2. >> Para eu dizer que a linha 1 é sim e a linha 2 é não, ou vice versa, >> preciso saber qual ele fará com a linha 1 e qual fará com a linha 2. >> Aí sim, dependendo dessa ordem eu vou criar a legenda. >> O problema é saber isso, entendeu? >> >> >> >> Em 25 de julho de 2013 16:38, Fernando Antonio de souza < >> nandodesouza(a)gmail.com> escreveu: >> >> Ele não sabe! ele atribuirá uma legenda na ordem que você informou no >>> argumento legend = c("sim","não") . Ele atribuirá os valores do argumento >>> lty =c(1,2) para sim e não respectivamente. >>> >>> Você que especificou esses tipos de linhas quando utilizou a função plot. >>> Quando vc fez isso você especificou dois tipos de linhas >>> plot(...lty=c(1,2)...). logicamente a mesma linha que você informou no plot >>> deve ser informada no legend ( para que le adicione a linha e seu >>> significado no plot) >>> >>> >>> Em 25 de julho de 2013 16:09, Fátima Lima Paula < >>> fatima.lima.paula(a)gmail.com> escreveu: >>> >>>> Prezados, como sei qual será o tipo da linha que corresponderá à >>>> respectiva variável quando faço uma análise de sobrevivência. Por exemplo, >>>> tenho uma variável chamada eletiva que tem os valores sim e nao. Usei os >>>> seguintes comandos: >>>> >>>> sob.km3=survfit(Surv(tempo,status)~eletiva,data=sob) >>>> plot(sob.km3,conf.int=F,mark.time=F,lty=c(1,2),xlab="Dias",ylab="S(t)") >>>> legend(x="bottomleft",legend=c("sim","não"),lty=c(1,2),title="Eletiva") >>>> >>>> Como sei que a linha1 será o sim da variável e a linha 2 o não, ou >>>> vice-versa, se não especifiquei em momento nenhum? >>>> Obrigada >>>> Abs >>>> Fátima >>>> >>>> >>>> >>>> -- >>>> "Minha felicidade depende da qualidade dos meus pensamentos" >>>> >>>> _______________________________________________ >>>> R-br mailing list >>>> R-br(a)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. >>>> >>> >>> >>> _______________________________________________ >>> R-br mailing list >>> R-br(a)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. >>> >> >> >> >> -- >> "Minha felicidade depende da qualidade dos meus pensamentos" >> > > > > -- > "Minha felicidade depende da qualidade dos meus pensamentos" > -------------- Próxima Parte ---------- > Um anexo em HTML foi limpo... > URL: > <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20130725/2dc80b72/atta…> > > ------------------------------ > > Message: 13 > Date: Thu, 25 Jul 2013 17:18:16 -0300 > From: Sérgio Henrique almeida da silva ju <sergio.edfisica(a)gmail.com> > To: "r-br(a)listas.c3sl.ufpr.br" <r-br(a)listas.c3sl.ufpr.br> > Subject: Re: [R-br] Ubuntu em disco GPT [Off Topic] > Message-ID: > <CAEuVWs0dXhfqgYccsq9SxjCfkirY2Lo536X-E29y0hdrF=gCDg(a)mail.gmail.com> > Content-Type: text/plain; charset="iso-8859-1" > > Obrigado amigos! > > > Em 25 de julho de 2013 16:25, Fernando Mayer > <fernandomayer(a)gmail.com>escreveu: > >> Primeiro vc precisa desabilitar o SecureBoot na BIOS (ou UEFI BIOS >> provavelmente). O windows criou essa restrição para dificultar a >> instlação do Linux. >> >> Na instalação do Ubuntu vc precisa criar uma partição pequena (~200 >> MB) que aponte para /boot/efi e com a flag boot. Veja os detalhes e >> tente seguir por aqui: https://help.ubuntu.com/community/UEFI >> >> >> >> --- >> Fernando de Pol Mayer >> Doutorando em Estatística e Experimentação Agronômica >> Escola Superior de Agricultura "Luiz de Queiroz" - ESALQ >> Universidade de São Paulo - USP >> URL: http://fernandomayer.github.com >> e-mail: fernando.mayer [@] {gmail.com, usp.br} >> >> >> 2013/7/25 Benilton Carvalho <beniltoncarvalho(a)gmail.com>: >> > Pode ser util: >> http://www.makeuseof.com/tag/tired-of-windows-8-how-to-dual-boot-windows-ub… >> > >> > Em 25 de julho de 2013 12:02, Sérgio Henrique almeida da silva ju >> > <sergio.edfisica(a)gmail.com> escreveu: >> >> Prezados >> >> >> >> Estou com um notebook lenovo Ideapad S400 que veio com Windows 8 e >> gostaria >> >> de transforma-lo em Dual Boot e instalar o Ubuntu, porém não estou >> >> conseguindo, ele até instala, mas só inicia no Windows 8. >> >> Andei pesquisando e vi que o disco está em GPT. >> >> >> >> Alguém tem ideia como posso resolver isso? >> >> >> >> Abraços >> >> >> >> >> >> >> >> >> >> -- >> >> Sérgio Henrique Almeida da Silva Junior >> >> Doutorando em Epidemiologia em Saúde Pública >> >> Escola Nacional de Saúde Pública Sérgio Arouca - ENSP/FIOCRUZ >> >> http://lattes.cnpq.br/1611345552843383 >> >> Tel: (21) 68463637 >> >> http://www.linkedin.com/profile/view?id=250437145&trk=tab_pro >> >> >> >> _______________________________________________ >> >> R-br mailing list >> >> R-br(a)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. >> > _______________________________________________ >> > R-br mailing list >> > R-br(a)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. >> _______________________________________________ >> R-br mailing list >> R-br(a)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. >> > > > > -- > Sérgio Henrique Almeida da Silva Junior > Doutorando em Epidemiologia em Saúde Pública > Escola Nacional de Saúde Pública Sérgio Arouca - ENSP/FIOCRUZ > http://lattes.cnpq.br/1611345552843383 > Tel: (21) 68463637 > http://www.linkedin.com/profile/view?id=250437145&trk=tab_pro > -------------- Próxima Parte ---------- > Um anexo em HTML foi limpo... > URL: > <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20130725/a8755bc0/atta…> > > ------------------------------ > > Message: 14 > Date: Thu, 25 Jul 2013 17:28:30 -0300 > From: Fernando Antonio de souza <nandodesouza(a)gmail.com> > To: r-br(a)listas.c3sl.ufpr.br > Subject: Re: [R-br] Legenda em gráfico > Message-ID: > <CAFrWFsnvQB_iAuF89SCwn7uukOH+3AGqV-umbhcvBd=MukwZFA(a)mail.gmail.com> > Content-Type: text/plain; charset="iso-8859-1" > > Eu entendi o que você disse. > > Acontece que quando você fez a função plot, você solicitou que as linhas > diferentes fossem desenhadas para cada tratamento. Você definiu o tipo de > linha para cada tratamento quando você definiu os valores do argumento > "lty" da função plot, Ok? > > Quando você utiliza a função legend ela não sabe quais são aos linhas que > você utilizou na função plot. Você disse isso a função quando inseriu os > argumentos legend=c("sim","não"),lty=c(1,2) dentro da função "legend(). A > função entende que Sim <- lty=1 e não <- lty=2 e adiciona as marcações do > tipo de linha e o que ela representa no ultimo dispositivo gráfico aberto > (ou seja no último grávico que você gerou) > > O que quero dizer é que a função "legend" não sabe nada. Você é que diz a > ela. Se você olhar direito verá que o mesmo tipo de linha que você utilizou > em "plot" você utilizou em "legend" > > espero ter ajudado > > > Em 25 de julho de 2013 17:13, Fátima Lima Paula <fatima.lima.paula(a)gmail.com >> escreveu: > >> Pessoal, acabei de descobrir. A ordem com que vem os tipos de linha no >> survfit é a mesma da que vem descrita nos níveis das "factors". >> Obrigada >> Fátima >> >> >> Em 25 de julho de 2013 17:02, Fátima Lima Paula < >> fatima.lima.paula(a)gmail.com> escreveu: >> >> Ok. Isso eu entendo, mas a linha 1 será o quê? >>> Para ficar mais fácil para entender, vamos dizer que eu tenha as >>> variáveis 1 e 0 no data.frame. >>> Só eu sei que 1 é sim e 2 é não, ok? >>> Quando vou fazer a legenda, digo que quero as linhas 1 e 2. >>> Para eu dizer que a linha 1 é sim e a linha 2 é não, ou vice versa, >>> preciso saber qual ele fará com a linha 1 e qual fará com a linha 2. >>> Aí sim, dependendo dessa ordem eu vou criar a legenda. >>> O problema é saber isso, entendeu? >>> >>> >>> >>> Em 25 de julho de 2013 16:38, Fernando Antonio de souza < >>> nandodesouza(a)gmail.com> escreveu: >>> >>> Ele não sabe! ele atribuirá uma legenda na ordem que você informou no >>>> argumento legend = c("sim","não") . Ele atribuirá os valores do argumento >>>> lty =c(1,2) para sim e não respectivamente. >>>> >>>> Você que especificou esses tipos de linhas quando utilizou a função >>>> plot. Quando vc fez isso você especificou dois tipos de linhas >>>> plot(...lty=c(1,2)...). logicamente a mesma linha que você >>>> informou no plot >>>> deve ser informada no legend ( para que le adicione a linha e seu >>>> significado no plot) >>>> >>>> >>>> Em 25 de julho de 2013 16:09, Fátima Lima Paula < >>>> fatima.lima.paula(a)gmail.com> escreveu: >>>> >>>>> Prezados, como sei qual será o tipo da linha que corresponderá à >>>>> respectiva variável quando faço uma análise de sobrevivência. >>>>> Por exemplo, >>>>> tenho uma variável chamada eletiva que tem os valores sim e nao. Usei os >>>>> seguintes comandos: >>>>> >>>>> sob.km3=survfit(Surv(tempo,status)~eletiva,data=sob) >>>>> plot(sob.km3,conf.int=F,mark.time=F,lty=c(1,2),xlab="Dias",ylab="S(t)") >>>>> >>>>> legend(x="bottomleft",legend=c("sim","não"),lty=c(1,2),title="Eletiva") >>>>> >>>>> Como sei que a linha1 será o sim da variável e a linha 2 o não, ou >>>>> vice-versa, se não especifiquei em momento nenhum? >>>>> Obrigada >>>>> Abs >>>>> Fátima >>>>> >>>>> >>>>> >>>>> -- >>>>> "Minha felicidade depende da qualidade dos meus pensamentos" >>>>> >>>>> _______________________________________________ >>>>> R-br mailing list >>>>> R-br(a)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. >>>>> >>>> >>>> >>>> _______________________________________________ >>>> R-br mailing list >>>> R-br(a)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. >>>> >>> >>> >>> >>> -- >>> "Minha felicidade depende da qualidade dos meus pensamentos" >>> >> >> >> >> -- >> "Minha felicidade depende da qualidade dos meus pensamentos" >> >> _______________________________________________ >> R-br mailing list >> R-br(a)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/20130725/39b5bf58/atta…> > > ------------------------------ > > Message: 15 > Date: Thu, 25 Jul 2013 17:44:16 -0300 > From: Marcos Silva <marcosfs2006(a)gmail.com> > To: r-br(a)listas.c3sl.ufpr.br > Subject: Re: [R-br] Error in scan - line 666895 did not have 12 > elements > Message-ID: > <CAHKdobwmkbTNjHD01x9UB1B8YG3GwC63rEbk+Qg1A8jma-3DUg(a)mail.gmail.com> > Content-Type: text/plain; charset="iso-8859-1" > > Acho que dá para usar o scan() sim, se informarmos à função que o que será > lido é caractere, definindo argumento what = "character". Acho que é isso. > > Abs. > > > Em 25 de julho de 2013 14:33, Rodrigo Coster <rcoster(a)gmail.com> escreveu: > >> Adriano, >> >> Falha minha... o scan() funciona só com numeros, o que tu precisa é >> readLines(). A desvantagem é que nao temos como pular linhas, então vamos >> ter que ler todo o arquivo até a linha com problema >> >> test <- readLines("rais96.txt", n=666895) >> nchar(tail(teste)) # Se todos forem iguais, importante ver qual que >> é o que tem na linha 666895 >> teste[666895] >> >> >> []'s >> >> _______________________________________________ >> R-br mailing list >> R-br(a)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. >> > > > > -- > Marcos F. Silva > http://sites.google.com/site/marcosfs2006 > -------------- Próxima Parte ---------- > Um anexo em HTML foi limpo... > URL: > <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20130725/8c542919/atta…> > > ------------------------------ > > Message: 16 > Date: Thu, 25 Jul 2013 22:04:31 -0300 > From: Henrique Dallazuanna <wwwhsd(a)gmail.com> > To: r-br(a)listas.c3sl.ufpr.br > Subject: Re: [R-br] Datas em R > Message-ID: > <CAPvBnPGT6TZA+KUKCTeKOM7kRzieV3i+y6OsGF5M5Cj9DG8gPQ(a)mail.gmail.com> > Content-Type: text/plain; charset="iso-8859-1" > > Tente com o comn: > > combn(x, 2) > > onde x é o seu vetor de datas. > > > 2013/7/21 Eliana Silva <eliana.va.silva(a)gmail.com> > >> Boa tarde, >> >> gostaria de ter a vossa ajuda numa situação. Ao ter 3 datas por exemplo~ >> 2012-05-15 >> 2012-05-16 >> 2012-05-17 >> >> Gostaria de saber como faço a combinaçao das 3 datas mas calcular apenas >> uma vez ou seja, eu quero saber >> 2012-05-15-2012-05-16 >> 2012-05-15-2012-05-17 >> 2012-05-16-2012-05-17 >> >> >> Obrigada >> >> >> _______________________________________________ >> R-br mailing list >> R-br(a)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. >> > > > > -- > Henrique Dallazuanna > Curitiba-Paraná-Brasil > 25° 25' 40" S 49° 16' 22" O > -------------- Próxima Parte ---------- > Um anexo em HTML foi limpo... > URL: > <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20130725/1a3afa73/atta…> > > ------------------------------ > > Message: 17 > Date: Thu, 25 Jul 2013 22:32:07 -0400 > From: ASANTOS <alexandresantosbr(a)yahoo.com.br> > To: r-br(a)listas.c3sl.ufpr.br > Subject: [R-br] Novo problema para mudar projeção de um raster > Message-ID: <51F1DFA7.4010404(a)yahoo.com.br> > Content-Type: text/plain; charset=ISO-8859-1; format=flowed > > Boa noite Pessoal, > > Consegui resolver um problema e consegui outro, transformei as > coordenadas latlong de um geotiff do Topodata em utm usando > spTransform(). Como não consegui transformar diretamente um > SpatialPixelsDataFrame do topodata apenas colocando o novo CRS e em > vários posts não vi nenhuma solução para isso, tentei fazer da seguinte > maneira, transformei apenas o @coords do topodata de geo para utm e > depois tentei inserir com replace() os novos valores em utm dentro do > SpatialPixelsDataFrame e ocorreu o seguinte erro: > > Erro em replace(dem.sp@coords[1:10026, 1:2], dem.sp@coords, > Utm@coords[1:10026, : > valores negativos não são permitidos na subscrição de matriz > > Não sei por onde continuar uma vez que minhas coordenadas geo são > negativas e Mod[] não funcionou, segue CRM: > > require(rgdal) > require(raster) > > # Criar uma área de menor dimensão que a imagem inteira que abarque a > região de interesse > xcc<-773759.1 > ycc<-7841546 > p.central<-cbind(xcc,ycc) > > ###Criando os vértices da área > coordV<-NULL > coordV <- > rbind(coordV,cbind(p.central[,1]+c(-1500,1500,1500,-1500,-1500),p.central[,2]+c(1500,1500,-1500,-1500,1500))) > coordV > plot(coordV[,1],coordV[,2]) > points(p.central[,1],p.central[,2], col="red") > # > > # Cria um polígono com o contorno definido > bnds <- cbind(x=c(coordV[,1]), y=c(coordV[,2])) > > # CRS UTM > SP <- SpatialPolygons(list(Polygons(list(Polygon(bnds)), "1"))) > proj4string(SP) = CRS("+proj=utm +zone=23 +south +datum=WGS84 +units=m > +no_defs") ## Projeção > > ### CRS GEO > SPgeo<- spTransform(SP, CRS("+proj=longlat +datum=WGS84")) > # > ## baixa e abre o objeto topodata > url=("http://www.dsr.inpe.br/topodata/data/geotiff/19S435SN.zip") > download.file(url, destfile = "19S435SN.zip") > > ### descompacta > system("unzip 19S435SN.zip") > > # abrir o topodata declividade 19S435SN > dem <- raster('19S435SN.tif') > ### > > ### atribui a projeção longlat e datum WGS83 ao raster. > proj4string(dem) <- CRS("+proj=longlat +datum=WGS84") > > #Cortar uma área menor de interesse > dem.crop <- crop(dem, extent(SPgeo), snap='out') > contorno.na <- setValues(dem.crop, NA) > contorno.r <- rasterize(SPgeo, contorno.na) > dem.mask <- mask(x=dem.crop, mask=SPgeo) > dem.sp <- as(dem.mask, "SpatialPixelsDataFrame") > > ## Mudar projeção de LatLong para Utm > LatLong <- data.frame(X =dem.sp@coords[,1], Y = dem.sp@coords[,2]) > coordinates(LatLong) <- ~ X+Y > proj4string(LatLong) <- CRS("+proj=longlat +datum=WGS84") > Utm <- spTransform(LatLong, CRS("+init=epsg:29193")) > > > ## Tentativa de substituir as coordenadas geo para utm dentro do objeto > dem.sp > replace(dem.sp@coords[1:10026, 1:2], dem.sp@coords,Utm@coords[1:10026,1:2]) > > # > proj4string(dem.sp) <- CRS("+proj=utm +zone=23 +south +datum=WGS84 > +units=m +no_defs") > writeGDAL(dem.sp,"dem.tif") > # > > > Obrigado, > > -- > ====================================================================== > Alexandre dos Santos > Proteção Florestal > IFMT - Instituto Federal de Educação, Ciência e Tecnologia de Mato Grosso > Campus Cáceres > Caixa Postal 244 > Avenida dos Ramires, s/n > Bairro: Distrito Industrial > Cáceres - MT CEP: 78.200-000 > Fone: (+55) 65 8132-8112 (TIM) (+55) 65 9686-6970 (VIVO) > e-mails:alexandresantosbr@yahoo.com.br > alexandre.santos(a)cas.ifmt.edu.br > Lattes: http://lattes.cnpq.br/1360403201088680 > ====================================================================== > > > > ------------------------------ > > Message: 18 > Date: Fri, 26 Jul 2013 14:11:18 +0000 > From: Aline Lipsky <line_lips(a)hotmail.com> > To: programa r <r-br(a)listas.c3sl.ufpr.br> > Subject: [R-br] Título do eixo x de gráfico em barras > Message-ID: <SNT147-W36DBEA4AAACC1DAB095C20986A0(a)phx.gbl> > Content-Type: text/plain; charset="iso-8859-1" > > > > Bom dia, > Estou fazendo um gráfico de barras com os seguintes comandos: > par(cex.lab = 0.8, cex.axis = 0.8, "usr", cex.main = 1.0)grafico.1 > <- barplot(media.capturada, beside=TRUE, main="Média capturada por > espécie ", ylab="Captura (t)", col = > rainbow(19), ylim=c(0,7000) ,cex.axis=par("cex.axis"), > cex.lab=par("cex.lab"), border=NA) > text(grafico.1, par("usr")[1], srt=45, lab = nome, adj = 1, xpd=NA) . > O título inclinado do eixo x fica ligeiramente sobreposto às barras. > Gostaria de colocar mais abaixo o título do eixo x.Se alguém por > puder me ajudar, agradeço. > Aline F. Lipsky > -------------- Próxima Parte ---------- > Um anexo em HTML foi limpo... > URL: > <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20130726/0dc51600/atta…> > > ------------------------------ > > Subject: Legenda do Digest > > _______________________________________________ > R-br mailing list > R-br(a)listas.c3sl.ufpr.br > https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br > > > ------------------------------ > > Fim da Digest R-br, volume 31, assunto 30 > *****************************************

2 1

Datas em R
by Eliana Silva 26 Jul '13

26 Jul '13

Boa tarde, gostaria de ter a vossa ajuda numa situação. Ao ter 3 datas por exemplo~ 2012-05-15 2012-05-16 2012-05-17 Gostaria de saber como faço a combinaçao das 3 datas mas calcular apenas uma vez ou seja, eu quero saber 2012-05-15-2012-05-16 2012-05-15-2012-05-17 2012-05-16-2012-05-17 Obrigada

4 4

Título do eixo x de gráfico em barras
by Aline Lipsky 26 Jul '13

26 Jul '13

Bom dia, Estou fazendo um gráfico de barras com os seguintes comandos: par(cex.lab = 0.8, cex.axis = 0.8, "usr", cex.main = 1.0)grafico.1 <- barplot(media.capturada, beside=TRUE, main="Média capturada por espécie ", ylab="Captura (t)", col = rainbow(19), ylim=c(0,7000) ,cex.axis=par("cex.axis"), cex.lab=par("cex.lab"), border=NA) text(grafico.1, par("usr")[1], srt=45, lab = nome, adj = 1, xpd=NA) . O título inclinado do eixo x fica ligeiramente sobreposto às barras. Gostaria de colocar mais abaixo o título do eixo x.Se alguém por puder me ajudar, agradeço. Aline F. Lipsky

1 0

Novo problema para mudar projeção de um raster
by ASANTOS 25 Jul '13

25 Jul '13

Boa noite Pessoal, Consegui resolver um problema e consegui outro, transformei as coordenadas latlong de um geotiff do Topodata em utm usando spTransform(). Como não consegui transformar diretamente um SpatialPixelsDataFrame do topodata apenas colocando o novo CRS e em vários posts não vi nenhuma solução para isso, tentei fazer da seguinte maneira, transformei apenas o @coords do topodata de geo para utm e depois tentei inserir com replace() os novos valores em utm dentro do SpatialPixelsDataFrame e ocorreu o seguinte erro: Erro em replace(dem.sp@coords[1:10026, 1:2], dem.sp@coords, Utm@coords[1:10026, : valores negativos não são permitidos na subscrição de matriz Não sei por onde continuar uma vez que minhas coordenadas geo são negativas e Mod[] não funcionou, segue CRM: require(rgdal) require(raster) # Criar uma área de menor dimensão que a imagem inteira que abarque a região de interesse xcc<-773759.1 ycc<-7841546 p.central<-cbind(xcc,ycc) ###Criando os vértices da área coordV<-NULL coordV <- rbind(coordV,cbind(p.central[,1]+c(-1500,1500,1500,-1500,-1500),p.central[,2]+c(1500,1500,-1500,-1500,1500))) coordV plot(coordV[,1],coordV[,2]) points(p.central[,1],p.central[,2], col="red") # # Cria um polígono com o contorno definido bnds <- cbind(x=c(coordV[,1]), y=c(coordV[,2])) # CRS UTM SP <- SpatialPolygons(list(Polygons(list(Polygon(bnds)), "1"))) proj4string(SP) = CRS("+proj=utm +zone=23 +south +datum=WGS84 +units=m +no_defs") ## Projeção ### CRS GEO SPgeo<- spTransform(SP, CRS("+proj=longlat +datum=WGS84")) # ## baixa e abre o objeto topodata url=("http://www.dsr.inpe.br/topodata/data/geotiff/19S435SN.zip") download.file(url, destfile = "19S435SN.zip") ### descompacta system("unzip 19S435SN.zip") # abrir o topodata declividade 19S435SN dem <- raster('19S435SN.tif') ### ### atribui a projeção longlat e datum WGS83 ao raster. proj4string(dem) <- CRS("+proj=longlat +datum=WGS84") #Cortar uma área menor de interesse dem.crop <- crop(dem, extent(SPgeo), snap='out') contorno.na <- setValues(dem.crop, NA) contorno.r <- rasterize(SPgeo, contorno.na) dem.mask <- mask(x=dem.crop, mask=SPgeo) dem.sp <- as(dem.mask, "SpatialPixelsDataFrame") ## Mudar projeção de LatLong para Utm LatLong <- data.frame(X =dem.sp@coords[,1], Y = dem.sp@coords[,2]) coordinates(LatLong) <- ~ X+Y proj4string(LatLong) <- CRS("+proj=longlat +datum=WGS84") Utm <- spTransform(LatLong, CRS("+init=epsg:29193")) ## Tentativa de substituir as coordenadas geo para utm dentro do objeto dem.sp replace(dem.sp@coords[1:10026, 1:2], dem.sp@coords,Utm@coords[1:10026,1:2]) # proj4string(dem.sp) <- CRS("+proj=utm +zone=23 +south +datum=WGS84 +units=m +no_defs") writeGDAL(dem.sp,"dem.tif") # Obrigado, -- ====================================================================== Alexandre dos Santos Proteção Florestal IFMT - Instituto Federal de Educação, Ciência e Tecnologia de Mato Grosso Campus Cáceres Caixa Postal 244 Avenida dos Ramires, s/n Bairro: Distrito Industrial Cáceres - MT CEP: 78.200-000 Fone: (+55) 65 8132-8112 (TIM) (+55) 65 9686-6970 (VIVO) e-mails:alexandresantosbr@yahoo.com.br alexandre.santos(a)cas.ifmt.edu.br Lattes: http://lattes.cnpq.br/1360403201088680 ======================================================================

1 0

Error in scan - line 666895 did not have 12 elements
by Adriano Borges Costa 25 Jul '13

25 Jul '13

Caros, Boa tarde! Estou tendo dificuldades para importar uma base de dados da RAIS que tenho que trabalhar no R. Trata-se de uma base com mais de um 1GB, com 12 variáveis, separadas por espaços fixos. Estou usando o comando abaixo: rais96<-read.fwf("rais.txt", widths = c(1,14,5,10,12,6,1,45,18,52,19,8), sep="\t", h=FALSE, stringsAsFactors=FALSE, comment.char='') Após vários minutos tem me retornado a mensagem abaixo: Error in scan(file, what, nmax, sep, dec, quote, skip, nlines, na.strings, : line 666895 did not have 12 elements Estou usando o parâmetro comment.char='' porque existem caracteres # utilizados para observações vazias. Eu não consigo abrir esse arquivo .txt no bloco de notas para analisar a linha com erro. Existe alguma forma de eu conseguir no R acessar essa linha específica para ver se tem algum erro? Você podem me dar alguma dica de como resolver esse problema? Obrigado pela ajuda de sempre. Abraços -- Adriano Borges Costa

3 4

Legenda em gráfico
by Fátima Lima Paula 25 Jul '13

25 Jul '13

Prezados, como sei qual será o tipo da linha que corresponderá à respectiva variável quando faço uma análise de sobrevivência. Por exemplo, tenho uma variável chamada eletiva que tem os valores sim e nao. Usei os seguintes comandos: sob.km3=survfit(Surv(tempo,status)~eletiva,data=sob) plot(sob.km3,conf.int=F,mark.time=F,lty=c(1,2),xlab="Dias",ylab="S(t)") legend(x="bottomleft",legend=c("sim","não"),lty=c(1,2),title="Eletiva") Como sei que a linha1 será o sim da variável e a linha 2 o não, ou vice-versa, se não especifiquei em momento nenhum? Obrigada Abs Fátima -- "Minha felicidade depende da qualidade dos meus pensamentos"

2 4

Ubuntu em disco GPT [Off Topic]
by Sérgio Henrique almeida da silva ju 25 Jul '13

25 Jul '13

Prezados Estou com um notebook lenovo Ideapad S400 que veio com Windows 8 e gostaria de transforma-lo em Dual Boot e instalar o Ubuntu, porém não estou conseguindo, ele até instala, mas só inicia no Windows 8. Andei pesquisando e vi que o disco está em GPT. Alguém tem ideia como posso resolver isso? Abraços -- Sérgio Henrique Almeida da Silva Junior Doutorando em Epidemiologia em Saúde Pública Escola Nacional de Saúde Pública Sérgio Arouca - ENSP/FIOCRUZ http://lattes.cnpq.br/1611345552843383 Tel: (21) 68463637 http://www.linkedin.com/profile/view?id=250437145&trk=tab_pro

3 3

return com if
by Alisson Lucrecio 25 Jul '13

25 Jul '13

Caros colegas, Boa tarde. Vocês poderia me ajudar nesse script, eu preciso fazer retornar somente quando as data.frame forem criadas. Obrigado. return(list(anova=anova, cv=cv, shapiro.test=shapiro.test, bart.test=bart.test, if(!is.null(table1)) {table1 = table1}, if(!is.null(table2)) {table2 = table2}) Alisson Lucrécio da Costa

2 2

Re: [R-br] ?Problema para mudar projeção em um raster
by Éder Comunello 25 Jul '13

25 Jul '13

Complementando a resposta anterior (abaixo), o arquivo topodata do CMR não corresponde à área de interesse definida. A área coincidente é dada pelo arquivo 19S435SN.zip. ### require(raster) url=("http://www.dsr.inpe.br/topodata/data/geotiff/19S435SN.zip") download.file(url, destfile = "19S435SN.zip") dem <- raster('19S435SN.tif') ### Observe as saídas transcritas abaixo: > extent(SP.geo) class : Extent xmin : -42.40624 xmax : -42.37724 ymin : -19.51573 ymax : -19.48824 > dem <- raster('19S435SN.tif') > extent(dem) class : Extent xmin : -43.50024 xmax : -42 ymin : -20 ymax : -19 2013/7/24 Eder Comunello <ecomunel(a)gmail.com> > Prezado Alexandre, > > Quanto ao erro de spTransform(), faltou dar espaço antes do argumento > '+south'. > > ### INICIO > > ### bnds fornecido no CMS > bnds <- structure(c(772259.1, 775259.1, 775259.1, 772259.1, 772259.1, > 7843046, 7843046, 7840046, 7840046, 7843046), .Dim = c(5L, 2L > ), .Dimnames = list(NULL, c("x", "y"))) > > ### CRS UTM > SP <- SpatialPolygons(list(Polygons(list(Polygon(bnds)), "1"))) > proj4string(SP) = CRS("+proj=utm +zone=23 +south +datum=WGS84 +units=m > +no_defs") ## Projeção > > ### CRS GEO > SPgeo<- spTransform(SP, CRS("+proj=longlat +datum=WGS84")) ### aqui não é > necessário +south > SPgeo@bbox > > ### FIM > > Com esse código você obterá: > > > SPgeo@bbox > min max > x -42.40624 -42.37724 > y -19.51573 -19.48824 > > At.te, > > > -- > Éder Comunello <comunello.eder(a)gmail.com> > Dourados, MS - [22 16.5'S, 54 49'W] > -- Éder Comunello <c <comunello.eder(a)gmail.com>omunello.eder(a)gmail.com> Dourados, MS - [22 16.5'S, 54 49'W]

2 1

Re: [R-br] ?Problema para mudar projeção em um raster
by Eder Comunello 24 Jul '13

24 Jul '13

Prezado Alexandre, Quanto ao erro de spTransform(), faltou dar espaço antes do argumento '+south'. ### INICIO ### bnds fornecido no CMS bnds <- structure(c(772259.1, 775259.1, 775259.1, 772259.1, 772259.1, 7843046, 7843046, 7840046, 7840046, 7843046), .Dim = c(5L, 2L ), .Dimnames = list(NULL, c("x", "y"))) ### CRS UTM SP <- SpatialPolygons(list(Polygons(list(Polygon(bnds)), "1"))) proj4string(SP) = CRS("+proj=utm +zone=23 +south +datum=WGS84 +units=m +no_defs") ## Projeção ### CRS GEO SPgeo<- spTransform(SP, CRS("+proj=longlat +datum=WGS84")) ### aqui não é necessário +south SPgeo@bbox ### FIM Com esse código você obterá: > SPgeo@bbox min max x -42.40624 -42.37724 y -19.51573 -19.48824 At.te, -- Éder Comunello <comunello.eder(a)gmail.com> Dourados, MS - [22 16.5'S, 54 49'W]

1 0