- R-br - DINF UFPR

Ajuda - scatterplot (car)
by Núbia Batista 03 Ago '13

03 Ago '13

Caros, boa tarde. Utilizando o comando > scatterplot(alcalinidade~hora | amostra, data=dados, smooth=F, legend.plot=F, reg.line=F,pch=c(16,17,15),col=c("blue","green","red")) alcalinidade - y hora = horário de coleta - x amostra - fator Gera um gráfico de "dispersão", com boxplots invés de pontos, isso pq minha variável hora está sendo considerada fator, já mudei mas não estou conseguindo. Alguém sabe como forçar a utilização de pontos? Grata desde já, Núbia

2 1

truncar eixo y do gráfico
by Aline Lipsky 01 Ago '13

01 Ago '13

Boa tarde, estou fazendo um gráfico com os seguintes comandos: sp1 <- c(300, 69, 347, 42, 319, 81, 1, 100, 166, 279, 895, 334)sp2 <- c(0, 24, 0.6, 40, 640, 0, 0, 55, 75, 139, 967, 351)sp3 <- c(0, 0, 40, 6, 135, 238, 83, 150, 37, 107, 10)sp4 <- c(0, 0, 1, 14, 32, 412, 139, 38, 52, 31, 45)sp5 <-c(0, 0, 48, 0, 0, 0, 0, 41, 3, 102, 77, 0) captura.mensal <- rbind(sp1, sp2, sp3, sp4)colnames(captura.mensal) <- c("jan", "fev","mar", "abr", "mai", "jun", "jul", "ago", "set", "out", "nov", "dez") par(cex.lab = 0.8, cex.axis = 0.8, "usr", cex.main = 1.2, font.main=4)grafico.1.1 <- barplot(apply(captura.mensal, 2, sort(decreasing = TRUE), beside=TRUE, ylim = c(0,1000),ylab = "Captura (t)", col = c("seagreen4", "red3", "purple4", "violetred", "tomato2"), font.main = par ("font.main"), cex.axis=par("cex.axis"), cex.lab=par("cex.lab"), border=NA)) Eu preciso truncar o eixo y do gráfico.Gostaria de saber qual função que devo usar. Agradeço a atenção, Aline F. Lipsky

1 0

Escolha metodo de ajuste do p-value
by Fernando Antonio de souza 01 Ago '13

01 Ago '13

Caros amigos Gostaria de uma resposta para uma dúvida sobre a escolha do método de ajuste do taxa de erro (p-value) Qual critério devo utilizar para definir qual o melhor método? Ja li em discussões passadas que este método deve ser definido no momento que se pensa o projeto e não deve ser escolhido após a análise do dado para se encontrar o que se quer. No entanto como saber no momento de elaboração do projeto que por exemplo a false discovery rate (FDR) é mais adequada a meus dados que a family wise rate. Algúem sabe alguma literatura que possa me ajudar? att

2 1

Modelo não linear
by Tiago Souza Marçal 01 Ago '13

01 Ago '13

Boa noite pessoal, estou querendo modelar uma curva de embebição de sementes através do seguinte modelo não linear: y=A*(1-B*exp(-C*tempo)) + exp(D + E*(tempo-t0)) t0 = 6 Gostaria de saber se existe um procedimento parecido com o do pacote manipulate do Rstudio no R para ajustar este modelo. CMR tempo=1:12 y=c(8.81790512674818,8.83724295007473,8.84652971800299,8.85625726150244, 8.86597721721444,8.86647798384983,8.87625601672093,8.89503521901844,8.91478268591035,8.93378059512321,8.97371264813241,9.00355384268932) Att. Tiago. ################################################################# Tiago de Souza Marçal - Graduando em Agronomia pelo CCA-UFES Bolsista de Iniciação Científica da área de Genética e Melhoramento de Plantas #################################################################

5 5

Re: [R-br] Aumentar as dimensoes do dispositivo grafico
by Ivan Bezerra Allaman 29 Jul '13

29 Jul '13

Já tentou x11(w = x, h =y)?? (s,f,p) Allaman

1 0

Re: [R-br] Título do eixo x de gráfico em barras
by Ivan Bezerra Allaman 29 Jul '13

29 Jul '13

Tentei reproduzir o seu código com o intuito de ajudá-la e obtive a seguinte mensagem: Erro em barplot(media.capturada, beside = TRUE, main = "Média capturada por espécie ", : objeto 'media.capturada' não encontrado Por gentileza, leia o guia de postagem para que possamos ajudá-la. (s,f,p) Allaman

1 0

Substituir caracteres
by Luciano F. Sgarbi 29 Jul '13

29 Jul '13

Boa tarde a todos. Estou com uma série de nomes em um conjunto de dados e alguns destes nomes apresentam alguns "caracteres" estranhos. Como no exemplo abaixo "/". Eu preciso de um teste lógico que me diga se cada posição do meu vetor tem ou não o determinado caracter e o substitua. O exemplo ficaria assim: exemplo<-c("a/b","cd_mj","hoje","luciano/sgarbi")#dados de entrada #preciso substituir os "/" por "-" resultado<-c("a-b","cd_mj","hoje","luciano-sgarbi")#dados de saída Desde já, muito obrigado a todos! Abraços, Luciano -- *Luciano F. Sgarbi * * Currículo Lattes <http://lattes.cnpq.br/9788198135883354> Mestre em Ecologia e Evolução Dep. Ecologia, Instituto de Ciências Biológicas I* *Universidade Federal de Goiás, campus II, Goiânia-GO, Brasil*

2 2

Re: [R-br] Novo problema para mudar projeção de um raster [Resolvido]
by Éder Comunello 27 Jul '13

27 Jul '13

Alexandre, boa noite! Você pode tentar primeiro reprojetar o dem importado para utm e então recortar usando o limite utm (SP.utm). Desse modo, é bem provável que os limites coincidam e o SP.geo não será necessário. T+, -- Éder Comunello <c <comunello.eder(a)gmail.com>omunello.eder(a)gmail.com> Dourados, MS - [22 16.5'S, 54 49'W]

1 0

Re: [R-br] Novo problema para mudar projeção de um raster
by Eder Comunello 27 Jul '13

27 Jul '13

Alexandre e colegas, bom dia! Meu script está um pouco diferente, mas o que vai valer mesmo é o último bloco (reprojetar RasteLayer). Espero que ajude. Além disso, tenho um bookmark pra indicar: Spatial data in R: using R as a GIS (old version) < https://sites.google.com/site/rodriguezsanchezf/news/usingrasagis> Vi que saiu uma nova versão em < https://sites.google.com/site/rodriguezsanchezf/resources/rgis> Outro dia, alguém perguntava pela geração de mapas temáticos no R! Esses links podem ajudar bastante! At.te, ### <BEGIN> ### require(sp); require(rgdal); require(raster) ### Região de interesse pc <- cbind(X1=773759.1,Y1=7841546) dx <- 1500*c(-1, 1, 1,-1,-1); dx dy <- 1500*c( 1, 1,-1,-1, 1); dy reg <- NULL; reg <- rbind(cbind(pc[,1]+dx,pc[,2]+dy)); reg plot(reg, asp=1); points(pc, col=2) ### CRS UTM SP.utm <- SpatialPolygons(list(Polygons(list(Polygon(reg)), "1"))) proj4string(SP.utm) = CRS("+proj=utm +zone=23 +south +datum=WGS84 +units=m +no_defs") SP.utm@bbox; SP.utm@proj4string plot(SP.utm, col=3, axes=T) ### CRS GEO (GeoTiff) SP.geo<- spTransform(SP.utm, CRS("+proj=longlat +datum=WGS84")) SP.geo@bbox; SP.geo@proj4string plot(SP.geo, col=5, axes=T) ### TOPODATA #getwd() #url=("http://www.dsr.inpe.br/topodata/data/geotiff/19S435SN.zip") #download.file(url, destfile = "19S435SN.zip") #unzip("19S435SN.zip") dem <- raster('19S435SN.tif') ### Abre o slope TOPODATA ### Recorte TOPODATA dem.crop <- crop(dem, extent(SP.geo), snap='out') image(dem.crop, asp=1) # Reprojetar RasterLayer (S4) projection(dem.crop) <- CRS("+proj=longlat +datum=WGS84") alt.utm <- projectRaster(dem.crop, crs="+proj=utm +zone=23 +south +datum=WGS84 +units=m +no_defs") image(alt.utm, asp=1) ### <END> ### Em 25 de julho de 2013 22:32, ASANTOS <alexandresantosbr(a)yahoo.com.br>escreveu: > 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 > >

2 1

Re: [R-br] Mapas tematicos
by Éder Comunello 27 Jul '13

27 Jul '13

Olá, Natália! Bom dia! Se ainda estiver precisando das referências sobre geração de mapas temáticos, segue uma sugestão: Spatial data in R: using R as a GIS (old version) < https://sites.google.com/site/rodriguezsanchezf/news/usingrasagis> Nova versão em < https://sites.google.com/site/rodriguezsanchezf/resources/rgis> At.te, -- Éder Comunello <c <comunello.eder(a)gmail.com>omunello.eder(a)gmail.com> Dourados, MS - [22 16.5'S, 54 49'W]

3 2

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

Analise de variância fator com níveis quantitativos
by Alisson Lucrecio 23 Jul '13

23 Jul '13

Caro Colegas r-br, Boa tarde. Nesse exemplo abaixo é certo transformar um dado quantitativo em fator para depois fazer a analise de variância? Obrigado Alisson Lucrécio da Costa adi <- expand.grid(cult=gl(1,5,la=LETTERS[1]), fert=101) fat <- expand.grid(cult=gl(5,5,la=LETTERS[2:6]), fert=seq(50,150,25)) da <- rbind(adi, fat) theta <- c(c(-194.29, -197.26, -197.85, -203.03, -190.20, -190.45), c(9.1797, 8.2686, 8.6437, 9.3438, 8.8773, 8.1872), c(-0.03382, -0.03479, -0.03632, -0.03341, -0.03597, -0.03675)) X <- model.matrix(~-1+cult/(fert+I(fert^2)), data=da) da$eta <- X%*%matrix(theta) da$y <- da$eta+rnorm(nrow(da),0,30) require(lattice) xyplot(y~fert|cult, data=da, type=c("p","a")) da$Fert <- factor(da$fert) #?????? levels(da$Fert) levels(da$cult) m0 <- aov(y~cult*Fert, data=da) anova(m0) Obrigado. Alisson Lucrécio da Costa

3 3

Coordenadas a partir do CEP
by Sérgio Henrique almeida da silva ju 23 Jul '13

23 Jul '13

Prezados Estou rodando o código abaixo para gerar as coordenadas a partir de um CEP, porém esta dando a seguinte mensagem de erro: Erro: símbolo inesperado in: "url_lat_lon <- paste(sprintf("<a href= "http" O que devo alterar para o código rodar? Abraços require(XML) coordenadas<- function(cep) { url_lat_lon <- paste(sprintf("<a href= "http://maps.google.com/maps/api/geocode/xml?address=%s"> http://maps.google.com/maps/api/geocode/xml?address=%s,", cep),"%20Brasil&sensor=false", sep="") lat_lon=xmlApply(xmlRoot(xmlTreeParse( readLines(url_lat_lon)))[['result']][['geometry']][['location']], "[[", 1) return(lat_lon) -- 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

2 1

Re: [R-br] winbugs
by geovane barbosa 23 Jul '13

23 Jul '13

O problema é qdo há um grande número de vizinhos. Fazer manualmente fica muito complicado e a idéia seria usar a vizinhança que vem nas malhas do IBGE, entende? ################################### ________________________________ De: Gilbert Queiroz <gilbert_queiroz(a)yahoo.com.br> Para: "r-br(a)listas.c3sl.ufpr.br" <r-br(a)listas.c3sl.ufpr.br>; geovane barbosa <geovanecb(a)yahoo.com.br> Enviadas: Segunda-feira, 22 de Julho de 2013 22:23 Assunto: Re: [R-br] winbugs Segue anexo... ________________________________ De: geovane barbosa <geovanecb(a)yahoo.com.br> Para: "r-br(a)listas.c3sl.ufpr.br" <r-br(a)listas.c3sl.ufpr.br> Enviadas: Segunda-feira, 22 de Julho de 2013 20:10 Assunto: [R-br] winbugs alguém teria algum manual ou texto sobre uso do winbugs no R fazendo uso de malhas digitais de vizinhança (IBGE e outros) para fins de modelagem em Est. Espacial? Obrigado. _______________________________________________ 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.

1 0

Experimento em fatorial duplo em blocos com 3 solos e 4 doses
by Alisson Lucrecio 23 Jul '13

23 Jul '13

Caro colegas r-br, Bom dia. Eu estou com uma duvida e gostaria de uma sugestão de vocês, assim como analiso um experimento em fatorial duplo em blocos com 3 solos (Qualitativos) e 4 doses (Quantitativo), onde foram medidas 5 variáveis? Obrigado. Alisson Lucrécio da Costa

1 0

?Problema para mudar projeção em um raster
by ASANTOS 23 Jul '13

23 Jul '13

Obrigado Mauro, Resolvi o erro na rotina e mesmo assim o spTransform() não esta convertendo de utm na zona 23K para latlong no hemisfério sul, segue CRM completo ate o recorte da área de interesse no geoTiff do topodata: require(sp) 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))) 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 em lat long para o polígomno ficar na mesma projeção que o GeoTif SPlatlong<- spTransform(SP, CRS("+proj=longlat +south +datum=WGS84")) # # #Obtenção do objeto declividade do TOPODATA url=("http://www.dsr.inpe.br/topodata/data/geotiff/19S42_SN.zip") download.file(url, destfile = "19S42_SN.zip") ### descompacta system("unzip 19S42_SN.zip") demlatlog<-raster('19S42_SN.tif')### Abre o slope TOPODATA # #Cortar a região de interesse demlatlog.crop <- crop(demlatlog, extent(SPlatlong), snap='out') # Obrigado, Alexandre Em 22/07/2013 22:09, Mauro Sznelwar escreveu: > Tentei rodar o seu CRM e deu problema aqui > > bnds <- cbind(x=c(coordV2[21:25,1]), y=c(coordV2[21:25,2])) > Error in coordV2[21:25, 1] : subscript out of bounds > > > > Segue CRM: > > require(sp) > require(rgdal) > # 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 <- > rbind(coordV,cbind(p.central[,1]+c(-1500,1500,1500,-1500,-1500),p.central[,2]+c(1500,1500,-1500,-1500,1500))) > coordV > coordV2=coordV[!is.na(coordV[,1]),] > #plot(coordV2[21:25,1],coordV2[21:25,2]) > #points(p.central[,1],p.central[,2], col="red") > # > > # Cria um polígono com o contorno definido > bnds <- cbind(x=c(coordV2[21:25,1]), y=c(coordV2[21:25,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 em lat long para o polígomno ficar na mesma projeção que o GeoTif > SPlatlong<- spTransform(SP, CRS("+proj=longlat +south +datum=WGS84")) > # > > > Obrigado, > > Alexandre > > > > -- ====================================================================== 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

problemas com o símbolo %
by alanarocha＠sapo.pt 23 Jul '13

23 Jul '13

Olá Augusto, onde é que aparece upload no link do pastebin? o que eu pretendo é por exemplo: Ponte da Barca 67,7% 73,9% 82,4% 83,1% 76,5% 83,8% Braga 76,7% 84,9% 89,4% 83,3% 78,2% 78,4% Fafe 80,0% 76,7% 81,8% 76,6% 79,8% 84,8% Maia 80,4% 77,0% 75,7% 83,6% 82,6% 83,7% VNGaia 81,4% 66,4% 67,0% 67,2% 75,6% 82,5% SMFeira 63,3% 71,1% 68,0% 69,9% 65,4% 73,5% eu quero que o simbolo % desapareça e fiquem os valores como estão, ou seja, transformar o texto em numero no codigo eu uso as.numeric(gsub() mas não esta a funcionar setwd("f:/Ana_trabalho/indicadores_semestrais/1 semestre 2013") dados<-read.table("Hgb.csv",header=TRUE, sep=";",stringsAsFactors=FALSE,dec=",") for (i in 2:6) { #Executa o comando a seguir para as colunas 2 a 6 (1º semestre de 2013) dados[,i] <- as.numeric(gsub('%','',dados[,i])) # Tira o símbolo de percentual e transforma texto em número } colnames(dados) <- c("Clinica","Jan","Fev","Mar","Abr","Mai","Jun") dados como resolvo 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. Re: Problema no read.fwf. (Luciane Maria Pilotto) > 2. Re: Problema no read.fwf. (Rodrigo Coster) > 3. Datas em R (Eliana Silva) > 4. subset (Fátima Lima Paula) > 5. Re: subset (Benilton Carvalho) > 6. Re: subset (Fátima Lima Paula) > 7. Funcao L(K Ripley's transf.) com mais de 3000 pontos > (Felipe Sodre Barros) > 8. Re: Funcao L(K Ripley's transf.) com mais de 3000 pontos > (Elias Krainski) > 9. Duvida Concatenação (Sérgio Henrique almeida da silva ju) > 10. Re: Duvida Concatenação (Elias Krainski) > 11. Re: Duvida Concatenação (Sérgio Henrique almeida da silva ju) > 12. Re: Duvida Concatenação (Elias Krainski) > 13. Re: Duvida Concatenação (Elias Krainski) > 14. Re: Duvida Concatenação (Sérgio Henrique almeida da silva ju) > 15. Re: Duvida Concatenação (Rodrigo Coster) > 16. Re: Duvida Concatenação (Sérgio Henrique almeida da silva ju) > 17. Re: Duvida Concatenação (Rodrigo Coster) > 18. Re: Duvida Concatenação (Sérgio Henrique almeida da silva ju) > > > ---------------------------------------------------------------------- > > Message: 1 > Date: Sun, 21 Jul 2013 09:57:35 -0700 (PDT) > From: Luciane Maria Pilotto <lutipilotto(a)yahoo.com.br> > To: "r-br(a)listas.c3sl.ufpr.br" <r-br(a)listas.c3sl.ufpr.br> > Subject: Re: [R-br] Problema no read.fwf. > Message-ID: > <1374425855.15949.YahooMailNeo(a)web122901.mail.ne1.yahoo.com> > Content-Type: text/plain; charset="iso-8859-1" > > Como vc desabilitou o caracter? Tb tive problema com esta função. > > Att., > Luciane > > > ________________________________ > De: Rodrigo Coster <rcoster(a)gmail.com> > Para: "r-br(a)listas.c3sl.ufpr.br" <r-br(a)listas.c3sl.ufpr.br> > Enviadas: Quinta-feira, 18 de Julho de 2013 11:36 > Assunto: Re: [R-br] Problema no read.fwf. > > > > Acertou em cheio, resolvi desabilitando o caractere de comentário. Valeu! > > > > 2013/7/18 Adriano Borges Costa <adrianobfc(a)gmail.com> > > Eu estava tendo esse problema e verifiquei que haviam alguns > caracteres # na minha base, principalmente no campo Endereço, que > substituíam ç, °, - e outros caracteres normalmente temos problemas. > Como o R não considera #, imagino que ele ignorava esses caracteres > e por isso dava incompatibilidade. >> >> Eu consegui resolver. >> >> Sou usuário recente, então posso na verdade estar falando bobagem. >> >> Abraços >> >> Adriano >> >> >> >> >> Em 18 de julho de 2013 11:01, Rodrigo Coster <rcoster(a)gmail.com> escreveu: >> >> Caros, estou usando o read.fwf para ler um banco, e obtive a >> seguinte mensagem de erro: >>> >>> >>>> len <- c(13, 11, 11, 2, 2, 1, 70, 8, 4, 8, 8, 2, 35, 7, 15, 11, >>>> 16, 5, 8, 2, 8, 7, 5, 8, 2, 13, 4, 4) >>> >>>> dados <- dadostemp <- read.fwf('05.txt', width=len, header=FALSE, >>>> stringsAsFactors=FALSE) >>> Erro em scan(file, what, nmax, sep, dec, quote, skip, nlines, >>> na.strings, : >>> linha 28659 não tinha 28 elementos >>> >>> >>> Pensei que na linha 28659 estava faltando algum caractere, mas >>> verifiquei que todas as linhas tem o mesmo tamanho: >>> >>> >>>> temp <- readLines('05.txt') >>>> table(nchar(temp)) >>> >>> >>> 290 >>> 386103 >>>> length(temp) >>> [1] 386103 >>> >>> >>> Alguem tem alguma idéia do que pode ser? Ou de como nao usar o >>> read.fwf e usar o carregado pelo readLines? >>> >>> >>> >>> >>> _______________________________________________ >>> 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 >> _______________________________________________ >> 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. > -------------- Próxima Parte ---------- > Um anexo em HTML foi limpo... > URL: > <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20130721/bae24e6a/atta…> > > ------------------------------ > > Message: 2 > Date: Sun, 21 Jul 2013 16:41:53 -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] Problema no read.fwf. > Message-ID: > <CAKU4wovgB2F2H-J4aB+jY0+XJMkdFdc3bCs0_O1mhTBDLU0NvA(a)mail.gmail.com> > Content-Type: text/plain; charset="iso-8859-1" > > É só colocar o parâmetro comment.char='' no read.fwf() > > > 2013/7/21 Luciane Maria Pilotto <lutipilotto(a)yahoo.com.br> > >> Como vc desabilitou o caracter? Tb tive problema com esta função. >> >> Att., >> *Luciane * >> >> ------------------------------ >> *De:* Rodrigo Coster <rcoster(a)gmail.com> >> *Para:* "r-br(a)listas.c3sl.ufpr.br" <r-br(a)listas.c3sl.ufpr.br> >> *Enviadas:* Quinta-feira, 18 de Julho de 2013 11:36 >> *Assunto:* Re: [R-br] Problema no read.fwf. >> >> Acertou em cheio, resolvi desabilitando o caractere de comentário. Valeu! >> >> >> 2013/7/18 Adriano Borges Costa <adrianobfc(a)gmail.com> >> >> Eu estava tendo esse problema e verifiquei que haviam alguns caracteres # >> na minha base, principalmente no campo Endereço, que substituíam ç, °, - e >> outros caracteres normalmente temos problemas. Como o R não considera #, >> imagino que ele ignorava esses caracteres e por isso dava incompatibilidade. >> >> Eu consegui resolver. >> >> Sou usuário recente, então posso na verdade estar falando bobagem. >> >> Abraços >> >> Adriano >> >> >> Em 18 de julho de 2013 11:01, Rodrigo Coster <rcoster(a)gmail.com> escreveu: >> >> Caros, estou usando o read.fwf para ler um banco, e obtive a seguinte >> mensagem de erro: >> >> > len <- c(13, 11, 11, 2, 2, 1, 70, 8, 4, 8, 8, 2, 35, 7, 15, 11, 16, 5, >> 8, 2, 8, 7, 5, 8, 2, 13, 4, 4) >> > dados <- dadostemp <- read.fwf('05.txt', width=len, header=FALSE, >> stringsAsFactors=FALSE) >> Erro em scan(file, what, nmax, sep, dec, quote, skip, nlines, na.strings, >> : >> linha 28659 não tinha 28 elementos >> >> Pensei que na linha 28659 estava faltando algum caractere, mas verifiquei >> que todas as linhas tem o mesmo tamanho: >> >> > temp <- readLines('05.txt') >> > table(nchar(temp)) >> >> 290 >> 386103 >> > length(temp) >> [1] 386103 >> >> Alguem tem alguma idéia do que pode ser? Ou de como nao usar o read.fwf e >> usar o carregado pelo readLines? >> >> >> >> _______________________________________________ >> 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 >> >> _______________________________________________ >> 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. >> > -------------- Próxima Parte ---------- > Um anexo em HTML foi limpo... > URL: > <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20130721/0cff31fd/atta…> > > ------------------------------ > > Message: 3 > Date: Sun, 21 Jul 2013 20:50:56 +0100 > From: Eliana Silva <eliana.va.silva(a)gmail.com> > To: r-br(a)listas.c3sl.ufpr.br > Subject: [R-br] Datas em R > Message-ID: > <CAHd1w0ZV9J6G0sEr2nvrHd0ifgsp33uJ1MAPPkQC1oitnqHZdQ(a)mail.gmail.com> > Content-Type: text/plain; charset="iso-8859-1" > > 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 > -------------- Próxima Parte ---------- > Um anexo em HTML foi limpo... > URL: > <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20130721/239a7f7a/atta…> > > ------------------------------ > > Message: 4 > Date: Sun, 21 Jul 2013 18:00:47 -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] subset > Message-ID: > <CAJzNC0v7ReqdjJhzRfGrgvf1JFUc0vJqM_Dok8nekXQVLN6WaQ(a)mail.gmail.com> > Content-Type: text/plain; charset="iso-8859-1" > > Olá companheiros do R. > Quero criar um dataframe a partir de algumas categorias de uma variável. > Não sei o que estou fazendo de errado. > Exemplo: > > nome=c("a","b","c","d","e","f","g","h","i","j","k") > ide=c("1","2","3","1","2","4","6","6","9","2","1") > df=cbind(nome,ide) > df=as.data.frame(df) > df > #quero um dataframe apenas com os ide = 1, 3 e 6 > teste=subset(df,ide==c("1","3","6")) > teste > Mensagens de aviso perdidas: > 1: In is.na(e1) | is.na(e2) : > comprimento do objeto maior não é múltiplo do comprimento do objeto menor > 2: In `==.default`(ide, c("1", "3", "6")) : > comprimento do objeto maior não é múltiplo do comprimento do objeto menor > teste > > #Cria algo que não tem nada a ver: > > nome ide > 1 a 1 > 4 d 1 > > Alguém pode me dizer onde estou errando? > Obrigada > 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/20130721/33dc9249/atta…> > > ------------------------------ > > Message: 5 > Date: Sun, 21 Jul 2013 18:14:32 -0300 > From: Benilton Carvalho <beniltoncarvalho(a)gmail.com> > To: r-br <r-br(a)listas.c3sl.ufpr.br> > Subject: Re: [R-br] subset > Message-ID: > <CAO-arWN5jt9=QjjfOn5JyMPC7GCNL9McCtBT=4B6JN6kY2diRw(a)mail.gmail.com> > Content-Type: text/plain; charset=ISO-8859-1 > > subset(df, ide %in% c('1', '3', '6')) > > > > 2013/7/21 Fátima Lima Paula <fatima.lima.paula(a)gmail.com>: >> Olá companheiros do R. >> Quero criar um dataframe a partir de algumas categorias de uma variável. >> Não sei o que estou fazendo de errado. >> Exemplo: >> >> nome=c("a","b","c","d","e","f","g","h","i","j","k") >> ide=c("1","2","3","1","2","4","6","6","9","2","1") >> df=cbind(nome,ide) >> df=as.data.frame(df) >> df >> #quero um dataframe apenas com os ide = 1, 3 e 6 >> teste=subset(df,ide==c("1","3","6")) >> teste >> Mensagens de aviso perdidas: >> 1: In is.na(e1) | is.na(e2) : >> comprimento do objeto maior não é múltiplo do comprimento do objeto menor >> 2: In `==.default`(ide, c("1", "3", "6")) : >> comprimento do objeto maior não é múltiplo do comprimento do objeto menor >> teste >> >> #Cria algo que não tem nada a ver: >> >> nome ide >> 1 a 1 >> 4 d 1 >> >> Alguém pode me dizer onde estou errando? >> Obrigada >> 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. > > > ------------------------------ > > Message: 6 > Date: Sun, 21 Jul 2013 18:27:13 -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] subset > Message-ID: > <CAJzNC0sObDcN7X5Wck82+BCp-CP3W6hFpKVD9YUNsJbwVHjhjg(a)mail.gmail.com> > Content-Type: text/plain; charset="iso-8859-1" > > Perfeito Benilton. O pior é que eu acho que já havia perguntado isso e você > já havia respondido. > Desculpe, mas na pressa, vocês são mais eficientes do que minhas buscas. > Abs > > > Em 21 de julho de 2013 18:14, Benilton Carvalho > <beniltoncarvalho(a)gmail.com>escreveu: > >> subset(df, ide %in% c('1', '3', '6')) >> >> >> >> 2013/7/21 Fátima Lima Paula <fatima.lima.paula(a)gmail.com>: >> > Olá companheiros do R. >> > Quero criar um dataframe a partir de algumas categorias de uma variável. >> > Não sei o que estou fazendo de errado. >> > Exemplo: >> > >> > nome=c("a","b","c","d","e","f","g","h","i","j","k") >> > ide=c("1","2","3","1","2","4","6","6","9","2","1") >> > df=cbind(nome,ide) >> > df=as.data.frame(df) >> > df >> > #quero um dataframe apenas com os ide = 1, 3 e 6 >> > teste=subset(df,ide==c("1","3","6")) >> > teste >> > Mensagens de aviso perdidas: >> > 1: In is.na(e1) | is.na(e2) : >> > comprimento do objeto maior não é múltiplo do comprimento do objeto >> menor >> > 2: In `==.default`(ide, c("1", "3", "6")) : >> > comprimento do objeto maior não é múltiplo do comprimento do objeto >> menor >> > teste >> > >> > #Cria algo que não tem nada a ver: >> > >> > nome ide >> > 1 a 1 >> > 4 d 1 >> > >> > Alguém pode me dizer onde estou errando? >> > Obrigada >> > 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/20130721/c2310c60/atta…> > > ------------------------------ > > Message: 7 > Date: Sun, 21 Jul 2013 18:49:50 -0300 > From: Felipe Sodre Barros <felipe.b4rros(a)gmail.com> > To: r-br(a)listas.c3sl.ufpr.br > Subject: [R-br] Funcao L(K Ripley's transf.) com mais de 3000 pontos > Message-ID: > <CALA-_BVZH955aVWYDNoJS4O72Rtj+_3SghB3VQjbQL8XaWCaOg(a)mail.gmail.com> > Content-Type: text/plain; charset="iso-8859-1" > > Boa noite. > Estou fazendo uma análise de processos pontuais, utilizando o pacote > spatstat. > Ao tentar realizar a análise L, me deparei com um problema: Meus dados > superam o 'nlarge' (defindo como 3.000). E por mais que eu tente aumentar o > 'nlarge', tenho como resultado que os dados são muito grandes, sendo por > isto impossível de alocar XXmb. > > Contudo, se eu rodar tal análise sem a geração de simulações (envelope), > ele apenas me informa que o n dos dados que possuo são superiores a 3000 e > por isto apenas calculará o 'bordar correction'. > A minha duvida está, em que de fato representa o 'border correction' > calculado. Posso utiliza-lo como se este representasse o padrão de > distribuição do processo analisado? > Desde já vos agradeço. > Att > -------------- Próxima Parte ---------- > Um anexo em HTML foi limpo... > URL: > <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20130721/baf1aa4d/atta…> > > ------------------------------ > > Message: 8 > Date: Mon, 22 Jul 2013 08:57:06 -0300 > From: Elias Krainski <eliaskrainski(a)yahoo.com.br> > To: r-br(a)listas.c3sl.ufpr.br > Subject: Re: [R-br] Funcao L(K Ripley's transf.) com mais de 3000 > pontos > Message-ID: <51ED1E12.2000304(a)yahoo.com.br> > Content-Type: text/plain; charset=ISO-8859-1; format=flowed > > Veja Kenv.csr() e khat() do pacote 'splancs'. > > > ------------------------------ > > Message: 9 > Date: Mon, 22 Jul 2013 08:57:41 -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] Duvida Concatenação > Message-ID: > <CAEuVWs00mO55tqMaokCbJx0pF3UUSLRJDsbn-+qFfYwPKhXMTA(a)mail.gmail.com> > Content-Type: text/plain; charset="iso-8859-1" > > Prezados > > Estou tentando concatenar uma variável com a seguinte condição: > Se ela tiver tamanho 1, gostaria de concatenar 000, se ela tiver tamanho 2 > concateno 00 e se ela tiver tamanho 3 concateno 0. > > Eu pensei na seguinte função: > > dados$len <- nchar(dados$var) > func <- function(){ > if (dados$len == 1){ > dados$var1 = paste("000", dados$var, colapse="") } > else if (dados$len == 2){ > dados$var1 = paste("00", dados$var, colapse="")} > else if (dados$len == 3){ > dados$var1 = paste("0", dados$var, colapse="")} > } > func() > > > Mas está dando a seguinte mensagem de erro: > > Mensagens de aviso perdidas: > In if (dados$len == 1) { : > a condição tem comprimento > 1 e somente o primeiro elemento será usado > > Vi em outro tópico que o Benilton sugere usar with, mas não sei como fazer. > > 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/20130722/7123a232/atta…> > > ------------------------------ > > Message: 10 > Date: Mon, 22 Jul 2013 09:00:29 -0300 > From: Elias Krainski <eliaskrainski(a)yahoo.com.br> > To: r-br(a)listas.c3sl.ufpr.br > Subject: Re: [R-br] Duvida Concatenação > Message-ID: <51ED1EDD.3080900(a)yahoo.com.br> > Content-Type: text/plain; charset="iso-8859-1"; Format="flowed" > > Se a variável for inteiro > sprintf("%04d", c(1,3,30,50,900)) > > On 07/22/2013 08:57 AM, Sérgio Henrique almeida da silva ju wrote: >> Prezados >> >> Estou tentando concatenar uma variável com a seguinte condição: >> Se ela tiver tamanho 1, gostaria de concatenar 000, se ela tiver >> tamanho 2 concateno 00 e se ela tiver tamanho 3 concateno 0. >> >> Eu pensei na seguinte função: >> >> dados$len <- nchar(dados$var) >> func <- function(){ >> if (dados$len == 1){ >> dados$var1 = paste("000", dados$var, colapse="") } >> else if (dados$len == 2){ >> dados$var1 = paste("00", dados$var, colapse="")} >> else if (dados$len == 3){ >> dados$var1 = paste("0", dados$var, colapse="")} >> } >> func() >> >> >> Mas está dando a seguinte mensagem de erro: >> >> Mensagens de aviso perdidas: >> In if (dados$len == 1) { : >> a condição tem comprimento > 1 e somente o primeiro elemento será usado >> >> Vi em outro tópico que o Benilton sugere usar with, mas não sei como >> fazer. >> >> 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. > > -------------- Próxima Parte ---------- > Um anexo em HTML foi limpo... > URL: > <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20130722/c61bfef7/atta…> > > ------------------------------ > > Message: 11 > Date: Mon, 22 Jul 2013 09:03: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: Re: [R-br] Duvida Concatenação > Message-ID: > <CAEuVWs1AgBsUb6jU_1D8Diycb2x05d8Q231mFYfx+aNzMd2fMg(a)mail.gmail.com> > Content-Type: text/plain; charset="iso-8859-1" > > Não entendi Elias! > > > Em 22 de julho de 2013 09:00, Elias Krainski > <eliaskrainski(a)yahoo.com.br>escreveu: > >> Se a variável for inteiro >> sprintf("%04d", c(1,3,30,50,900)) >> >> >> On 07/22/2013 08:57 AM, Sérgio Henrique almeida da silva ju wrote: >> >> Prezados >> >> Estou tentando concatenar uma variável com a seguinte condição: >> Se ela tiver tamanho 1, gostaria de concatenar 000, se ela tiver tamanho 2 >> concateno 00 e se ela tiver tamanho 3 concateno 0. >> >> Eu pensei na seguinte função: >> >> dados$len <- nchar(dados$var) >> func <- function(){ >> if (dados$len == 1){ >> dados$var1 = paste("000", dados$var, colapse="") } >> else if (dados$len == 2){ >> dados$var1 = paste("00", dados$var, colapse="")} >> else if (dados$len == 3){ >> dados$var1 = paste("0", dados$var, colapse="")} >> } >> func() >> >> >> Mas está dando a seguinte mensagem de erro: >> >> Mensagens de aviso perdidas: >> In if (dados$len == 1) { : >> a condição tem comprimento > 1 e somente o primeiro elemento será usado >> >> Vi em outro tópico que o Benilton sugere usar with, mas não sei como >> fazer. >> >> 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 >> listR-br@listas.c3sl.ufpr.brhttps://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/20130722/206d6788/atta…> > > ------------------------------ > > Message: 12 > Date: Mon, 22 Jul 2013 09:21:01 -0300 > From: Elias Krainski <eliaskrainski(a)yahoo.com.br> > To: r-br(a)listas.c3sl.ufpr.br > Subject: Re: [R-br] Duvida Concatenação > Message-ID: <51ED23AD.6040807(a)yahoo.com.br> > Content-Type: text/plain; charset=ISO-8859-1; format=flowed > > > sprintf(), usando '%04d', faz o que vc quer para inteiros. > > Se dados$var é 'character', use > > aaa <- sapply(3:0, function(n) paste(rep(0, n), collapse='')) > dados$var1 <- paste(aaa[nchar(dados$var)], dados$var, collapse='') > > > > ------------------------------ > > Message: 13 > Date: Mon, 22 Jul 2013 09:22:53 -0300 > From: Elias Krainski <eliaskrainski(a)yahoo.com.br> > To: r-br(a)listas.c3sl.ufpr.br > Subject: Re: [R-br] Duvida Concatenação > Message-ID: <51ED241D.2000802(a)yahoo.com.br> > Content-Type: text/plain; charset=ISO-8859-1; format=flowed > > >> >> if (dados$len == 1){ > A sua solucao nao funciona porque essa condicao tem comprimento igual ao > tamanho de dados$len, mas if() precisa de TRUE ou FALSE (tamanho 1). > > > ------------------------------ > > Message: 14 > Date: Mon, 22 Jul 2013 09:36:45 -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] Duvida Concatenação > Message-ID: > <CAEuVWs3vuEk4+167DRwRMKzJbbhq1DqtTg3__XOtJDwh-GONUw(a)mail.gmail.com> > Content-Type: text/plain; charset="iso-8859-1" > > Elias > > Não funcionou! > > O comando criou o resultado abaixo, tudo dentro da mesma variável. > > 000 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 > 1000 > > > Em 22 de julho de 2013 09:22, Elias Krainski > <eliaskrainski(a)yahoo.com.br>escreveu: > >> >> >>> if (dados$len == 1){ >>> >> A sua solucao nao funciona porque essa condicao tem comprimento igual ao >> tamanho de dados$len, mas if() precisa de TRUE ou FALSE (tamanho 1). >> >> ______________________________**_________________ >> R-br mailing list >> R-br(a)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. >> > > > > -- > 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/20130722/ea70e27b/atta…> > > ------------------------------ > > Message: 15 > Date: Mon, 22 Jul 2013 09:39:21 -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] Duvida Concatenação > Message-ID: > <CAKU4wot2CKashPjVfBtLRtNA0fPq8SghwE2r3jpbrJzQ93_2SA(a)mail.gmail.com> > Content-Type: text/plain; charset="iso-8859-1" > > Sergio, > > da um dput(head(dados$var)) e nos cola o que aparecer na tela > > > 2013/7/22 Sérgio Henrique almeida da silva ju <sergio.edfisica(a)gmail.com> > >> Elias >> >> Não funcionou! >> >> O comando criou o resultado abaixo, tudo dentro da mesma variável. >> >> 000 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 >> 1000 >> >> >> Em 22 de julho de 2013 09:22, Elias Krainski >> <eliaskrainski(a)yahoo.com.br>escreveu: >> >> >>> >>>> if (dados$len == 1){ >>>> >>> A sua solucao nao funciona porque essa condicao tem comprimento igual ao >>> tamanho de dados$len, mas if() precisa de TRUE ou FALSE (tamanho 1). >>> >>> ______________________________**_________________ >>> R-br mailing list >>> R-br(a)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. >>> >> >> >> >> -- >> 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. >> > -------------- Próxima Parte ---------- > Um anexo em HTML foi limpo... > URL: > <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20130722/6f5cdf0b/atta…> > > ------------------------------ > > Message: 16 > Date: Mon, 22 Jul 2013 09:45:08 -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] Duvida Concatenação > Message-ID: > <CAEuVWs0eEZfki7BhPWB2z8EuPifQXA1yaynU8_xh=hecyeDR8g(a)mail.gmail.com> > Content-Type: text/plain; charset="iso-8859-1" > >> dput(head(dados$Filial)) > c(1L, 1L, 1L, 1L, 1L, 1L) > > Exemplo a variável pode ter os seguintes valores: 0, 1, 01, 44, 456, 0001 > e eu quero que ela fique assim: 0000, 0001, 0001, 0044, 0456, 0001. > > Abraços > > > > Em 22 de julho de 2013 09:39, Rodrigo Coster <rcoster(a)gmail.com> escreveu: > >> Sergio, >> >> da um dput(head(dados$var)) e nos cola o que aparecer na tela >> >> >> 2013/7/22 Sérgio Henrique almeida da silva ju <sergio.edfisica(a)gmail.com> >> >>> Elias >>> >>> Não funcionou! >>> >>> O comando criou o resultado abaixo, tudo dentro da mesma variável. >>> >>> 000 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 >>> 1000 >>> >>> >>> Em 22 de julho de 2013 09:22, Elias Krainski >>> <eliaskrainski(a)yahoo.com.br>escreveu: >>> >>> >>>> >>>>> if (dados$len == 1){ >>>>> >>>> A sua solucao nao funciona porque essa condicao tem comprimento igual ao >>>> tamanho de dados$len, mas if() precisa de TRUE ou FALSE (tamanho 1). >>>> >>>> ______________________________**_________________ >>>> R-br mailing list >>>> R-br(a)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. >>>> >>> >>> >>> >>> -- >>> 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. >> > > > > -- > 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/20130722/673d6415/atta…> > > ------------------------------ > > Message: 17 > Date: Mon, 22 Jul 2013 09:48:02 -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] Duvida Concatenação > Message-ID: > <CAKU4wotd=pyFwVfNByq13FtpVWwaOHp6OOhRvRm+K+BxusE8jQ(a)mail.gmail.com> > Content-Type: text/plain; charset="iso-8859-1" > > Entao o que tu precisa fazer é dados$Filial <- sprintf('%04d', dados$Filial) > > > 2013/7/22 Sérgio Henrique almeida da silva ju <sergio.edfisica(a)gmail.com> > >> > dput(head(dados$Filial)) >> c(1L, 1L, 1L, 1L, 1L, 1L) >> >> Exemplo a variável pode ter os seguintes valores: 0, 1, 01, 44, 456, 0001 >> e eu quero que ela fique assim: 0000, 0001, 0001, 0044, 0456, 0001. >> >> Abraços >> >> >> >> Em 22 de julho de 2013 09:39, Rodrigo Coster <rcoster(a)gmail.com> escreveu: >> >> Sergio, >>> >>> da um dput(head(dados$var)) e nos cola o que aparecer na tela >>> >>> >>> 2013/7/22 Sérgio Henrique almeida da silva ju <sergio.edfisica(a)gmail.com> >>> >>>> Elias >>>> >>>> Não funcionou! >>>> >>>> O comando criou o resultado abaixo, tudo dentro da mesma variável. >>>> >>>> 000 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 >>>> 1000 1000 >>>> >>>> >>>> Em 22 de julho de 2013 09:22, Elias Krainski <eliaskrainski(a)yahoo.com.br >>>> > escreveu: >>>> >>>> >>>>> >>>>>> if (dados$len == 1){ >>>>>> >>>>> A sua solucao nao funciona porque essa condicao tem comprimento igual >>>>> ao tamanho de dados$len, mas if() precisa de TRUE ou FALSE (tamanho 1). >>>>> >>>>> ______________________________**_________________ >>>>> R-br mailing list >>>>> R-br(a)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. >>>>> >>>> >>>> >>>> >>>> -- >>>> 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. >>> >> >> >> >> -- >> 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. >> > -------------- Próxima Parte ---------- > Um anexo em HTML foi limpo... > URL: > <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20130722/e90384a3/atta…> > > ------------------------------ > > Message: 18 > Date: Mon, 22 Jul 2013 09:51:08 -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] Duvida Concatenação > Message-ID: > <CAEuVWs2GS1eFk+boEuqr4MGg8vwMjZwK4nKujbdwgZVwDsvvXw(a)mail.gmail.com> > Content-Type: text/plain; charset="iso-8859-1" > > Funcionou amigo! > > Obrigado. > > > Em 22 de julho de 2013 09:48, Rodrigo Coster <rcoster(a)gmail.com> escreveu: > >> Entao o que tu precisa fazer é dados$Filial <- sprintf('%04d', >> dados$Filial) >> >> >> 2013/7/22 Sérgio Henrique almeida da silva ju <sergio.edfisica(a)gmail.com> >> >>> > dput(head(dados$Filial)) >>> c(1L, 1L, 1L, 1L, 1L, 1L) >>> >>> Exemplo a variável pode ter os seguintes valores: 0, 1, 01, 44, 456, 0001 >>> e eu quero que ela fique assim: 0000, 0001, 0001, 0044, 0456, 0001. >>> >>> Abraços >>> >>> >>> >>> Em 22 de julho de 2013 09:39, Rodrigo Coster <rcoster(a)gmail.com>escreveu: >>> >>> Sergio, >>>> >>>> da um dput(head(dados$var)) e nos cola o que aparecer na tela >>>> >>>> >>>> 2013/7/22 Sérgio Henrique almeida da silva ju <sergio.edfisica(a)gmail.com >>>> > >>>> >>>>> Elias >>>>> >>>>> Não funcionou! >>>>> >>>>> O comando criou o resultado abaixo, tudo dentro da mesma variável. >>>>> >>>>> 000 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 >>>>> 1000 1000 >>>>> >>>>> >>>>> Em 22 de julho de 2013 09:22, Elias Krainski < >>>>> eliaskrainski(a)yahoo.com.br> escreveu: >>>>> >>>>> >>>>>> >>>>>>> if (dados$len == 1){ >>>>>>> >>>>>> A sua solucao nao funciona porque essa condicao tem comprimento igual >>>>>> ao tamanho de dados$len, mas if() precisa de TRUE ou FALSE (tamanho 1). >>>>>> >>>>>> ______________________________**_________________ >>>>>> R-br mailing list >>>>>> R-br(a)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. >>>>>> >>>>> >>>>> >>>>> >>>>> -- >>>>> 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. >>>> >>> >>> >>> >>> -- >>> 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. >> > > > > -- > 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/20130722/2afa214e/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 26 > *****************************************

1 0

problemas com o símbolo %
by alanarocha＠sapo.pt 23 Jul '13

23 Jul '13

Olá Augusto, onde é que aparece upload no link do pastebin? o que eu pretendo é por exemplo: Ponte da Barca 67,7% 73,9% 82,4% 83,1% 76,5% 83,8% Braga 76,7% 84,9% 89,4% 83,3% 78,2% 78,4% Fafe 80,0% 76,7% 81,8% 76,6% 79,8% 84,8% Maia 80,4% 77,0% 75,7% 83,6% 82,6% 83,7% VNGaia 81,4% 66,4% 67,0% 67,2% 75,6% 82,5% SMFeira 63,3% 71,1% 68,0% 69,9% 65,4% 73,5% eu quero que o simbolo % desapareça e fiquem os valores como estão, ou seja, transformar o texto em numero no codigo eu uso as.numeric(gsub() mas não esta a funcionar setwd("f:/Ana_trabalho/indicadores_semestrais/1 semestre 2013") dados<-read.table("Hgb.csv",header=TRUE, sep=";",stringsAsFactors=FALSE,dec=",") for (i in 2:6) { #Executa o comando a seguir para as colunas 2 a 6 (1º semestre de 2013) dados[,i] <- as.numeric(gsub('%','',dados[,i])) # Tira o símbolo de percentual e transforma texto em número } colnames(dados) <- c("Clinica","Jan","Fev","Mar","Abr","Mai","Jun") dados como resolvo 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. Re: Problema no read.fwf. (Luciane Maria Pilotto) > 2. Re: Problema no read.fwf. (Rodrigo Coster) > 3. Datas em R (Eliana Silva) > 4. subset (Fátima Lima Paula) > 5. Re: subset (Benilton Carvalho) > 6. Re: subset (Fátima Lima Paula) > 7. Funcao L(K Ripley's transf.) com mais de 3000 pontos > (Felipe Sodre Barros) > 8. Re: Funcao L(K Ripley's transf.) com mais de 3000 pontos > (Elias Krainski) > 9. Duvida Concatenação (Sérgio Henrique almeida da silva ju) > 10. Re: Duvida Concatenação (Elias Krainski) > 11. Re: Duvida Concatenação (Sérgio Henrique almeida da silva ju) > 12. Re: Duvida Concatenação (Elias Krainski) > 13. Re: Duvida Concatenação (Elias Krainski) > 14. Re: Duvida Concatenação (Sérgio Henrique almeida da silva ju) > 15. Re: Duvida Concatenação (Rodrigo Coster) > 16. Re: Duvida Concatenação (Sérgio Henrique almeida da silva ju) > 17. Re: Duvida Concatenação (Rodrigo Coster) > 18. Re: Duvida Concatenação (Sérgio Henrique almeida da silva ju) > > > ---------------------------------------------------------------------- > > Message: 1 > Date: Sun, 21 Jul 2013 09:57:35 -0700 (PDT) > From: Luciane Maria Pilotto <lutipilotto(a)yahoo.com.br> > To: "r-br(a)listas.c3sl.ufpr.br" <r-br(a)listas.c3sl.ufpr.br> > Subject: Re: [R-br] Problema no read.fwf. > Message-ID: > <1374425855.15949.YahooMailNeo(a)web122901.mail.ne1.yahoo.com> > Content-Type: text/plain; charset="iso-8859-1" > > Como vc desabilitou o caracter? Tb tive problema com esta função. > > Att., > Luciane > > > ________________________________ > De: Rodrigo Coster <rcoster(a)gmail.com> > Para: "r-br(a)listas.c3sl.ufpr.br" <r-br(a)listas.c3sl.ufpr.br> > Enviadas: Quinta-feira, 18 de Julho de 2013 11:36 > Assunto: Re: [R-br] Problema no read.fwf. > > > > Acertou em cheio, resolvi desabilitando o caractere de comentário. Valeu! > > > > 2013/7/18 Adriano Borges Costa <adrianobfc(a)gmail.com> > > Eu estava tendo esse problema e verifiquei que haviam alguns > caracteres # na minha base, principalmente no campo Endereço, que > substituíam ç, °, - e outros caracteres normalmente temos problemas. > Como o R não considera #, imagino que ele ignorava esses caracteres > e por isso dava incompatibilidade. >> >> Eu consegui resolver. >> >> Sou usuário recente, então posso na verdade estar falando bobagem. >> >> Abraços >> >> Adriano >> >> >> >> >> Em 18 de julho de 2013 11:01, Rodrigo Coster <rcoster(a)gmail.com> escreveu: >> >> Caros, estou usando o read.fwf para ler um banco, e obtive a >> seguinte mensagem de erro: >>> >>> >>>> len <- c(13, 11, 11, 2, 2, 1, 70, 8, 4, 8, 8, 2, 35, 7, 15, 11, >>>> 16, 5, 8, 2, 8, 7, 5, 8, 2, 13, 4, 4) >>> >>>> dados <- dadostemp <- read.fwf('05.txt', width=len, header=FALSE, >>>> stringsAsFactors=FALSE) >>> Erro em scan(file, what, nmax, sep, dec, quote, skip, nlines, >>> na.strings, : >>> linha 28659 não tinha 28 elementos >>> >>> >>> Pensei que na linha 28659 estava faltando algum caractere, mas >>> verifiquei que todas as linhas tem o mesmo tamanho: >>> >>> >>>> temp <- readLines('05.txt') >>>> table(nchar(temp)) >>> >>> >>> 290 >>> 386103 >>>> length(temp) >>> [1] 386103 >>> >>> >>> Alguem tem alguma idéia do que pode ser? Ou de como nao usar o >>> read.fwf e usar o carregado pelo readLines? >>> >>> >>> >>> >>> _______________________________________________ >>> 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 >> _______________________________________________ >> 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. > -------------- Próxima Parte ---------- > Um anexo em HTML foi limpo... > URL: > <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20130721/bae24e6a/atta…> > > ------------------------------ > > Message: 2 > Date: Sun, 21 Jul 2013 16:41:53 -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] Problema no read.fwf. > Message-ID: > <CAKU4wovgB2F2H-J4aB+jY0+XJMkdFdc3bCs0_O1mhTBDLU0NvA(a)mail.gmail.com> > Content-Type: text/plain; charset="iso-8859-1" > > É só colocar o parâmetro comment.char='' no read.fwf() > > > 2013/7/21 Luciane Maria Pilotto <lutipilotto(a)yahoo.com.br> > >> Como vc desabilitou o caracter? Tb tive problema com esta função. >> >> Att., >> *Luciane * >> >> ------------------------------ >> *De:* Rodrigo Coster <rcoster(a)gmail.com> >> *Para:* "r-br(a)listas.c3sl.ufpr.br" <r-br(a)listas.c3sl.ufpr.br> >> *Enviadas:* Quinta-feira, 18 de Julho de 2013 11:36 >> *Assunto:* Re: [R-br] Problema no read.fwf. >> >> Acertou em cheio, resolvi desabilitando o caractere de comentário. Valeu! >> >> >> 2013/7/18 Adriano Borges Costa <adrianobfc(a)gmail.com> >> >> Eu estava tendo esse problema e verifiquei que haviam alguns caracteres # >> na minha base, principalmente no campo Endereço, que substituíam ç, °, - e >> outros caracteres normalmente temos problemas. Como o R não considera #, >> imagino que ele ignorava esses caracteres e por isso dava incompatibilidade. >> >> Eu consegui resolver. >> >> Sou usuário recente, então posso na verdade estar falando bobagem. >> >> Abraços >> >> Adriano >> >> >> Em 18 de julho de 2013 11:01, Rodrigo Coster <rcoster(a)gmail.com> escreveu: >> >> Caros, estou usando o read.fwf para ler um banco, e obtive a seguinte >> mensagem de erro: >> >> > len <- c(13, 11, 11, 2, 2, 1, 70, 8, 4, 8, 8, 2, 35, 7, 15, 11, 16, 5, >> 8, 2, 8, 7, 5, 8, 2, 13, 4, 4) >> > dados <- dadostemp <- read.fwf('05.txt', width=len, header=FALSE, >> stringsAsFactors=FALSE) >> Erro em scan(file, what, nmax, sep, dec, quote, skip, nlines, na.strings, >> : >> linha 28659 não tinha 28 elementos >> >> Pensei que na linha 28659 estava faltando algum caractere, mas verifiquei >> que todas as linhas tem o mesmo tamanho: >> >> > temp <- readLines('05.txt') >> > table(nchar(temp)) >> >> 290 >> 386103 >> > length(temp) >> [1] 386103 >> >> Alguem tem alguma idéia do que pode ser? Ou de como nao usar o read.fwf e >> usar o carregado pelo readLines? >> >> >> >> _______________________________________________ >> 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 >> >> _______________________________________________ >> 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. >> > -------------- Próxima Parte ---------- > Um anexo em HTML foi limpo... > URL: > <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20130721/0cff31fd/atta…> > > ------------------------------ > > Message: 3 > Date: Sun, 21 Jul 2013 20:50:56 +0100 > From: Eliana Silva <eliana.va.silva(a)gmail.com> > To: r-br(a)listas.c3sl.ufpr.br > Subject: [R-br] Datas em R > Message-ID: > <CAHd1w0ZV9J6G0sEr2nvrHd0ifgsp33uJ1MAPPkQC1oitnqHZdQ(a)mail.gmail.com> > Content-Type: text/plain; charset="iso-8859-1" > > 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 > -------------- Próxima Parte ---------- > Um anexo em HTML foi limpo... > URL: > <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20130721/239a7f7a/atta…> > > ------------------------------ > > Message: 4 > Date: Sun, 21 Jul 2013 18:00:47 -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] subset > Message-ID: > <CAJzNC0v7ReqdjJhzRfGrgvf1JFUc0vJqM_Dok8nekXQVLN6WaQ(a)mail.gmail.com> > Content-Type: text/plain; charset="iso-8859-1" > > Olá companheiros do R. > Quero criar um dataframe a partir de algumas categorias de uma variável. > Não sei o que estou fazendo de errado. > Exemplo: > > nome=c("a","b","c","d","e","f","g","h","i","j","k") > ide=c("1","2","3","1","2","4","6","6","9","2","1") > df=cbind(nome,ide) > df=as.data.frame(df) > df > #quero um dataframe apenas com os ide = 1, 3 e 6 > teste=subset(df,ide==c("1","3","6")) > teste > Mensagens de aviso perdidas: > 1: In is.na(e1) | is.na(e2) : > comprimento do objeto maior não é múltiplo do comprimento do objeto menor > 2: In `==.default`(ide, c("1", "3", "6")) : > comprimento do objeto maior não é múltiplo do comprimento do objeto menor > teste > > #Cria algo que não tem nada a ver: > > nome ide > 1 a 1 > 4 d 1 > > Alguém pode me dizer onde estou errando? > Obrigada > 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/20130721/33dc9249/atta…> > > ------------------------------ > > Message: 5 > Date: Sun, 21 Jul 2013 18:14:32 -0300 > From: Benilton Carvalho <beniltoncarvalho(a)gmail.com> > To: r-br <r-br(a)listas.c3sl.ufpr.br> > Subject: Re: [R-br] subset > Message-ID: > <CAO-arWN5jt9=QjjfOn5JyMPC7GCNL9McCtBT=4B6JN6kY2diRw(a)mail.gmail.com> > Content-Type: text/plain; charset=ISO-8859-1 > > subset(df, ide %in% c('1', '3', '6')) > > > > 2013/7/21 Fátima Lima Paula <fatima.lima.paula(a)gmail.com>: >> Olá companheiros do R. >> Quero criar um dataframe a partir de algumas categorias de uma variável. >> Não sei o que estou fazendo de errado. >> Exemplo: >> >> nome=c("a","b","c","d","e","f","g","h","i","j","k") >> ide=c("1","2","3","1","2","4","6","6","9","2","1") >> df=cbind(nome,ide) >> df=as.data.frame(df) >> df >> #quero um dataframe apenas com os ide = 1, 3 e 6 >> teste=subset(df,ide==c("1","3","6")) >> teste >> Mensagens de aviso perdidas: >> 1: In is.na(e1) | is.na(e2) : >> comprimento do objeto maior não é múltiplo do comprimento do objeto menor >> 2: In `==.default`(ide, c("1", "3", "6")) : >> comprimento do objeto maior não é múltiplo do comprimento do objeto menor >> teste >> >> #Cria algo que não tem nada a ver: >> >> nome ide >> 1 a 1 >> 4 d 1 >> >> Alguém pode me dizer onde estou errando? >> Obrigada >> 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. > > > ------------------------------ > > Message: 6 > Date: Sun, 21 Jul 2013 18:27:13 -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] subset > Message-ID: > <CAJzNC0sObDcN7X5Wck82+BCp-CP3W6hFpKVD9YUNsJbwVHjhjg(a)mail.gmail.com> > Content-Type: text/plain; charset="iso-8859-1" > > Perfeito Benilton. O pior é que eu acho que já havia perguntado isso e você > já havia respondido. > Desculpe, mas na pressa, vocês são mais eficientes do que minhas buscas. > Abs > > > Em 21 de julho de 2013 18:14, Benilton Carvalho > <beniltoncarvalho(a)gmail.com>escreveu: > >> subset(df, ide %in% c('1', '3', '6')) >> >> >> >> 2013/7/21 Fátima Lima Paula <fatima.lima.paula(a)gmail.com>: >> > Olá companheiros do R. >> > Quero criar um dataframe a partir de algumas categorias de uma variável. >> > Não sei o que estou fazendo de errado. >> > Exemplo: >> > >> > nome=c("a","b","c","d","e","f","g","h","i","j","k") >> > ide=c("1","2","3","1","2","4","6","6","9","2","1") >> > df=cbind(nome,ide) >> > df=as.data.frame(df) >> > df >> > #quero um dataframe apenas com os ide = 1, 3 e 6 >> > teste=subset(df,ide==c("1","3","6")) >> > teste >> > Mensagens de aviso perdidas: >> > 1: In is.na(e1) | is.na(e2) : >> > comprimento do objeto maior não é múltiplo do comprimento do objeto >> menor >> > 2: In `==.default`(ide, c("1", "3", "6")) : >> > comprimento do objeto maior não é múltiplo do comprimento do objeto >> menor >> > teste >> > >> > #Cria algo que não tem nada a ver: >> > >> > nome ide >> > 1 a 1 >> > 4 d 1 >> > >> > Alguém pode me dizer onde estou errando? >> > Obrigada >> > 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/20130721/c2310c60/atta…> > > ------------------------------ > > Message: 7 > Date: Sun, 21 Jul 2013 18:49:50 -0300 > From: Felipe Sodre Barros <felipe.b4rros(a)gmail.com> > To: r-br(a)listas.c3sl.ufpr.br > Subject: [R-br] Funcao L(K Ripley's transf.) com mais de 3000 pontos > Message-ID: > <CALA-_BVZH955aVWYDNoJS4O72Rtj+_3SghB3VQjbQL8XaWCaOg(a)mail.gmail.com> > Content-Type: text/plain; charset="iso-8859-1" > > Boa noite. > Estou fazendo uma análise de processos pontuais, utilizando o pacote > spatstat. > Ao tentar realizar a análise L, me deparei com um problema: Meus dados > superam o 'nlarge' (defindo como 3.000). E por mais que eu tente aumentar o > 'nlarge', tenho como resultado que os dados são muito grandes, sendo por > isto impossível de alocar XXmb. > > Contudo, se eu rodar tal análise sem a geração de simulações (envelope), > ele apenas me informa que o n dos dados que possuo são superiores a 3000 e > por isto apenas calculará o 'bordar correction'. > A minha duvida está, em que de fato representa o 'border correction' > calculado. Posso utiliza-lo como se este representasse o padrão de > distribuição do processo analisado? > Desde já vos agradeço. > Att > -------------- Próxima Parte ---------- > Um anexo em HTML foi limpo... > URL: > <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20130721/baf1aa4d/atta…> > > ------------------------------ > > Message: 8 > Date: Mon, 22 Jul 2013 08:57:06 -0300 > From: Elias Krainski <eliaskrainski(a)yahoo.com.br> > To: r-br(a)listas.c3sl.ufpr.br > Subject: Re: [R-br] Funcao L(K Ripley's transf.) com mais de 3000 > pontos > Message-ID: <51ED1E12.2000304(a)yahoo.com.br> > Content-Type: text/plain; charset=ISO-8859-1; format=flowed > > Veja Kenv.csr() e khat() do pacote 'splancs'. > > > ------------------------------ > > Message: 9 > Date: Mon, 22 Jul 2013 08:57:41 -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] Duvida Concatenação > Message-ID: > <CAEuVWs00mO55tqMaokCbJx0pF3UUSLRJDsbn-+qFfYwPKhXMTA(a)mail.gmail.com> > Content-Type: text/plain; charset="iso-8859-1" > > Prezados > > Estou tentando concatenar uma variável com a seguinte condição: > Se ela tiver tamanho 1, gostaria de concatenar 000, se ela tiver tamanho 2 > concateno 00 e se ela tiver tamanho 3 concateno 0. > > Eu pensei na seguinte função: > > dados$len <- nchar(dados$var) > func <- function(){ > if (dados$len == 1){ > dados$var1 = paste("000", dados$var, colapse="") } > else if (dados$len == 2){ > dados$var1 = paste("00", dados$var, colapse="")} > else if (dados$len == 3){ > dados$var1 = paste("0", dados$var, colapse="")} > } > func() > > > Mas está dando a seguinte mensagem de erro: > > Mensagens de aviso perdidas: > In if (dados$len == 1) { : > a condição tem comprimento > 1 e somente o primeiro elemento será usado > > Vi em outro tópico que o Benilton sugere usar with, mas não sei como fazer. > > 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/20130722/7123a232/atta…> > > ------------------------------ > > Message: 10 > Date: Mon, 22 Jul 2013 09:00:29 -0300 > From: Elias Krainski <eliaskrainski(a)yahoo.com.br> > To: r-br(a)listas.c3sl.ufpr.br > Subject: Re: [R-br] Duvida Concatenação > Message-ID: <51ED1EDD.3080900(a)yahoo.com.br> > Content-Type: text/plain; charset="iso-8859-1"; Format="flowed" > > Se a variável for inteiro > sprintf("%04d", c(1,3,30,50,900)) > > On 07/22/2013 08:57 AM, Sérgio Henrique almeida da silva ju wrote: >> Prezados >> >> Estou tentando concatenar uma variável com a seguinte condição: >> Se ela tiver tamanho 1, gostaria de concatenar 000, se ela tiver >> tamanho 2 concateno 00 e se ela tiver tamanho 3 concateno 0. >> >> Eu pensei na seguinte função: >> >> dados$len <- nchar(dados$var) >> func <- function(){ >> if (dados$len == 1){ >> dados$var1 = paste("000", dados$var, colapse="") } >> else if (dados$len == 2){ >> dados$var1 = paste("00", dados$var, colapse="")} >> else if (dados$len == 3){ >> dados$var1 = paste("0", dados$var, colapse="")} >> } >> func() >> >> >> Mas está dando a seguinte mensagem de erro: >> >> Mensagens de aviso perdidas: >> In if (dados$len == 1) { : >> a condição tem comprimento > 1 e somente o primeiro elemento será usado >> >> Vi em outro tópico que o Benilton sugere usar with, mas não sei como >> fazer. >> >> 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. > > -------------- Próxima Parte ---------- > Um anexo em HTML foi limpo... > URL: > <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20130722/c61bfef7/atta…> > > ------------------------------ > > Message: 11 > Date: Mon, 22 Jul 2013 09:03: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: Re: [R-br] Duvida Concatenação > Message-ID: > <CAEuVWs1AgBsUb6jU_1D8Diycb2x05d8Q231mFYfx+aNzMd2fMg(a)mail.gmail.com> > Content-Type: text/plain; charset="iso-8859-1" > > Não entendi Elias! > > > Em 22 de julho de 2013 09:00, Elias Krainski > <eliaskrainski(a)yahoo.com.br>escreveu: > >> Se a variável for inteiro >> sprintf("%04d", c(1,3,30,50,900)) >> >> >> On 07/22/2013 08:57 AM, Sérgio Henrique almeida da silva ju wrote: >> >> Prezados >> >> Estou tentando concatenar uma variável com a seguinte condição: >> Se ela tiver tamanho 1, gostaria de concatenar 000, se ela tiver tamanho 2 >> concateno 00 e se ela tiver tamanho 3 concateno 0. >> >> Eu pensei na seguinte função: >> >> dados$len <- nchar(dados$var) >> func <- function(){ >> if (dados$len == 1){ >> dados$var1 = paste("000", dados$var, colapse="") } >> else if (dados$len == 2){ >> dados$var1 = paste("00", dados$var, colapse="")} >> else if (dados$len == 3){ >> dados$var1 = paste("0", dados$var, colapse="")} >> } >> func() >> >> >> Mas está dando a seguinte mensagem de erro: >> >> Mensagens de aviso perdidas: >> In if (dados$len == 1) { : >> a condição tem comprimento > 1 e somente o primeiro elemento será usado >> >> Vi em outro tópico que o Benilton sugere usar with, mas não sei como >> fazer. >> >> 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 >> listR-br@listas.c3sl.ufpr.brhttps://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/20130722/206d6788/atta…> > > ------------------------------ > > Message: 12 > Date: Mon, 22 Jul 2013 09:21:01 -0300 > From: Elias Krainski <eliaskrainski(a)yahoo.com.br> > To: r-br(a)listas.c3sl.ufpr.br > Subject: Re: [R-br] Duvida Concatenação > Message-ID: <51ED23AD.6040807(a)yahoo.com.br> > Content-Type: text/plain; charset=ISO-8859-1; format=flowed > > > sprintf(), usando '%04d', faz o que vc quer para inteiros. > > Se dados$var é 'character', use > > aaa <- sapply(3:0, function(n) paste(rep(0, n), collapse='')) > dados$var1 <- paste(aaa[nchar(dados$var)], dados$var, collapse='') > > > > ------------------------------ > > Message: 13 > Date: Mon, 22 Jul 2013 09:22:53 -0300 > From: Elias Krainski <eliaskrainski(a)yahoo.com.br> > To: r-br(a)listas.c3sl.ufpr.br > Subject: Re: [R-br] Duvida Concatenação > Message-ID: <51ED241D.2000802(a)yahoo.com.br> > Content-Type: text/plain; charset=ISO-8859-1; format=flowed > > >> >> if (dados$len == 1){ > A sua solucao nao funciona porque essa condicao tem comprimento igual ao > tamanho de dados$len, mas if() precisa de TRUE ou FALSE (tamanho 1). > > > ------------------------------ > > Message: 14 > Date: Mon, 22 Jul 2013 09:36:45 -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] Duvida Concatenação > Message-ID: > <CAEuVWs3vuEk4+167DRwRMKzJbbhq1DqtTg3__XOtJDwh-GONUw(a)mail.gmail.com> > Content-Type: text/plain; charset="iso-8859-1" > > Elias > > Não funcionou! > > O comando criou o resultado abaixo, tudo dentro da mesma variável. > > 000 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 > 1000 > > > Em 22 de julho de 2013 09:22, Elias Krainski > <eliaskrainski(a)yahoo.com.br>escreveu: > >> >> >>> if (dados$len == 1){ >>> >> A sua solucao nao funciona porque essa condicao tem comprimento igual ao >> tamanho de dados$len, mas if() precisa de TRUE ou FALSE (tamanho 1). >> >> ______________________________**_________________ >> R-br mailing list >> R-br(a)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. >> > > > > -- > 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/20130722/ea70e27b/atta…> > > ------------------------------ > > Message: 15 > Date: Mon, 22 Jul 2013 09:39:21 -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] Duvida Concatenação > Message-ID: > <CAKU4wot2CKashPjVfBtLRtNA0fPq8SghwE2r3jpbrJzQ93_2SA(a)mail.gmail.com> > Content-Type: text/plain; charset="iso-8859-1" > > Sergio, > > da um dput(head(dados$var)) e nos cola o que aparecer na tela > > > 2013/7/22 Sérgio Henrique almeida da silva ju <sergio.edfisica(a)gmail.com> > >> Elias >> >> Não funcionou! >> >> O comando criou o resultado abaixo, tudo dentro da mesma variável. >> >> 000 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 >> 1000 >> >> >> Em 22 de julho de 2013 09:22, Elias Krainski >> <eliaskrainski(a)yahoo.com.br>escreveu: >> >> >>> >>>> if (dados$len == 1){ >>>> >>> A sua solucao nao funciona porque essa condicao tem comprimento igual ao >>> tamanho de dados$len, mas if() precisa de TRUE ou FALSE (tamanho 1). >>> >>> ______________________________**_________________ >>> R-br mailing list >>> R-br(a)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. >>> >> >> >> >> -- >> 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. >> > -------------- Próxima Parte ---------- > Um anexo em HTML foi limpo... > URL: > <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20130722/6f5cdf0b/atta…> > > ------------------------------ > > Message: 16 > Date: Mon, 22 Jul 2013 09:45:08 -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] Duvida Concatenação > Message-ID: > <CAEuVWs0eEZfki7BhPWB2z8EuPifQXA1yaynU8_xh=hecyeDR8g(a)mail.gmail.com> > Content-Type: text/plain; charset="iso-8859-1" > >> dput(head(dados$Filial)) > c(1L, 1L, 1L, 1L, 1L, 1L) > > Exemplo a variável pode ter os seguintes valores: 0, 1, 01, 44, 456, 0001 > e eu quero que ela fique assim: 0000, 0001, 0001, 0044, 0456, 0001. > > Abraços > > > > Em 22 de julho de 2013 09:39, Rodrigo Coster <rcoster(a)gmail.com> escreveu: > >> Sergio, >> >> da um dput(head(dados$var)) e nos cola o que aparecer na tela >> >> >> 2013/7/22 Sérgio Henrique almeida da silva ju <sergio.edfisica(a)gmail.com> >> >>> Elias >>> >>> Não funcionou! >>> >>> O comando criou o resultado abaixo, tudo dentro da mesma variável. >>> >>> 000 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 >>> 1000 >>> >>> >>> Em 22 de julho de 2013 09:22, Elias Krainski >>> <eliaskrainski(a)yahoo.com.br>escreveu: >>> >>> >>>> >>>>> if (dados$len == 1){ >>>>> >>>> A sua solucao nao funciona porque essa condicao tem comprimento igual ao >>>> tamanho de dados$len, mas if() precisa de TRUE ou FALSE (tamanho 1). >>>> >>>> ______________________________**_________________ >>>> R-br mailing list >>>> R-br(a)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. >>>> >>> >>> >>> >>> -- >>> 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. >> > > > > -- > 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/20130722/673d6415/atta…> > > ------------------------------ > > Message: 17 > Date: Mon, 22 Jul 2013 09:48:02 -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] Duvida Concatenação > Message-ID: > <CAKU4wotd=pyFwVfNByq13FtpVWwaOHp6OOhRvRm+K+BxusE8jQ(a)mail.gmail.com> > Content-Type: text/plain; charset="iso-8859-1" > > Entao o que tu precisa fazer é dados$Filial <- sprintf('%04d', dados$Filial) > > > 2013/7/22 Sérgio Henrique almeida da silva ju <sergio.edfisica(a)gmail.com> > >> > dput(head(dados$Filial)) >> c(1L, 1L, 1L, 1L, 1L, 1L) >> >> Exemplo a variável pode ter os seguintes valores: 0, 1, 01, 44, 456, 0001 >> e eu quero que ela fique assim: 0000, 0001, 0001, 0044, 0456, 0001. >> >> Abraços >> >> >> >> Em 22 de julho de 2013 09:39, Rodrigo Coster <rcoster(a)gmail.com> escreveu: >> >> Sergio, >>> >>> da um dput(head(dados$var)) e nos cola o que aparecer na tela >>> >>> >>> 2013/7/22 Sérgio Henrique almeida da silva ju <sergio.edfisica(a)gmail.com> >>> >>>> Elias >>>> >>>> Não funcionou! >>>> >>>> O comando criou o resultado abaixo, tudo dentro da mesma variável. >>>> >>>> 000 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 >>>> 1000 1000 >>>> >>>> >>>> Em 22 de julho de 2013 09:22, Elias Krainski <eliaskrainski(a)yahoo.com.br >>>> > escreveu: >>>> >>>> >>>>> >>>>>> if (dados$len == 1){ >>>>>> >>>>> A sua solucao nao funciona porque essa condicao tem comprimento igual >>>>> ao tamanho de dados$len, mas if() precisa de TRUE ou FALSE (tamanho 1). >>>>> >>>>> ______________________________**_________________ >>>>> R-br mailing list >>>>> R-br(a)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. >>>>> >>>> >>>> >>>> >>>> -- >>>> 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. >>> >> >> >> >> -- >> 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. >> > -------------- Próxima Parte ---------- > Um anexo em HTML foi limpo... > URL: > <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20130722/e90384a3/atta…> > > ------------------------------ > > Message: 18 > Date: Mon, 22 Jul 2013 09:51:08 -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] Duvida Concatenação > Message-ID: > <CAEuVWs2GS1eFk+boEuqr4MGg8vwMjZwK4nKujbdwgZVwDsvvXw(a)mail.gmail.com> > Content-Type: text/plain; charset="iso-8859-1" > > Funcionou amigo! > > Obrigado. > > > Em 22 de julho de 2013 09:48, Rodrigo Coster <rcoster(a)gmail.com> escreveu: > >> Entao o que tu precisa fazer é dados$Filial <- sprintf('%04d', >> dados$Filial) >> >> >> 2013/7/22 Sérgio Henrique almeida da silva ju <sergio.edfisica(a)gmail.com> >> >>> > dput(head(dados$Filial)) >>> c(1L, 1L, 1L, 1L, 1L, 1L) >>> >>> Exemplo a variável pode ter os seguintes valores: 0, 1, 01, 44, 456, 0001 >>> e eu quero que ela fique assim: 0000, 0001, 0001, 0044, 0456, 0001. >>> >>> Abraços >>> >>> >>> >>> Em 22 de julho de 2013 09:39, Rodrigo Coster <rcoster(a)gmail.com>escreveu: >>> >>> Sergio, >>>> >>>> da um dput(head(dados$var)) e nos cola o que aparecer na tela >>>> >>>> >>>> 2013/7/22 Sérgio Henrique almeida da silva ju <sergio.edfisica(a)gmail.com >>>> > >>>> >>>>> Elias >>>>> >>>>> Não funcionou! >>>>> >>>>> O comando criou o resultado abaixo, tudo dentro da mesma variável. >>>>> >>>>> 000 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 1000 >>>>> 1000 1000 >>>>> >>>>> >>>>> Em 22 de julho de 2013 09:22, Elias Krainski < >>>>> eliaskrainski(a)yahoo.com.br> escreveu: >>>>> >>>>> >>>>>> >>>>>>> if (dados$len == 1){ >>>>>>> >>>>>> A sua solucao nao funciona porque essa condicao tem comprimento igual >>>>>> ao tamanho de dados$len, mas if() precisa de TRUE ou FALSE (tamanho 1). >>>>>> >>>>>> ______________________________**_________________ >>>>>> R-br mailing list >>>>>> R-br(a)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. >>>>>> >>>>> >>>>> >>>>> >>>>> -- >>>>> 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. >>>> >>> >>> >>> >>> -- >>> 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. >> > > > > -- > 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/20130722/2afa214e/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 26 > *****************************************

1 0

substituir ponto por vírgula nos eixos de gráfico
by luc.souza＠usp.br 22 Jul '13

22 Jul '13

Prezados. sei que o R só utiliza pontos para separar os decimais. Preciso fazer um gráfico, onde os eixos "x" e "y" variam de 0 a 1, com intervalos de 0.1. Até aí tudo bem. Só que preciso que esses valores nos eixos apareçam com "," e não com ".", ao separar os decimais. Existe uma solução? Obrigado Lucas F. de Souza Eng. Agrícola - CONAB M.Sc. Produção Vegetal - UENF Doutorando Engenharia de Sistemas Agrícolas - ESALQ/USP tel: (19) 8160-7068

7 9

(sem assunto)
by geovane barbosa 22 Jul '13

22 Jul '13

alguém teria algum manual ou texto sobre uso do winbugs no R fazendo uso de malhas digitais de vizinhança (IBGE e outros) para fins de modelagem em Est. Espacial? Obrigado.

1 1

Aumentar as dimensoes do dispositivo grafico
by Pedro Emmanuel Alvarenga Americano do Brasil 22 Jul '13

22 Jul '13

Ami g os de R, Estou Tentando fazer um forest plot com pacote meta, me deparei com o seguinte problema. As margens do grafico vao muito alem das margens da janela, entao eu nao consio exergar o grafico todo, so a parte central. Eu tentei aumentar a janela puxando as bordas com o mause , mas nao deu certo. Eu t e ntei setar dimensoes com gpar(din...) mas vem um aviso avisando que esse parmetro nao e editalvel. A saida estrategica foi salvar o grafico com tiff aumentndo heigh e width o olhando o grafico salvo. Ha alguma maneira de dimensionar a janela antes de chamar o grafico? detalhe é que o grafico é gerado com o pacote grid e não com o graphics. obito1 pop1 obito0 pop0 ID 1 33 207 38 213 Barber-1967 2 3 38 3 39 Reynolds-1972 3 5 69 11 93 Ahlmark-1974 4 7 114 14 116 Wilhelmsson-1974 5 102 1533 127 1520 multic-intern-1975 6 1 11 1 11 Yusuf-1979 7 61 238 62 242 Andersen-1979 8 4 59 6 52 Rehnqvist-1980 9 28 355 27 365 Baber-1980 10 17 132 19 129 Wilcox-A-1980 11 19 127 19 129 Wicox-P-1980 12 40 698 62 697 Hjalmarson-1981 13 98 945 152 939 Nor-multic-1981 14 25 278 37 282 Hansteen-1982 15 64 873 52 583 Julian-1982 16 138 1916 188 1921 BHAT-1982 17 60 632 48 471 Taylor-1982 18 9 273 16 280 Manger Cats-1983 19 25 154 31 147 Rehnqvist-1983 20 45 263 47 266 Australia-Suica-1983 21 5 101 11 103 Mazur-1984 22 57 853 45 883 EIS-1984 23 49 416 52 348 Salathia-1985 24 7 102 12 98 Roque-1987 25 86 1195 93 1200 LIT-1987 26 3 25 3 25 Kaul-1988 27 17 298 34 309 ASPI-1990 28 2 48 12 56 Schwartz-alto risco-1992 29 15 437 27 432 Schwartz-baixo risco-1992 30 17 130 9 123 SSSD-1993 31 3 23 1 24 Daraz-1995 32 2 75 3 71 Basu-1997 33 44 79 60 79 Aronow-1997 a <- read.delim('clipboard',header=T) library('meta') rr.MH <- m etabin(obito1,pop1,obito0,pop0,ID,a,complab='Placebo',outclab='Morte',label.e='Propranolol',label.c='Placebo') summary(rr.MH) forest( rr.MH) Pedro Brasil via Android (:)=

1 0

Problema para mudar projeção em um raster
by ASANTOS 22 Jul '13

22 Jul '13

Boa tarde Pessoal, Criei um raster e referencie em UTM sendo: require(raster) require(rgdal) require(sp) #Criando raster r <- raster(nc=1000, nr=1000) set.seed(20130622) stackIm1 <- stack(lapply(1, function(x) setValues(r, round(runif(ncell(r))* 255))))## Simulation red band # # Definindo sistema de projeção r.geo <- CRS("+proj=utm +zone=23 +south +datum=WGS84 +units=m +no_defs") # geographical datum WGS84 proj4string(stackIm1) <- r.geo # mas quando tento converter para latlong com spTransform: stackIm1.ll<-spTransform(stackIm1, CRS("+proj=longlat+datum=WGS84")) Erro em spTransform(stackIm1, CRS("+proj=longlat+datum=WGS84")) : erro na avaliação do argumento 'CRSobj' na seleção do método para a função 'spTransform': 'Erro em CRS("+proj=longlat+datum=WGS84") : unknown projection id Obtenho este erro e não consigo achar a solução, alguém poderia dar um help, 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 ======================================================================

4 14

Duvida Concatenação
by Sérgio Henrique almeida da silva ju 22 Jul '13

22 Jul '13

Prezados Estou tentando concatenar uma variável com a seguinte condição: Se ela tiver tamanho 1, gostaria de concatenar 000, se ela tiver tamanho 2 concateno 00 e se ela tiver tamanho 3 concateno 0. Eu pensei na seguinte função: dados$len <- nchar(dados$var) func <- function(){ if (dados$len == 1){ dados$var1 = paste("000", dados$var, colapse="") } else if (dados$len == 2){ dados$var1 = paste("00", dados$var, colapse="")} else if (dados$len == 3){ dados$var1 = paste("0", dados$var, colapse="")} } func() Mas está dando a seguinte mensagem de erro: Mensagens de aviso perdidas: In if (dados$len == 1) { : a condição tem comprimento > 1 e somente o primeiro elemento será usado Vi em outro tópico que o Benilton sugere usar with, mas não sei como fazer. 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 9

Funcao L(K Ripley's transf.) com mais de 3000 pontos
by Felipe Sodre Barros 22 Jul '13

22 Jul '13

Boa noite. Estou fazendo uma análise de processos pontuais, utilizando o pacote spatstat. Ao tentar realizar a análise L, me deparei com um problema: Meus dados superam o 'nlarge' (defindo como 3.000). E por mais que eu tente aumentar o 'nlarge', tenho como resultado que os dados são muito grandes, sendo por isto impossível de alocar XXmb. Contudo, se eu rodar tal análise sem a geração de simulações (envelope), ele apenas me informa que o n dos dados que possuo são superiores a 3000 e por isto apenas calculará o 'bordar correction'. A minha duvida está, em que de fato representa o 'border correction' calculado. Posso utiliza-lo como se este representasse o padrão de distribuição do processo analisado? Desde já vos agradeço. Att

2 1

subset
by Fátima Lima Paula 21 Jul '13

21 Jul '13

Olá companheiros do R. Quero criar um dataframe a partir de algumas categorias de uma variável. Não sei o que estou fazendo de errado. Exemplo: nome=c("a","b","c","d","e","f","g","h","i","j","k") ide=c("1","2","3","1","2","4","6","6","9","2","1") df=cbind(nome,ide) df=as.data.frame(df) df #quero um dataframe apenas com os ide = 1, 3 e 6 teste=subset(df,ide==c("1","3","6")) teste Mensagens de aviso perdidas: 1: In is.na(e1) | is.na(e2) : comprimento do objeto maior não é múltiplo do comprimento do objeto menor 2: In `==.default`(ide, c("1", "3", "6")) : comprimento do objeto maior não é múltiplo do comprimento do objeto menor teste #Cria algo que não tem nada a ver: nome ide 1 a 1 4 d 1 Alguém pode me dizer onde estou errando? Obrigada Fátima -- "Minha felicidade depende da qualidade dos meus pensamentos"

2 2

Problema no read.fwf.
by Rodrigo Coster 21 Jul '13

21 Jul '13

Caros, estou usando o read.fwf para ler um banco, e obtive a seguinte mensagem de erro: > len <- c(13, 11, 11, 2, 2, 1, 70, 8, 4, 8, 8, 2, 35, 7, 15, 11, 16, 5, 8, 2, 8, 7, 5, 8, 2, 13, 4, 4) > dados <- dadostemp <- read.fwf('05.txt', width=len, header=FALSE, stringsAsFactors=FALSE) Erro em scan(file, what, nmax, sep, dec, quote, skip, nlines, na.strings, : linha 28659 não tinha 28 elementos Pensei que na linha 28659 estava faltando algum caractere, mas verifiquei que todas as linhas tem o mesmo tamanho: > temp <- readLines('05.txt') > table(nchar(temp)) 290 386103 > length(temp) [1] 386103 Alguem tem alguma idéia do que pode ser? Ou de como nao usar o read.fwf e usar o carregado pelo readLines?

3 4

Eliminar o nome das colunas de um data.frame()
by Tiago Souza Marçal 20 Jul '13

20 Jul '13

Boa noite pessoal, gostaria de saber se é possível dar nomes em colunas alternadas de um data.frame() ou apagar o nome das colunas. CMR: x<-c("a","a","a","a") y<-c(3,3,3,3) data.frame(x,y) x y 1 a 3 2 a 3 3 a 3 4 a 3 # Este é o output normal do R Gostaria de saber se posso substituir os nomes x e y por somente um como por exemplo col1. col1 1 a 3 2 a 3 3 a 3 4 a 3 Att. Tiago. ################################################################# Tiago de Souza Marçal - Graduando em Agronomia pelo CCA-UFES Bolsista de Iniciação Científica da área de Genética e Melhoramento de Plantas #################################################################

3 2

problemas com o símbolo %
by alanarocha＠sapo.pt 20 Jul '13

20 Jul '13

boa tarde, o meu ficheiro de dados tem o simbolo da % estou a utilizar stringAsFactor=False para o simbolo ser eliminado mas quando faço a leitura aparece-me na mesma como posso eliminar o simbolo % sem alterar a formatação dos numeros exemplo ter 70% e ao tirar o programa mudar para 0,7 o meu codigo é: setwd("f:/Ana_trabalho/indicadores_semestrais/1 semestre 2013") dados<-read.table("Hgb.csv",header=TRUE, sep=";",stringsAsFactors=FALSE,dec=",") #for (i in 1:7) { # Executa o comando a seguir para as colunas 2 a 6 (1º semestre de 2013) dados[,i] <- as.numeric(gsub('%','',dados[,i])) # Tira o símbolo de percentual e transforma texto em número #} colnames(dados) <- c("Clinica","Jan","Fev","Mar","Abr","Mai","Jun") dados os dados estão neste link: https://www.dropbox.com/sh/b9t2w2ljbi07ow4/8gONfv_4Sj/Hgb.csv Cumprimentos Ana

2 1

Matriz
by Tiago Souza Marçal 20 Jul '13

20 Jul '13

Boa tarde pessoal estou tentando construir uma matriz com letras e números, entretanto, gostaria de retirar as aspas de ambos que aparecem na matriz. Alguém tem alguma sugestão? Segue abaixo um CMR: x<-c("a","a","a","a") y<-c(2,2,2,2) matrix(c(y,x),nc=2) Att. Tiago. ################################################################# Tiago de Souza Marçal - Graduando em Agronomia pelo CCA-UFES Bolsista de Iniciação Científica da área de Genética e Melhoramento de Plantas #################################################################

2 1

Fatorial duplo com tratamento adicional
by ana paula coelho madeira 19 Jul '13

19 Jul '13

Boa noite! Tenho uns dados de um experimento em DIC em fatorial duplo com um tratamento adicional. Como devo entrar com os dados no R para usar a função fat2.ad.dic() do pacote ExpDes. Desde já agradeço Ana Paula

4 7

Analise de variância fator com níveis quantitativos
by Alisson Lucrecio 19 Jul '13

19 Jul '13

Caro Colegas r-br, Boa tarde. Nesse exemplo abaixo é certo transformar um dado quantitativo em fator para depois fazer a analise de variância? Obrigado Alisson Lucrécio da Costa adi <- expand.grid(cult=gl(1,5,la=LETTERS[1]), fert=101) fat <- expand.grid(cult=gl(5,5,la=LETTERS[2:6]), fert=seq(50,150,25)) da <- rbind(adi, fat) theta <- c(c(-194.29, -197.26, -197.85, -203.03, -190.20, -190.45), c(9.1797, 8.2686, 8.6437, 9.3438, 8.8773, 8.1872), c(-0.03382, -0.03479, -0.03632, -0.03341, -0.03597, -0.03675)) X <- model.matrix(~-1+cult/(fert+I(fert^2)), data=da) da$eta <- X%*%matrix(theta) da$y <- da$eta+rnorm(nrow(da),0,30) require(lattice) xyplot(y~fert|cult, data=da, type=c("p","a")) da$Fert <- factor(da$fert) #?????? levels(da$Fert) levels(da$cult) m0 <- aov(y~cult*Fert, data=da) anova(m0)

2 1

Criar animação com R
by ASANTOS 19 Jul '13

19 Jul '13

Boa tarde Pessoal, Alguém saberia me dizer como criar um arquivo gif com animação no R como a criada pelo Walmes em http://r-br.2285057.n4.nabble.com/, pois gostaria de fazer várias simulações de processos de pontos e criar uma animação. 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 ======================================================================

4 3

Gráfico de barras múltiplo
by Aline Lipsky 18 Jul '13

18 Jul '13

Boa tarde, Eu tenho quatro vetores referentes a biomassa de pescado mensal de quatro municípios.Quero fazer um gráfico de barras múltiplo. Se alguém puder me ajudar, Grata, Aline

2 3

Importar no R um arquivo .txt que não possui separadores
by Adriano Borges Costa 18 Jul '13

18 Jul '13

Caros, Boa tarde! Estou tendo dificuldades para importar no R um arquivo .txt bem pesado que não possui separadores. As colunas são delimitadas pelo número de caracteres em cada linha. No dicionário estão definidas que as variáveis são: VARIAVEL TAMANHO INÍCIO TIPO Variável 1 1 1 numérico Variável 2 14 2 numérico Variável 3 4 16 numérico Variável 4 10 20 numérico Ou seja, eu possuo o tamanho de cada variável (em número de caracteres) e elas estão todas uma seguida da outra. Como faço para importar esse dataset? Desde já obrigado pela ajuda! -- Adriano Borges Costa

4 5

Problema para visualizar abrir geoTif do TOPODATA no Ubuntu
by Alexandre Santos 16 Jul '13

16 Jul '13

Boa tarde Pessoal, Estou tentando abri um GeoTif de elevação obtido no banco de dados do TOPODATA no site do INPE no R usando Ubuntu OS e não consigo, dando o seguinte erro: `21S465HN.tif' does not exist in the file system, and is not recognised as a supported dataset name. Segue meu CRM: ## Obtenção da imagem no banco do Topodata url=("http://www.webmapit.com.br/inpe/topodata/download/?ms=137398652719842&fbn=2…") download.file(url, destfile = "21S465HN.zip") ## Após descoprimir o arquivo .. # #Visualizar a imagem 21S465dem<-readGDAL(21S465HN.tif) image(21S465dem) Obrigado, Alexandre

3 2

exportar para SAGAGIS classificação via writeGDAL
by Waldir De Carvalho Junior 16 Jul '13

16 Jul '13

boa tarde a Todos Estou precisando exportar o resultado da classificação via randomforest de um SpatialPixelsDataFrame, onde a predição da classe é a 17ª coluna do objeto. Quero exportar para o SAGAGIS e estou tentando pelo "writeGDAL", mas a resposta é a seguinte: > class(grid_cls) [1] "SpatialPixelsDataFrame" attr(,"package") [1] "sp" > names(grid_cls) [1] "ID" "ascii.mde30" "Flow.Direct" "Watershed.B" "Analytical" "Slope" "Aspect" [8] "Plan.Curvat" "Profile.Cur" "Convergence" "Catchment.A" "Topographic" "LS.Factor" "Channel.Net" [15] "Vertical.Di" "Relative.Sl" "prediction" > grid_cls$prediction[1:15] [1] GSJ GSJ GSJ GSJ GSJ GSJ GSJ GSJ GSJ GSJ GSJ GSJ GSJ GSJ GSJ Levels: CX GM GSJ GX LA LVA PA PVA RL RY > writeGDAL(grid_cls[,17], "Soil_Class.sdat", drivername="SAGA", mvFlag=-99999) Error in create2GDAL(dataset = dataset, drivername = drivername, type = type, : Numeric bands required O erro indica que o grid (grid_cls[,17]) é uma categoria, mas é isso mesmo, não é numérico, é classe de solo. Qualquer ajuda será bem-vinda. obrigado __________ Dr. Waldir de Carvalho Junior Pesquisador PhD - Mapeamento Digital Embrapa Solos Empresa Brasileira de Pesquisa Agropecuária (Embrapa) Rio de Janeiro/RJ Waldir.Carvalho(a)embrapa.br Telefone: +55 (21) 2179-4614 | Fax: +55 (21) 2274-5291 www.cnps.embrapa.br | twitter.com/embrapa Confira também: www.facebook.com/agrosustentavel ____________________________________________________________________________ Aviso de confidencialidade Esta mensagem da Empresa Brasileira de Pesquisa Agropecuaria (Embrapa), empresa publica federal regida pelo disposto na Lei Federal no. 5.851, de 7 de dezembro de 1972, e enviada exclusivamente a seu destinatario e pode conter informacoes confidenciais, protegidas por sigilo profissional. Sua utilizacao desautorizada e ilegal e sujeita o infrator as penas da lei. Se voce a recebeu indevidamente, queira, por gentileza, reenvia-la ao emitente, esclarecendo o equivoco. Confidentiality note This message from Empresa Brasileira de Pesquisa Agropecuaria (Embrapa), a government company established under Brazilian law (5.851/72), is directed exclusively to its addressee and may contain confidential data, protected under professional secrecy rules. Its unauthorized use is illegal and may subject the transgressor to the law's penalties. If you are not the addressee, please send it back, elucidating the failure.

3 2

[Erro] $ operator is invalid for atomic vectors
by Pedro Rafael 16 Jul '13

16 Jul '13

Pessoal estou criando uma função em R em que em determinada linha ocorre essa mensagem: $ operator is invalid for atomic vectors O trecho do código é: myintegrate = function(...) tryCatch(integrate(...), error=function(e) NA) value_int = myintegrate(f=fdp,par=starts,lower=domain[1],upper=domain[2])$value if(isTRUE(is.na(value_int))==TRUE) warning("Make sure that fdp is a probability density function. The integral in the domain specified is not convergent.") [ ], Pedro Rafael Diniz Marinho.

2 4

Re: [R-br] gráfico de barras
by Roberto Leoni 15 Jul '13

15 Jul '13

Como faço para que os valores do vetor indices apareçam em cima da barra? Obrigado pelo auxílio. att, Leoni indices <- c(33.2179623,5.9131289, 4.6236819 , 2.3701842, 2.2887414, 2.2575243, 1.5577082, 1.3616533, 1.1463521, 0.8632573, 0.8389924, 0.8232612, 0.7109162, 0.2240344, 0.1145878, -1.5093512, -3.8103876, -4.0246571) itens <- c("Tubérculos, raízes e legumes","Pescados","Farinhas, féculas e massas","Leite e derivados","Enlatados e conservas","Sal e condimentos","Artigos de limpeza","Frutas","Hortaliças e verduras", "Carnes e peixes industrializados","Bebidas e Infusões","Aves e ovos","Cereais, leguminosas e oleaginosas Higiene pessoal","Panificados","Carnes","Açúcares e Derivados","Óleos e gorduras") barplot(indices,width=0.87,legend.text=itens,main="Índices por Item - Abril/13 (período base Mar/13)",col=c("gray10","gray15","gray20", "gray25","gray30","gray35","gray40","gray45","gray50","gray55","gray60","gray65","gray70","gray75","gray80","gray85","gray90","gray95"))

3 3

Dados quantitativos em uma análise de variança
by Alisson Lucrecio 15 Jul '13

15 Jul '13

Caro Colegas r-br, Bom dia. Eu estou com uma duvida sobre dados quantitativos numa análise de variância se eu os considero como quantitativo ou como fator? Obrigado. Alisson Lucrécio da Costa

2 2

Mapas tematicos
by Natalia Martins 15 Jul '13

15 Jul '13

Prezados, bom dia. Gostaria de saber como posso trabalhar com mapas tematicos no R, pois trabalhava com o software geoda e neste conseguia criar mapas tematicos, calcular o indice de moran, LISA, entre outros. Encontrei na internet comandos para calcular o indice de moran, mas a construção dos mapas tematicos não consegui. Segue os comando que estou utilizando: ## lendo dados tipo shapefile brasil <- readShapePoly("G:/natalia/BRASIL.shp", IDvar="UF") plot(brasil) head(brasil@data) #para ler a primeira linha como cabeçalho brasil@data$NOME <- as.character(brasil@data$UF) dados <- read.table("G:/natalia/dados.csv", sep=";", head=T, enc="latin1") head(dados) UF Estado Analfabetismo Homicidio Renda 1 AC Acre 15.19 21.55768 663.2902 2 AL Alagoas 22.52 59.18695 378.0110 3 AM Amapa 7.89 30.48163 521.1194 4 AP Amazonas 9.60 26.99392 485.6758 5 BA Bahia 15.39 36.51580 463.8209 6 CE Ceara 17.19 25.34000 427.8397 #junta o shape com os dados pela varivel comum ind ind <- match(brasil@data$UF, dados$UF) dados <- dados[ind,] row.names(dados) <- brasil$UF #linca dados com formato espacial brasil <- spCbind(brasil, dados) names(brasil) [1] "UF" "ESTADO" "REGIAO" "NOME" "UF.1" [6] "Estado" "Analfabetismo" "Homicidio" "Renda" head(brasil@data) UF ESTADO REGIAO NOME UF.1 Estado Analfabetismo Homicidio Renda AC AC Acre NO AC AC Acre 15.19 21.55768 663.2902 AL AL Alagoas NE AL AL Alagoas 22.52 59.18695 378.0110 AM AM Amazonas NO AM AM Amapa 7.89 30.48163 521.1194 AP AP Amap NO AP AP Amazonas 9.60 26.99392 485.6758 BA BA Bahia NE BA BA Bahia 15.39 36.51580 463.8209 CE CE Cear NE CE CE Ceara 17.19 25.34000 427.8397 Att, Natalia

2 1

Livro - Indicação - Medidas repetidas
by Marcelo Laia 15 Jul '13

15 Jul '13

Preciso de indicação de bom livro sobre medidas repetidas no tempo. Encontrei esse: Models for Repeated Measurements (Oxford Statistical Science Series) J. K. Lindsey 1999 2ed Eu trabalho com árvores. Você conhece o livro acima? Poderia indicar um outro? Obrigado! -- Marcelo

2 1