Re: [R-br] Digest R-br, volume 6, assunto 12
Pessoal, Escrevo porque uma combinação de mensagens me chamou a atenção No problema da substituição (mensagem 15) a solução é a função específica is.na() apresentada pelo Paulo na mensagem 17,,, e alguém falou sobre o uso do subsetting, que eu tenho usado com muita frequência. Um uso desta função com "subsetting" seria: x[is.na(x)==1] <- 0.1 Alguém sabe dizer a diferença em termo sde número de cálculos e tempo entre fazer o subsetting e o laço ifelse? []s Júlio 2011/8/10 <r-br-request@listas.c3sl.ufpr.br>
Enviar submissões para a lista de discussão R-br para r-br@listas.c3sl.ufpr.br
Par:
a 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@listas.c3sl.ufpr.br
Você poderá entrar em contato com a pessoa que gerencia a lista pelo endereço r-br-owner@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: Obter coordenadas a partir de endereço (Pedro Emmanuel Alvarenga Americano do Brasil) 2. Re: Obter coordenadas a partir de endereço (Benilton Carvalho) 3. automatização de ajuste de modelos de regressao (Samuel Carvalho) 4. Re: automatização de ajuste de modelos de regressao (Ivan Bezerra Allaman) 5. Re: automatização de ajuste de modelos de regressao (Benilton Carvalho) 6. Re: automatização de ajuste de modelos de regressao (Henrique Dallazuanna) 7. [Dúvida] Funções para alto filtros. (Pedro Rafael) 8. apagar valores de um dataframe e colocar NA neles (Luis Iván Ortiz Valencia) 9. Accuracy 2012 - First Call for Papers - July 10-13, 2012, Florianópolis, SC - Brazil (RODRIGO LILLA MANZIONE) 10. Re: apagar valores de um dataframe e colocar NA neles (Paulo Justiniano) 11. Re: apagar valores de um dataframe e colocar NA neles (Luis Iván Ortiz Valencia) 12. Re: funcao para valores iguais (Luis Iván Ortiz Valencia) 13. Usar peso para tabela cruzada (Clayton Santos Delfino) 14. Substituir NA's (Daniel Dantas) 15. Re: Substituir NA's (Gustavo Carvalho) 16. Re: Substituir NA's (Daniel Dantas) 17. Re: Substituir NA's (Paulo Justiniano) 18. Re: Substituir NA's (Edson Lira) 19. Re: Substituir NA's (Eder David Borges da Silva) 20. Re: Substituir NA's (Daniel Dantas) 21. Re: Substituir NA's (eder@leg.ufpr.br) 22. Re: [Dúvida] Funções para alto filtros. (Marcos Silva) 23. Re: Substituir NA's (Paulo Justiniano) 24. Re: Usar peso para tabela cruzada (Jakson Alves de Aquino) 25. Material Novo no CRAN (Marcos Silva) 26. Re: [Dúvida] Rodando Script R no terminal sem entrar no prompt. (Carlos Mendonça) 27. Re: Accuracy 2012 - First Call for Papers - July 10-13, 2012, Florianópolis, SC - Brazil (Leonard Assis)
----------------------------------------------------------------------
Message: 1 Date: Wed, 10 Aug 2011 12:11:17 -0300 From: Pedro Emmanuel Alvarenga Americano do Brasil <emmanuel.brasil@gmail.com> To: r-br@listas.c3sl.ufpr.br Subject: Re: [R-br] Obter coordenadas a partir de endereço Message-ID: <CAFfGvy+rMiS0DrNEY2GLCKU9F9Bq5b7wojGSXrDQXJ6wNr5wPg@mail.gmail.com
Content-Type: text/plain; charset="iso-8859-1"
Amigos de R,
Nao trabalho mais com espacial ha muitos e muitos anos, porem fiquei curioso com essa função, será que essa função exige que o os endereços seja formatados sempre do mesmo jeito? Estou lembrando de um discussão que tive quase dez anos atras por conta de muita falta de dados em georeferenciamento para fazer mapas de dengue no rio de janeiro. QUando havia dados de endereços eles eram irregualres. Ou seja, nomes de ruas soletrados de forma incorreta, as vezes o numero da casa era separado com virgula outras vezes com ponto do nome da rua, e muitas vezes não havia separador entre o numero do apartamento e o numero da predio. Fiquei pensando se talvez o R consiga buscar o CEP do endereço no site dos correios, ou se é possivel baixar dos correios um banco de dados com CEP, e tnetar corresponder esses endereços com CEP. Nao seria mais facil?
Abraço forte e que a força esteja com você,
Dr. Pedro Emmanuel A. A. do Brasil Instituto de Pesquisa Clínica Evandro Chagas Fundação Oswaldo Cruz Rio de Janeiro - Brasil Av. Brasil 4365 Tel 55 21 3865-9648 email: pedro.brasil@ipec.fiocruz.br email: emmanuel.brasil@gmail.com
---Apoio aos softwares livres www.zotero.org - gerenciamento de referências bibliográficas. www.broffice.org ou www.libreoffice.org - textos, planilhas ou apresentações. www.epidata.dk - entrada de dados. www.r-project.org - análise de dados. www.ubuntu.com - sistema operacional
Em 9 de agosto de 2011 08:49, Thiago Veloso <thi_veloso@yahoo.com.br
escreveu:
Luís Gustavo,
Muito obrigado pela sua dica. Com ela consegui fazer a conversão que necessitava.
Agradeço também aos demais participantes que responderam a minha dúvida.
Um abraço,
Thiago Veloso.
--- On *Fri, 5/8/11, Luís Gustavo <lgsilvaesilva@gmail.com>* wrote:
From: Luís Gustavo <lgsilvaesilva@gmail.com>
Subject: Re: [R-br] Obter coordenadas a partir de endereço To: r-br@listas.c3sl.ufpr.br Date: Friday, 5 August, 2011, 12:04
Prezado Thiago,
Se não estou enganado você consegue as coordendas a partir do CEP, da seguinte forma:
*require(XML)
coordenadas<- function(cep) { url_lat_lon <- paste(sprintf(" 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']], "[[",
return(lat_lon) }
cep=36026300 coordenadas(cep)
Obs.: Existe posts passados abordando estes assunto, lembro que salvei esse script em alguns desses posts, porém não me lembro exatamente quem postou, portanto fica as minhas desculpas pela a falta de referência. * Em 5 de agosto de 2011 00:19, Daniel Marcelino <dmsilva.br@gmail.com< http://mc/compose?to=dmsilva.br@gmail.com>> escreveu:
Olá Thiago, Deve haver mais opções para fazer isso, eu conheço o PBSmapping. Há
inclusive um material vendido pelo O' Reilly's com o passo-a-passo para conseguir isso.
Daniel
2011/8/4 Thiago Veloso <thi_veloso@yahoo.com.br< http://mc/compose?to=thi_veloso@yahoo.com.br>
Olá pessoal,
Tenho quase certeza que esse assunto já foi discutido aqui na lista,
porém não estou conseguindo encontrar o tópico.
Possuo uma lista com cerca de 40 endereços em Porto Alegre. Gostaria
de obter a localização geográfica destes endereços para mostrá-la em um mapa. Apesar de ter somente o endereço, com um pouco de esforço é possível conseguir o CEP de cada um deles.
Sendo assim, há algum pacote combinado R/google maps que permita
conhecer as coordenadas de um endereço a partir do seu CEP?
Grato desde já,
Thiago Veloso. _______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br<
http://mc/compose?to=R-br@listas.c3sl.ufpr.br>
https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
-- Daniel Marcelino http://danielmarcelino.com Skype: d_marcelino
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br < http://mc/compose?to=R-br@listas.c3sl.ufpr.br> https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
-- Luís Gustavo Silva e Silva
-----Inline Attachment Follows-----
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br <http://mc/compose?to=R-br@listas.c3sl.ufpr.br> https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
-------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: < http://listas.inf.ufpr.br/pipermail/r-br/attachments/20110810/04ae926b/attac...
------------------------------
Message: 2 Date: Wed, 10 Aug 2011 16:39:25 +0100 From: Benilton Carvalho <beniltoncarvalho@gmail.com> To: r-br@listas.c3sl.ufpr.br Subject: Re: [R-br] Obter coordenadas a partir de endereço Message-ID: <CAO-arWNLQq1SATXKNcTq7yUpbdg5b-fCNJm0tBru=rQ=2FDKkw@mail.gmail.com
Content-Type: text/plain; charset="iso-8859-1"
talvez, inclusive, alguma interacao com o pessoal da pc2:
http://ceplivre.pc2consultoria.com/
b -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: < http://listas.inf.ufpr.br/pipermail/r-br/attachments/20110810/2416ff6e/attac...
------------------------------
Message: 3 Date: Wed, 10 Aug 2011 09:23:51 -0700 (PDT) From: Samuel Carvalho <samukajm@yahoo.com.br> To: r-br <r-br@listas.c3sl.ufpr.br> Subject: [R-br] automatização de ajuste de modelos de regressao Message-ID: <1312993431.87925.YahooMailNeo@web161201.mail.bf1.yahoo.com> Content-Type: text/plain; charset="iso-8859-1"
Caros(as) Estou ajustando um mesmo modelo linear para "x" parcelas diferentes e para isso gostaria de gerar um objeto para cada uma destas parcelas e ajustar este modelo. O que consigo, é fazer este ajuste inserindo o efeito da parcela na composição do modelo linear. Abaixo segue um CMR
dados <- data.frame(parcela=rep(1:3,each=5), x=rnorm(15), y=rnorm(15)) mod1 <- lm(y ~ x*factor(parcela), data=dados) #inserindo o efeito da parcela no modelo ou mod1 <- lm(y ~ x, subset(dados, parcela==1)) # este passo que gostaria de fazer de uma maneira mais automatizada mod2 <- lm(y ~ x, subset(dados, parcela==2)) mod3<- lm(y ~ x, subset(dados, parcela==3))
Pela atenção Obrigado
==================================== Samuel P. C. Carvalho Mestre em Ciências Florestais [UFLA] Doutorando em Recursos Florestais [ESALQ/USP] ============================================= -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: < http://listas.inf.ufpr.br/pipermail/r-br/attachments/20110810/172ab19a/attac...
------------------------------
Message: 4 Date: Wed, 10 Aug 2011 10:01:42 -0700 (PDT) From: Ivan Bezerra Allaman <ivanalaman@yahoo.com.br> To: R Brasil <r-br@listas.c3sl.ufpr.br> Subject: Re: [R-br] automatização de ajuste de modelos de regressao Message-ID: <1312995702.55404.YahooMailNeo@web161820.mail.bf1.yahoo.com> Content-Type: text/plain; charset="iso-8859-1"
De um modo bem menos elegante do que os nossos amigos da programação, pode-se ter:
length(levels(factor(dados$parcela))) results <- list() for(i in 1:length(levels(factor(dados$parcela)))){ results[[i]] <- lm(y ~ x, subset(dados, parcela==i)) } results lapply(results,summary) lapply(results,anova)
Allaman (S,f,P)
Ivan Bezerra Allaman Doutor em Zootecnia/UFLA email e msn - ivanalaman@yahoo.com.br -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: < http://listas.inf.ufpr.br/pipermail/r-br/attachments/20110810/1e7c4bcc/attac...
------------------------------
Message: 5 Date: Wed, 10 Aug 2011 18:04:27 +0100 From: Benilton Carvalho <beniltoncarvalho@gmail.com> To: r-br@listas.c3sl.ufpr.br, Ivan Bezerra Allaman <ivanalaman@yahoo.com.br> Subject: Re: [R-br] automatização de ajuste de modelos de regressao Message-ID: <CAO-arWOvRoGoHO0yFQhA55ejqsSHZt0spv=UDKnMjXpD+OxVMQ@mail.gmail.com
Content-Type: text/plain; charset=ISO-8859-1
by(dados, dados[['parcela']], function(z) lm(y~x, data=z))
------------------------------
Message: 6 Date: Wed, 10 Aug 2011 14:11:19 -0300 From: Henrique Dallazuanna <wwwhsd@gmail.com> To: r-br@listas.c3sl.ufpr.br, Samuel Carvalho <samukajm@yahoo.com.br> Subject: Re: [R-br] automatização de ajuste de modelos de regressao Message-ID: <CAPvBnPEvmGhh4cOgwi-e0XrfnHVB3kObwqTxOqz-9iMSB8dsoQ@mail.gmail.com
Content-Type: text/plain; charset=ISO-8859-1
Tente assim:
mod <- lapply(split(dados, dados$parcela), lm, formula = x ~ y)
2011/8/10 Samuel Carvalho <samukajm@yahoo.com.br>:
Caros(as) Estou ajustando um mesmo modelo linear para "x" parcelas diferentes e para isso gostaria de gerar um objeto para cada uma destas parcelas e ajustar este modelo. O que consigo, é fazer este ajuste inserindo o efeito da parcela na composição do modelo linear. Abaixo segue um CMR
dados <- data.frame(parcela=rep(1:3,each=5), x=rnorm(15), y=rnorm(15)) mod1 <- lm(y ~ x*factor(parcela), data=dados) #inserindo o efeito da parcela no modelo ou mod1 <- lm(y ~ x, subset(dados, parcela==1)) # este passo que gostaria de fazer de uma maneira mais automatizada mod2 <- lm(y ~ x, subset(dados, parcela==2)) mod3<- lm(y ~ x, subset(dados, parcela==3))
Pela atenção Obrigado
==================================== Samuel P. C. Carvalho Mestre em Ciências Florestais [UFLA] Doutorando em Recursos Florestais [ESALQ/USP] ============================================= _______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
-- Henrique Dallazuanna Curitiba-Paraná-Brasil 25° 25' 40" S 49° 16' 22" O
------------------------------
Message: 7 Date: Wed, 10 Aug 2011 15:38:05 -0300 From: Pedro Rafael <pedro.rafael.marinho@gmail.com> To: r-br@listas.c3sl.ufpr.br Subject: [R-br] [Dúvida] Funções para alto filtros. Message-ID: <CAKwavrm+GG6vLrGpGcbN1Mvskp3ZLBp0TCv3_cUMDAeHNvQxHA@mail.gmail.com
Content-Type: text/plain; charset="iso-8859-1"
Pessoa existe funções analogas ao subset? Achei muito interessante a função subset para filtrar grandes massas de dados segundo algumas características desejadas. O R fornece alguma outra função que tenha esse mesmo papel (fazer filtros em massa) ou algum outro recurso que seja interessante para fazer filtros em data.frames enormes? Para mim só basta o me informarem o nome da função, detalhamentos eu procuro no help.
Pedro Rafael -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: < http://listas.inf.ufpr.br/pipermail/r-br/attachments/20110810/5a917572/attac...
------------------------------
Message: 8 Date: Wed, 10 Aug 2011 16:21:41 -0300 From: Luis Iván Ortiz Valencia <liov2067@gmail.com> To: r-br@listas.c3sl.ufpr.br Subject: [R-br] apagar valores de um dataframe e colocar NA neles Message-ID: <CAJ+S-MH=a86GH79wa=Sq4HnDndSVtE5tvC0Cav-kbfp4encjtw@mail.gmail.com
Content-Type: text/plain; charset="iso-8859-1"
Galera
Tenho um data frame com valores, e preciso apagar esses valores e colocar NA neles.....qual a melhor forma?
Ivan -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: < http://listas.inf.ufpr.br/pipermail/r-br/attachments/20110810/05450618/attac...
------------------------------
Message: 9 Date: Wed, 10 Aug 2011 16:42:56 -0300 From: RODRIGO LILLA MANZIONE <rlmanzione@ig.com.br> To: r-br@listas.c3sl.ufpr.br Subject: [R-br] Accuracy 2012 - First Call for Papers - July 10-13, 2012, Florianópolis, SC - Brazil Message-ID: <CAE2kf_5DdKc_KR+4SC1PumXxhRT6oPRjB+YaEvDQaAYxr9034w@mail.gmail.com
Content-Type: text/plain; charset="windows-1252"
*ACCURACY 2012** International Spatial Accuracy Research Association (ISARA) The Tenth International Symposium on Spatial Accuracy Assessment in Natural Resources and Environmental Sciences July 10-13, 2012 Florianópolis, SC - Brazil*
http://2012.spatial-accuracy.org/
TOPICS: All topics concerned with spatial accuracy and uncertainty in a natural resources and environmental sciences context are appropriate, for example:
* Semantic uncertainty and vagueness * Modelling uncertainty using geostatistics * Propagation of uncertainty in GIS * Visualizing spatial uncertainty * Uncertainty in Remote Sensing * Spatio-temporal uncertainty * Accuracy and uncertainty of DEMs * Modelling scale in environmental systems * Positional uncertainty
PUBLICATION: We welcome the submission of both oral papers and posters. For both modes of presentation authors are invited to submit abstracts of no more than 500 words in English on original research.Those accepted will be presented as oral papers/posters at the symposium and published as short papers in the symposium proceedings (ISBN listed). All accepted authors will also be invited to submit a full paper for consideration towards an special issue of an international journal.
MODES OF PARTICIPATION: Oral papers and posters. Pre-conference workshop proposals also welcome.
DEADLINES:
Abstract submission: *December** 9th, ****2011*
Abstract acceptance notification: *March** 1st, ****2012*
Short final paper submission: *May** 11th, ****2012*
Workshop proposals: *October** 18th, **2011*
Workshop acceptance notification: *October** 31st, **2011* It is important to mention that this will be the first time the Spatial Accuracy Group co-organizes a conference with The Commission on Modelling Geographical System of the International Geographical Union (IGU-CMGS)<http://www.science.mcmaster.ca/%7Eigu-cmgs/>on the research area of common interest.
Carlos A. O. Vieira and Francisco Henrique de Oliveira (co-Chairs) Mariane Dal Santo (Secretary)
Contact: accuracy2012@cfh.ufsc.br< http://quimera.cpd.ufv.br/webmail/src/compose.php?send_to=accuracy2012%40cfh...
**************************************** Download a pdf of the full call for papers at: http://www.accuracy2012.ufsc.br/files/2011/07/Accuracy2012_Flyer.jpg
PS: Sorry for e-mail list crossed.
-- Prof. Carlos Antonio Oliveira Vieira Departamento de Geociências ? CFH/UFSC Trindade - Florianópolis - SC - Brasil CEP 88040-900 Cx. Postal 476 Fone: ++55(48)3721-8593 Cel: (48)9915-3653 E-mails: carlos.vieira@ufv.br carlos.vieira@ufsc.br
Visite o site: www.accuracy2012.ufsc.br -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: < http://listas.inf.ufpr.br/pipermail/r-br/attachments/20110810/03a37f1f/attac...
------------------------------
Message: 10 Date: Wed, 10 Aug 2011 16:41:53 -0300 (BRT) From: Paulo Justiniano <paulojus@leg.ufpr.br> To: r-br@listas.c3sl.ufpr.br Subject: Re: [R-br] apagar valores de um dataframe e colocar NA neles Message-ID: <alpine.DEB.2.00.1108101641400.3064@pataxo.est.ufpr.br> Content-Type: text/plain; charset="iso-8859-1"; Format="flowed"
todos os valores?
df[,] <- NA
On Wed, 10 Aug 2011, Luis Iván Ortiz Valencia wrote:
Galera
Tenho um data frame com valores, e preciso apagar esses valores e colocar
NA neles.....qual a melhor forma?
Ivan
------------------------------
Message: 11 Date: Wed, 10 Aug 2011 16:51:23 -0300 From: Luis Iván Ortiz Valencia <liov2067@gmail.com> To: r-br@listas.c3sl.ufpr.br Subject: Re: [R-br] apagar valores de um dataframe e colocar NA neles Message-ID: <CAJ+S-MHyQ3pixjTgc1oPou3X=Z+=GnG0FRBJXdzh0gjUhKQVpA@mail.gmail.com
Content-Type: text/plain; charset="iso-8859-1"
sim e mantendo a estrutura do data frame , funcionou, obrigado Paulo.
Em 10 de agosto de 2011 16:41, Paulo Justiniano <paulojus@leg.ufpr.br
escreveu:
todos os valores?
df[,] <- NA
On Wed, 10 Aug 2011, Luis Iván Ortiz Valencia wrote:
Galera
Tenho um data frame com valores, e preciso apagar esses valores e colocar NA neles.....qual a melhor forma?
Ivan
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
-------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: < http://listas.inf.ufpr.br/pipermail/r-br/attachments/20110810/1d05403a/attac...
------------------------------
Message: 12 Date: Wed, 10 Aug 2011 16:52:48 -0300 From: Luis Iván Ortiz Valencia <liov2067@gmail.com> To: r-br@listas.c3sl.ufpr.br Subject: Re: [R-br] funcao para valores iguais Message-ID: <CAJ+S-MEfpPfbzJjT5WTc-xAuZdipD32FYZBCNWVyt0-js_+m-A@mail.gmail.com
Content-Type: text/plain; charset="iso-8859-1"
obrigado....isso que precisava...
Ivan
Em 10 de agosto de 2011 11:21, Henrique Dallazuanna <wwwhsd@gmail.com
escreveu:
Tente assim:
!length(unique(v)) > 1
Onde v é o seu vetor
2011/8/10 Luis Iván Ortiz Valencia <liov2067@gmail.com>:
Bom dia
existe uma funcao no R que de um valor logico (T/F) se um conjunto de valores ( como datas) sao iguais?
atte
IVAN
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
-- Henrique Dallazuanna Curitiba-Paraná-Brasil 25° 25' 40" S 49° 16' 22" O _______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
............................................... -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: < http://listas.inf.ufpr.br/pipermail/r-br/attachments/20110810/6780e97b/attac...
------------------------------
Message: 13 Date: Wed, 10 Aug 2011 17:00:31 -0300 From: "Clayton Santos Delfino" <csd@arandanet.com.br> To: <r-br@listas.c3sl.ufpr.br> Subject: [R-br] Usar peso para tabela cruzada Message-ID: <4DF023B51C70864891A31FDC6281AA6404F11170@arandaad.arandanet.com.br
Content-Type: text/plain; charset="iso-8859-1"
Olá pessoal, boa tarde.
Estou usando a função CrossTable do pacote "descr" para gerar uma tabulação sobre dois fatores: marcas x regiao, tudo certo.
O problema é que eu preciso que os percentuais sejam dados sobre o número de questionários enviados e não sobre o número de marcas apontadas.
Explico: na minha pesquisa, havia a opção do respondente incluir mais de uma marca na resposta para um item. Neste caso, eu tenho que considerar um "voto", por assim dizer, para cada marca que ele indicou mas preciso considerar apenas um questionário quando fizer a tabela cruzada, ou seja, O universo tem que ser o número de questionarios e não o número de votos.
Se algum puder me indicar alguma função ou algum caminho para isso eu agradeço.
Segue um fragmento dos dados para ajudar.
Valeu.
Clayton
que marca regiao 1 OLIVO NE 1 ABALUX NE 2 LUMIBRAS CO 2 RCG CO 2 SKYLUX CO 3 DAUTEC GSP 3 ECP GSP 3 LUMIBRAS GSP 3 DECADA GSP 5 RESMINI RS 6 LUMICENTER ISP 6 INTRAL ISP 6 ITAIM ISP 7 ABALUX CO 7 MAEL CO 8 TASCHIBRA SC 9 ABALUX ISP 9 BLAN ISP 11 ABALUX SC 12 LUMIMUNDI PR 12 ABALUX PR 12 ECP PR 13 ECP PR 13 ABALUX PR 14 INDELPA ISP 14 INTRAL ISP 15 ART-LUZ ISP 15 CAROLINO ISP 15 ITAIM ISP 15 LUMISOFT ISP 16 RCG PR 16 ABALUX PR 17 SKYLUX MG 17 LUMILUZ MG 17 BLUMENAU MG 17 LUMIBRAS MG 18 ITAIM GSP 19 ABALUX SC 19 TASCHIBRA SC 20 LUMA RJ 20 ABALUX RJ 20 BARSOTTI RJ 20 ITAIM RJ
------------------------------
Message: 14 Date: Wed, 10 Aug 2011 17:09:08 -0300 From: Daniel Dantas <daniel.dantas@hotmail.com> To: <r-br@listas.c3sl.ufpr.br> Subject: [R-br] Substituir NA's Message-ID: <COL120-W184A367D82C4BA229E3003E7230@phx.gbl> Content-Type: text/plain; charset="iso-8859-1"
Boa tarde pessoal,
A minha dúvida é: Como substituir os NA's de uma matriz pelo valor 0.1 e os que não forem NA manter os valores de x?
Lógica: Se x = NA, então 0.1, caso contrário x.
Tentei da forma abaixo mas não obtive exito:
x [,1] [,2] [,3] [,4] [,5] [,6] [,7] [1,] 0.359375 2.593750 2.453125 0.531250 NA NA NA [2,] 5.095238 6.619048 3.857143 2.119048 11 0 11 [3,] NA 5.333333 1.000000 2.000000 1 0 1 [4,] 0.800000 7.850000 3.850000 2.250000 4 1 2 [5,] 5.833333 9.000000 4.833333 3.666667 2 0 0 [6,] 2.285714 8.857143 3.428571 2.714286 NA NA NA
y<- ifelse(x==NA,0.1,x)
y [,1] [,2] [,3] [,4] [,5] [,6] [,7] [1,] NA NA NA NA NA NA NA [2,] NA NA NA NA NA NA NA [3,] NA NA NA NA NA NA NA [4,] NA NA NA NA NA NA NA [5,] NA NA NA NA NA NA NA [6,] NA NA NA NA NA NA NA
Tentei também de outra forma mas também sem sucess: y<- ifelse(x=="NA",0.1,x)
Obrigado, Daniel
-------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: < http://listas.inf.ufpr.br/pipermail/r-br/attachments/20110810/5531199f/attac...
------------------------------
Message: 15 Date: Wed, 10 Aug 2011 17:13:15 -0300 From: Gustavo Carvalho <gustavo.bio@gmail.com> To: r-br@listas.c3sl.ufpr.br Subject: Re: [R-br] Substituir NA's Message-ID: <CAKBHXWtfGf_zecqXWDF4RTHV2z=ubYY4iryQTVKKX8Q5WUJuRQ@mail.gmail.com
Content-Type: text/plain; charset=UTF-8
ifelse(is.na(x), 0.1, x) funciona?
2011/8/10 Daniel Dantas <daniel.dantas@hotmail.com>:
Boa tarde pessoal,
A minha dúvida é: Como substituir os NA's de uma matriz pelo valor 0.1 e os que não forem NA manter os valores de x?
Lógica: Se x = NA, então 0.1, caso contrário x.
Tentei da forma abaixo mas não obtive exito:
x [,1] [,2] [,3] [,4] [,5] [,6] [,7] [1,] 0.359375 2.593750 2.453125 0.531250 NA NA NA [2,] 5.095238 6.619048 3.857143 2.119048 11 0 11 [3,] NA 5.333333 1.000000 2.000000 1 0 1 [4,] 0.800000 7.850000 3.850000 2.250000 4 1 2 [5,] 5.833333 9.000000 4.833333 3.666667 2 0 0 [6,] 2.285714 8.857143 3.428571 2.714286 NA NA NA
y<- ifelse(x==NA,0.1,x)
y [,1] [,2] [,3] [,4] [,5] [,6] [,7] [1,] NA NA NA NA NA NA NA [2,] NA NA NA NA NA NA NA [3,] NA NA NA NA NA NA NA [4,] NA NA NA NA NA NA NA [5,] NA NA NA NA NA NA NA [6,] NA NA NA NA NA NA NA
Tentei também de outra forma mas também sem sucess: y<- ifelse(x=="NA",0.1,x)
Obrigado, Daniel
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
------------------------------
Message: 16 Date: Wed, 10 Aug 2011 17:15:29 -0300 From: Daniel Dantas <daniel.dantas@hotmail.com> To: <r-br@listas.c3sl.ufpr.br> Subject: Re: [R-br] Substituir NA's Message-ID: <COL120-W4362FC8215D1B945B327EFE7230@phx.gbl> Content-Type: text/plain; charset="iso-8859-2"
Melhor impossível! heheeh
Muito obrigado Gustavo!!!!!!
From: gustavo.bio@gmail.com Date: Wed, 10 Aug 2011 17:13:15 -0300 To: r-br@listas.c3sl.ufpr.br Subject: Re: [R-br] Substituir NA's
ifelse(is.na(x), 0.1, x) funciona?
2011/8/10 Daniel Dantas <daniel.dantas@hotmail.com>:
Boa tarde pessoal,
A minha dúvida é: Como substituir os NA's de uma matriz pelo valor 0.1 e os que n?o forem NA manter os valores de x?
Lógica: Se x = NA, ent?o 0.1, caso contrário x.
Tentei da forma abaixo mas n?o obtive exito:
x [,1] [,2] [,3] [,4] [,5] [,6] [,7] [1,] 0.359375 2.593750 2.453125 0.531250 NA NA NA [2,] 5.095238 6.619048 3.857143 2.119048 11 0 11 [3,] NA 5.333333 1.000000 2.000000 1 0 1 [4,] 0.800000 7.850000 3.850000 2.250000 4 1 2 [5,] 5.833333 9.000000 4.833333 3.666667 2 0 0 [6,] 2.285714 8.857143 3.428571 2.714286 NA NA NA
y<- ifelse(x==NA,0.1,x)
y [,1] [,2] [,3] [,4] [,5] [,6] [,7] [1,] NA NA NA NA NA NA NA [2,] NA NA NA NA NA NA NA [3,] NA NA NA NA NA NA NA [4,] NA NA NA NA NA NA NA [5,] NA NA NA NA NA NA NA [6,] NA NA NA NA NA NA NA
Tentei também de outra forma mas também sem sucess: y<- ifelse(x=="NA",0.1,x)
Obrigado, Daniel
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
-------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: < http://listas.inf.ufpr.br/pipermail/r-br/attachments/20110810/6884f07b/attac...
------------------------------
Message: 17 Date: Wed, 10 Aug 2011 17:15:42 -0300 (BRT) From: Paulo Justiniano <paulojus@leg.ufpr.br> To: r-br@listas.c3sl.ufpr.br Subject: Re: [R-br] Substituir NA's Message-ID: <alpine.DEB.2.00.1108101714050.3064@pataxo.est.ufpr.br> Content-Type: text/plain; charset="iso-8859-1"; Format="flowed"
veja a seguir, troque -1 por 0.1
ap <- cbind(c(1, NA, 2), 1:3, c(NA, 1, 2)) ap [,1] [,2] [,3] [1,] 1 1 NA [2,] NA 2 1 [3,] 2 3 2 ifelse(is.na(ap), -1, ap) [,1] [,2] [,3] [1,] 1 1 -1 [2,] -1 2 1 [3,] 2 3 2
On Wed, 10 Aug 2011, Daniel Dantas wrote:
Boa tarde pessoal,
A minha dúvida é: Como substituir os NA's de uma matriz pelo valor 0.1 e os que não forem NA manter os valores de x?
Lógica: Se x = NA, então 0.1, caso contrário x.
Tentei da forma abaixo mas não obtive exito:
x [,1] [,2] [,3] [,4] [,5] [,6] [,7] [1,] 0.359375 2.593750 2.453125 0.531250 NA NA NA [2,] 5.095238 6.619048 3.857143 2.119048 11 0 11 [3,] NA 5.333333 1.000000 2.000000 1 0 1 [4,] 0.800000 7.850000 3.850000 2.250000 4 1 2 [5,] 5.833333 9.000000 4.833333 3.666667 2 0 0 [6,] 2.285714 8.857143 3.428571 2.714286 NA NA NA
y<- ifelse(x==NA,0.1,x)
y [,1] [,2] [,3] [,4] [,5] [,6] [,7] [1,] NA NA NA NA NA NA NA [2,] NA NA NA NA NA NA NA [3,] NA NA NA NA NA NA NA [4,] NA NA NA NA NA NA NA [5,] NA NA NA NA NA NA NA [6,] NA NA NA NA NA NA NA
Tentei também de outra forma mas também sem sucess: y<- ifelse(x=="NA",0.1,x)
Obrigado, Daniel
------------------------------
Message: 18 Date: Wed, 10 Aug 2011 16:20:00 -0400 From: Edson Lira <edinhoestat@yahoo.com.br> To: "r-br@listas.c3sl.ufpr.br" <r-br@listas.c3sl.ufpr.br> Subject: Re: [R-br] Substituir NA's Message-ID: <D2C27C38-9D36-41B4-8986-927DC071B541@yahoo.com.br> Content-Type: text/plain; charset=utf-8
If(var="",0.1,var)
Edson Lira Estatístico Ma-Am
Em 10/08/2011, às 16:09, Daniel Dantas <daniel.dantas@hotmail.com> escreveu:
Boa tarde pessoal,
A minha dúvida é: Como substituir os NA's de uma matriz pelo valor 0.1 e os que não forem NA manter os valores de x?
Lógica: Se x = NA, então 0.1, caso contrário x.
Tentei da forma abaixo mas não obtive exito:
x [,1] [,2] [,3] [,4] [,5] [,6] [,7] [1,] 0.359375 2.593750 2.453125 0.531250 NA NA NA [2,] 5.095238 6.619048 3.857143 2.119048 11 0 11 [3,] NA 5.333333 1.000000 2.000000 1 0 1 [4,] 0.800000 7.850000 3.850000 2.250000 4 1 2 [5,] 5.833333 9.000000 4.833333 3.666667 2 0 0 [6,] 2.285714 8.857143 3.428571 2.714286 NA NA NA
y<- ifelse(x==NA,0.1,x)
y [,1] [,2] [,3] [,4] [,5] [,6] [,7] [1,] NA NA NA NA NA NA NA [2,] NA NA NA NA NA NA NA [3,] NA NA NA NA NA NA NA [4,] NA NA NA NA NA NA NA [5,] NA NA NA NA NA NA NA [6,] NA NA NA NA NA NA NA
Tentei também de outra forma mas também sem sucess: y<- ifelse(x=="NA",0.1,x)
Obrigado, Daniel
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
------------------------------
Message: 19 Date: Wed, 10 Aug 2011 17:25:55 -0300 From: Eder David Borges da Silva <eder@leg.ufpr.br> To: r-br@listas.c3sl.ufpr.br Subject: Re: [R-br] Substituir NA's Message-ID: <CALKkXXqLYrunKHOAJ0+dpVBGmueAVii-MDrUSAHtiDt6KbN1Fw@mail.gmail.com
Content-Type: text/plain; charset="iso-8859-1"
Daniel, Pode ser que resolva x[is.na(x)]<- 0.1 Att
Em 10 de agosto de 2011 17:09, Daniel Dantas <daniel.dantas@hotmail.com>escreveu:
Boa tarde pessoal,
A minha dúvida é: Como substituir os NA's de uma matriz pelo valor 0.1 e os que não forem NA manter os valores de x?
Lógica: Se x = NA, então 0.1, caso contrário x.
Tentei da forma abaixo mas não obtive exito:
x [,1] [,2] [,3] [,4] [,5] [,6] [,7] [1,] 0.359375 2.593750 2.453125 0.531250 NA NA NA [2,] 5.095238 6.619048 3.857143 2.119048 11 0 11 [3,] NA 5.333333 1.000000 2.000000 1 0 1 [4,] 0.800000 7.850000 3.850000 2.250000 4 1 2 [5,] 5.833333 9.000000 4.833333 3.666667 2 0 0 [6,] 2.285714 8.857143 3.428571 2.714286 NA NA NA
y<- ifelse(x==NA,0.1,x)
y [,1] [,2] [,3] [,4] [,5] [,6] [,7] [1,] NA NA NA NA NA NA NA [2,] NA NA NA NA NA NA NA [3,] NA NA NA NA NA NA NA [4,] NA NA NA NA NA NA NA [5,] NA NA NA NA NA NA NA [6,] NA NA NA NA NA NA NA
Tentei também de outra forma mas também sem sucess: y<- ifelse(x=="NA",0.1,x)
Obrigado, Daniel
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
-------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: < http://listas.inf.ufpr.br/pipermail/r-br/attachments/20110810/39a8ecdb/attac...
------------------------------
Message: 20 Date: Wed, 10 Aug 2011 17:30:52 -0300 From: Daniel Dantas <daniel.dantas@hotmail.com> To: <r-br@listas.c3sl.ufpr.br> Subject: Re: [R-br] Substituir NA's Message-ID: <COL120-W236336DEC4913359EB1A33E7230@phx.gbl> Content-Type: text/plain; charset="iso-8859-1"
Maravilha! Deu certo aqui pessoal. Muito Obrigado ao Gustavo, Edinho e o Prof. Paulo Justiniano!
E agora me surge uma outra dúvida:
ifelse(existe pelo menos um NA na linha, Exclua a linha, Mantenha a linha) ?
Como escrevo isso acima em linguagem R?
Obrigado, Daniel
From: edinhoestat@yahoo.com.br Date: Wed, 10 Aug 2011 16:20:00 -0400 To: r-br@listas.c3sl.ufpr.br Subject: Re: [R-br] Substituir NA's
If(var="",0.1,var)
Edson Lira Estatístico Ma-Am
Em 10/08/2011, às 16:09, Daniel Dantas <daniel.dantas@hotmail.com> escreveu:
Boa tarde pessoal,
A minha dúvida é: Como substituir os NA's de uma matriz pelo valor 0.1 e os que não forem NA manter os valores de x?
Lógica: Se x = NA, então 0.1, caso contrário x.
Tentei da forma abaixo mas não obtive exito:
x [,1] [,2] [,3] [,4] [,5] [,6] [,7] [1,] 0.359375 2.593750 2.453125 0.531250 NA NA NA [2,] 5.095238 6.619048 3.857143 2.119048 11 0 11 [3,] NA 5.333333 1.000000 2.000000 1 0 1 [4,] 0.800000 7.850000 3.850000 2.250000 4 1 2 [5,] 5.833333 9.000000 4.833333 3.666667 2 0 0 [6,] 2.285714 8.857143 3.428571 2.714286 NA NA NA
y<- ifelse(x==NA,0.1,x)
y [,1] [,2] [,3] [,4] [,5] [,6] [,7] [1,] NA NA NA NA NA NA NA [2,] NA NA NA NA NA NA NA [3,] NA NA NA NA NA NA NA [4,] NA NA NA NA NA NA NA [5,] NA NA NA NA NA NA NA [6,] NA NA NA NA NA NA NA
Tentei também de outra forma mas também sem sucess: y<- ifelse(x=="NA",0.1,x)
Obrigado, Daniel
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
-------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: < http://listas.inf.ufpr.br/pipermail/r-br/attachments/20110810/8dad73c6/attac...
------------------------------
Message: 21 Date: Wed, 10 Aug 2011 17:32:28 -0300 From: eder@leg.ufpr.br To: r-br@listas.c3sl.ufpr.br Subject: Re: [R-br] Substituir NA's Message-ID: <d80ddd8615de5b2e7273f0b59fe32ed2.squirrel@www.leg.ufpr.br> Content-Type: text/plain;charset=iso-8859-1
Daniel, na.omit(x) Att
Maravilha! Deu certo aqui pessoal. Muito Obrigado ao Gustavo, Edinho e o Prof. Paulo Justiniano!
E agora me surge uma outra dúvida:
ifelse(existe pelo menos um NA na linha, Exclua a linha, Mantenha a
linha)
?
Como escrevo isso acima em linguagem R?
Obrigado, Daniel
From: edinhoestat@yahoo.com.br Date: Wed, 10 Aug 2011 16:20:00 -0400 To: r-br@listas.c3sl.ufpr.br Subject: Re: [R-br] Substituir NA's
If(var="",0.1,var)
Edson Lira Estatístico Ma-Am
Em 10/08/2011, às 16:09, Daniel Dantas <daniel.dantas@hotmail.com> escreveu:
Boa tarde pessoal,
A minha dúvida é: Como substituir os NA's de uma matriz pelo valor 0.1 e os que não forem NA manter os valores de x?
Lógica: Se x = NA, então 0.1, caso contrário x.
Tentei da forma abaixo mas não obtive exito:
x [,1] [,2] [,3] [,4] [,5] [,6] [,7] [1,] 0.359375 2.593750 2.453125 0.531250 NA NA NA [2,] 5.095238 6.619048 3.857143 2.119048 11 0 11 [3,] NA 5.333333 1.000000 2.000000 1 0 1 [4,] 0.800000 7.850000 3.850000 2.250000 4 1 2 [5,] 5.833333 9.000000 4.833333 3.666667 2 0 0 [6,] 2.285714 8.857143 3.428571 2.714286 NA NA NA
y<- ifelse(x==NA,0.1,x)
y [,1] [,2] [,3] [,4] [,5] [,6] [,7] [1,] NA NA NA NA NA NA NA [2,] NA NA NA NA NA NA NA [3,] NA NA NA NA NA NA NA [4,] NA NA NA NA NA NA NA [5,] NA NA NA NA NA NA NA [6,] NA NA NA NA NA NA NA
Tentei também de outra forma mas também sem sucess: y<- ifelse(x=="NA",0.1,x)
Obrigado, Daniel
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
_______________________________________________
R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
------------------------------
Message: 22 Date: Wed, 10 Aug 2011 17:37:00 -0300 From: Marcos Silva <marcosfs2006@gmail.com> To: r-br@listas.c3sl.ufpr.br Subject: Re: [R-br] [Dúvida] Funções para alto filtros. Message-ID: <CAHKdobzMmKAgfnVGWXfqN5Gd0_Rmdv368oJoNODuxrAyBTHPWQ@mail.gmail.com
Content-Type: text/plain; charset="iso-8859-1"
Acho que talvez o pacote data.table lhe seja útil. Eu ainda não o utilizei, mas pelo que li parece ser bem rápido.
http://cran.r-project.org/web/packages/data.table/vignettes/datatable-intro....
Abs.
Em 10 de agosto de 2011 15:38, Pedro Rafael <pedro.rafael.marinho@gmail.com>escreveu:
Pessoa existe funções analogas ao subset? Achei muito interessante a função subset para filtrar grandes massas de dados segundo algumas características desejadas. O R fornece alguma outra função que tenha esse mesmo papel (fazer filtros em massa) ou algum outro recurso que seja interessante para fazer filtros em data.frames enormes? Para mim só basta o me informarem o nome da função, detalhamentos eu procuro no help.
Pedro Rafael
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
-- 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/20110810/a650d702/attac...
------------------------------
Message: 23 Date: Wed, 10 Aug 2011 17:37:08 -0300 (BRT) From: Paulo Justiniano <paulojus@leg.ufpr.br> To: r-br@listas.c3sl.ufpr.br Subject: Re: [R-br] Substituir NA's Message-ID: <alpine.DEB.2.00.1108101736310.3064@pataxo.est.ufpr.br> Content-Type: text/plain; charset="iso-8859-1"; Format="flowed"
complete.cases() retem apenas as linahs completas do objeto
On Wed, 10 Aug 2011, Daniel Dantas wrote:
Maravilha! Deu certo aqui pessoal. Muito Obrigado ao Gustavo, Edinho e o Prof. Paulo Justiniano!
E agora me surge uma outra dúvida:
ifelse(existe pelo menos um NA na linha, Exclua a linha, Mantenha a linha) ?
Como escrevo isso acima em linguagem R?
Obrigado, Daniel
From: edinhoestat@yahoo.com.br Date: Wed, 10 Aug 2011 16:20:00 -0400 To: r-br@listas.c3sl.ufpr.br Subject: Re: [R-br] Substituir NA's
If(var="",0.1,var)
Edson Lira Estatístico Ma-Am
Em 10/08/2011, às 16:09, Daniel Dantas <daniel.dantas@hotmail.com> escreveu:
Boa tarde pessoal,
A minha dúvida é: Como substituir os NA's de uma matriz pelo valor 0.1 e os que não forem NA manter os valores de x?
Lógica: Se x = NA, então 0.1, caso contrário x.
Tentei da forma abaixo mas não obtive exito:
x [,1] [,2] [,3] [,4] [,5] [,6] [,7] [1,] 0.359375 2.593750 2.453125 0.531250 NA NA NA [2,] 5.095238 6.619048 3.857143 2.119048 11 0 11 [3,] NA 5.333333 1.000000 2.000000 1 0 1 [4,] 0.800000 7.850000 3.850000 2.250000 4 1 2 [5,] 5.833333 9.000000 4.833333 3.666667 2 0 0 [6,] 2.285714 8.857143 3.428571 2.714286 NA NA NA
y<- ifelse(x==NA,0.1,x)
y [,1] [,2] [,3] [,4] [,5] [,6] [,7] [1,] NA NA NA NA NA NA NA [2,] NA NA NA NA NA NA NA [3,] NA NA NA NA NA NA NA [4,] NA NA NA NA NA NA NA [5,] NA NA NA NA NA NA NA [6,] NA NA NA NA NA NA NA
Tentei também de outra forma mas também sem sucess: y<- ifelse(x=="NA",0.1,x)
Obrigado, Daniel
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
------------------------------
Message: 24 Date: Wed, 10 Aug 2011 17:39:42 -0300 From: Jakson Alves de Aquino <jalvesaq@gmail.com> To: r-br@listas.c3sl.ufpr.br Subject: Re: [R-br] Usar peso para tabela cruzada Message-ID: <CAGBu4CMqxYior8fjuT2fHqS7V5VsWB-fAjbAzfsoXP8dTu=ugQ@mail.gmail.com
Content-Type: text/plain; charset=UTF-8
2011/8/10 Clayton Santos Delfino <csd@arandanet.com.br>:
Estou usando a função CrossTable do pacote "descr" para gerar uma tabulação sobre dois fatores: marcas x regiao, tudo certo.
O problema é que eu preciso que os percentuais sejam dados sobre o número de questionários enviados e não sobre o número de marcas apontadas.
Explico: na minha pesquisa, havia a opção do respondente incluir mais de uma marca na resposta para um item. Neste caso, eu tenho que considerar um "voto", por assim dizer, para cada marca que ele indicou mas preciso considerar apenas um questionário quando fizer a tabela cruzada, ou seja, O universo tem que ser o número de questionarios e não o número de votos.
Se algum puder me indicar alguma função ou algum caminho para isso eu agradeço.
Segue um fragmento dos dados para ajudar.
Supondo que o data.frame se chama "b", veja se o código abaixo faz o que você quer:
peso <- 1 / table(b$que) peso <- data.frame(que = as.numeric(names(peso)), peso = as.numeric(peso)) b2 <- merge(b, peso)
library(descr) crosstab(b2$marca, b2$regiao, b2$peso)
-- Jakson
------------------------------
Message: 25 Date: Wed, 10 Aug 2011 17:42:56 -0300 From: Marcos Silva <marcosfs2006@gmail.com> To: R-br@listas.c3sl.ufpr.br Subject: [R-br] Material Novo no CRAN Message-ID: <CAHKdobx9GgTJ9koG1bmNb6E2TaFFM8RqhdJtwHAVbKfjAW=kJQ@mail.gmail.com
Content-Type: text/plain; charset="iso-8859-1"
Só para avisar que existe um novo material sobre o R em portugues no CRAN.
http://cran.r-project.org/doc/contrib/Provete-Estatistica_aplicada.pdf
Valeu.
-- 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/20110810/cd1ded06/attac...
------------------------------
Message: 26 Date: Wed, 10 Aug 2011 18:49:46 -0300 From: Carlos Mendonça <csaeslpv@centroin.com.br> To: Forum_Linguagem R <r-br@listas.c3sl.ufpr.br> Subject: Re: [R-br] [Dúvida] Rodando Script R no terminal sem entrar no prompt. Message-ID: <CA+sjXFrF7oM9eKWbv2d5MxrLhowwCYZpW9c0Bk0rBY508ZJ6cg@mail.gmail.com
Content-Type: text/plain; charset="iso-8859-1"
Guilherme, mais uma vez, obrigado pela ajuda. Eu fiz o que você postou, porém, mas quando eu entro com o
segundo comando (no seu exemplo: "c:\R\tarefasC.r" ) é aberto o Tinn-R, sem que seja executado o script automaticamente,
Será que teria uma outra alternativa?
Um abraço,
Carlos Mendonça. -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: < http://listas.inf.ufpr.br/pipermail/r-br/attachments/20110810/ebdcf292/attac...
------------------------------
Message: 27 Date: Wed, 10 Aug 2011 18:50:48 -0300 From: Leonard Assis <assis.leonard@gmail.com> To: r-br@listas.c3sl.ufpr.br Subject: Re: [R-br] Accuracy 2012 - First Call for Papers - July 10-13, 2012, Florianópolis, SC - Brazil Message-ID: <CAEG0FK_juNtjXmZ9iHYYyc1VzsYFx8vXn7mofY7jcBpQA0kwnw@mail.gmail.com
Content-Type: text/plain; charset="utf-8"
Mais uma da série "Coisas interessantes que acontecem em Floripa depois que eu me mudei de lá"
lmassis <at> yahoo <dot> com <dot> br assis.leonard <at> gmail <dot> com
2011/8/10 RODRIGO LILLA MANZIONE <rlmanzione@ig.com.br>
*ACCURACY 2012** International Spatial Accuracy Research Association (ISARA) The Tenth International Symposium on Spatial Accuracy Assessment in Natural Resources and Environmental Sciences July 10-13, 2012 Florianópolis, SC - Brazil*
http://2012.spatial-accuracy.org/
TOPICS: All topics concerned with spatial accuracy and uncertainty in a natural resources and environmental sciences context are appropriate, for example:
* Semantic uncertainty and vagueness * Modelling uncertainty using geostatistics * Propagation of uncertainty in GIS * Visualizing spatial uncertainty * Uncertainty in Remote Sensing * Spatio-temporal uncertainty * Accuracy and uncertainty of DEMs * Modelling scale in environmental systems * Positional uncertainty
PUBLICATION: We welcome the submission of both oral papers and posters. For both modes of presentation authors are invited to submit abstracts of no more than 500 words in English on original research.Those accepted will be presented as oral papers/posters at the symposium and published as short papers in the symposium proceedings (ISBN listed). All accepted authors will also be invited to submit a full paper for consideration towards an special issue of an international journal.
MODES OF PARTICIPATION: Oral papers and posters. Pre-conference workshop proposals also welcome.
DEADLINES:
Abstract submission: *December** 9th, ****2011*
Abstract acceptance notification: *March** 1st, ****2012*
Short final paper submission: *May** 11th, ****2012*
Workshop proposals: *October** 18th, **2011*
Workshop acceptance notification: *October** 31st, **2011* It is important to mention that this will be the first time the Spatial Accuracy Group co-organizes a conference with The Commission on Modelling Geographical System of the International Geographical Union (IGU-CMGS)< http://www.science.mcmaster.ca/%7Eigu-cmgs/>on the research area of common interest.
Carlos A. O. Vieira and Francisco Henrique de Oliveira (co-Chairs) Mariane Dal Santo (Secretary)
Contact: accuracy2012@cfh.ufsc.br< http://quimera.cpd.ufv.br/webmail/src/compose.php?send_to=accuracy2012%40cfh...
**************************************** Download a pdf of the full call for papers at: http://www.accuracy2012.ufsc.br/files/2011/07/Accuracy2012_Flyer.jpg
PS: Sorry for e-mail list crossed.
-- Prof. Carlos Antonio Oliveira Vieira Departamento de Geociências ? CFH/UFSC Trindade - Florianópolis - SC - Brasil CEP 88040-900 Cx. Postal 476 Fone: ++55(48)3721-8593 Cel: (48)9915-3653 E-mails: carlos.vieira@ufv.br carlos.vieira@ufsc.br
Visite o site: www.accuracy2012.ufsc.br
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
-------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: < http://listas.inf.ufpr.br/pipermail/r-br/attachments/20110810/9e2ccd14/attac...
------------------------------
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
Fim da Digest R-br, volume 6, assunto 12 ****************************************
-- Júlio Sílvio de Sousa Bueno Filho Departamento de Ciências Exatas Universidade Federal de Lavras Caixa Postal 3037 Lavras, MG - Brasil - 37200 000 tel: (+55) 35 3829 1369 fax: (+55) 35 3829 1371 "Natureza da gente não cabe em nenhuma certeza." João G. Rosa - Riobaldo (Grande Sertão: Veredas) "Homo sum; humani nihil a me alienum puto." Terêncio - Chremes (Heautontimoroumenos)
Pessoal, A primeira opção parece mais rápida, mas ainda nao sei o porque: N <- 1000000 a <- matrix(rnorm(N),1000,1000) pos <- sample(N,10000) x <- a x[pos] <- NA # Opção 1 system.time(x[is.na(x)==1] <- 0.1) x <- a x[pos] <- NA # Opção 2 system.time(ifelse(is.na(x), 0.1, x)) []s Júlio 2011/8/10 Julio Bueno <jssbueno@dex.ufla.br>
Pessoal, Escrevo porque uma combinação de mensagens me chamou a atenção
No problema da substituição (mensagem 15) a solução é a função específica is.na() apresentada pelo Paulo na mensagem 17,,, e alguém falou sobre o uso do subsetting, que eu tenho usado com muita frequência.
Um uso desta função com "subsetting" seria:
x[is.na(x)==1] <- 0.1
Alguém sabe dizer a diferença em termo sde número de cálculos e tempo entre fazer o subsetting e o laço ifelse? []s Júlio
2011/8/10 <r-br-request@listas.c3sl.ufpr.br>
Enviar submissões para a lista de discussão R-br para r-br@listas.c3sl.ufpr.br
Par:
a 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@listas.c3sl.ufpr.br
Você poderá entrar em contato com a pessoa que gerencia a lista pelo endereço r-br-owner@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: Obter coordenadas a partir de endereço (Pedro Emmanuel Alvarenga Americano do Brasil) 2. Re: Obter coordenadas a partir de endereço (Benilton Carvalho) 3. automatização de ajuste de modelos de regressao (Samuel Carvalho) 4. Re: automatização de ajuste de modelos de regressao (Ivan Bezerra Allaman) 5. Re: automatização de ajuste de modelos de regressao (Benilton Carvalho) 6. Re: automatização de ajuste de modelos de regressao (Henrique Dallazuanna) 7. [Dúvida] Funções para alto filtros. (Pedro Rafael) 8. apagar valores de um dataframe e colocar NA neles (Luis Iván Ortiz Valencia) 9. Accuracy 2012 - First Call for Papers - July 10-13, 2012, Florianópolis, SC - Brazil (RODRIGO LILLA MANZIONE) 10. Re: apagar valores de um dataframe e colocar NA neles (Paulo Justiniano) 11. Re: apagar valores de um dataframe e colocar NA neles (Luis Iván Ortiz Valencia) 12. Re: funcao para valores iguais (Luis Iván Ortiz Valencia) 13. Usar peso para tabela cruzada (Clayton Santos Delfino) 14. Substituir NA's (Daniel Dantas) 15. Re: Substituir NA's (Gustavo Carvalho) 16. Re: Substituir NA's (Daniel Dantas) 17. Re: Substituir NA's (Paulo Justiniano) 18. Re: Substituir NA's (Edson Lira) 19. Re: Substituir NA's (Eder David Borges da Silva) 20. Re: Substituir NA's (Daniel Dantas) 21. Re: Substituir NA's (eder@leg.ufpr.br) 22. Re: [Dúvida] Funções para alto filtros. (Marcos Silva) 23. Re: Substituir NA's (Paulo Justiniano) 24. Re: Usar peso para tabela cruzada (Jakson Alves de Aquino) 25. Material Novo no CRAN (Marcos Silva) 26. Re: [Dúvida] Rodando Script R no terminal sem entrar no prompt. (Carlos Mendonça) 27. Re: Accuracy 2012 - First Call for Papers - July 10-13, 2012, Florianópolis, SC - Brazil (Leonard Assis)
----------------------------------------------------------------------
Message: 1 Date: Wed, 10 Aug 2011 12:11:17 -0300 From: Pedro Emmanuel Alvarenga Americano do Brasil <emmanuel.brasil@gmail.com> To: r-br@listas.c3sl.ufpr.br Subject: Re: [R-br] Obter coordenadas a partir de endereço Message-ID: < CAFfGvy+rMiS0DrNEY2GLCKU9F9Bq5b7wojGSXrDQXJ6wNr5wPg@mail.gmail.com> Content-Type: text/plain; charset="iso-8859-1"
Amigos de R,
Nao trabalho mais com espacial ha muitos e muitos anos, porem fiquei curioso com essa função, será que essa função exige que o os endereços seja formatados sempre do mesmo jeito? Estou lembrando de um discussão que tive quase dez anos atras por conta de muita falta de dados em georeferenciamento para fazer mapas de dengue no rio de janeiro. QUando havia dados de endereços eles eram irregualres. Ou seja, nomes de ruas soletrados de forma incorreta, as vezes o numero da casa era separado com virgula outras vezes com ponto do nome da rua, e muitas vezes não havia separador entre o numero do apartamento e o numero da predio. Fiquei pensando se talvez o R consiga buscar o CEP do endereço no site dos correios, ou se é possivel baixar dos correios um banco de dados com CEP, e tnetar corresponder esses endereços com CEP. Nao seria mais facil?
Abraço forte e que a força esteja com você,
Dr. Pedro Emmanuel A. A. do Brasil Instituto de Pesquisa Clínica Evandro Chagas Fundação Oswaldo Cruz Rio de Janeiro - Brasil Av. Brasil 4365 Tel 55 21 3865-9648 email: pedro.brasil@ipec.fiocruz.br email: emmanuel.brasil@gmail.com
---Apoio aos softwares livres www.zotero.org - gerenciamento de referências bibliográficas. www.broffice.org ou www.libreoffice.org - textos, planilhas ou apresentações. www.epidata.dk - entrada de dados. www.r-project.org - análise de dados. www.ubuntu.com - sistema operacional
Em 9 de agosto de 2011 08:49, Thiago Veloso <thi_veloso@yahoo.com.br
escreveu:
Luís Gustavo,
Muito obrigado pela sua dica. Com ela consegui fazer a conversão que necessitava.
Agradeço também aos demais participantes que responderam a minha dúvida.
Um abraço,
Thiago Veloso.
--- On *Fri, 5/8/11, Luís Gustavo <lgsilvaesilva@gmail.com>* wrote:
From: Luís Gustavo <lgsilvaesilva@gmail.com>
Subject: Re: [R-br] Obter coordenadas a partir de endereço To: r-br@listas.c3sl.ufpr.br Date: Friday, 5 August, 2011, 12:04
Prezado Thiago,
Se não estou enganado você consegue as coordendas a partir do CEP, da seguinte forma:
*require(XML)
coordenadas<- function(cep) { url_lat_lon <- paste(sprintf(" 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']], "[[",
return(lat_lon) }
cep=36026300 coordenadas(cep)
Obs.: Existe posts passados abordando estes assunto, lembro que salvei esse script em alguns desses posts, porém não me lembro exatamente quem postou, portanto fica as minhas desculpas pela a falta de referência. * Em 5 de agosto de 2011 00:19, Daniel Marcelino <dmsilva.br@gmail.com< http://mc/compose?to=dmsilva.br@gmail.com>> escreveu:
Olá Thiago, Deve haver mais opções para fazer isso, eu conheço o PBSmapping. Há
inclusive um material vendido pelo O' Reilly's com o passo-a-passo para conseguir isso.
Daniel
2011/8/4 Thiago Veloso <thi_veloso@yahoo.com.br< http://mc/compose?to=thi_veloso@yahoo.com.br>
Olá pessoal,
Tenho quase certeza que esse assunto já foi discutido aqui na lista,
porém não estou conseguindo encontrar o tópico.
Possuo uma lista com cerca de 40 endereços em Porto Alegre. Gostaria
de obter a localização geográfica destes endereços para mostrá-la em um mapa. Apesar de ter somente o endereço, com um pouco de esforço é possível conseguir o CEP de cada um deles.
Sendo assim, há algum pacote combinado R/google maps que permita
conhecer as coordenadas de um endereço a partir do seu CEP?
Grato desde já,
Thiago Veloso. _______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br<
http://mc/compose?to=R-br@listas.c3sl.ufpr.br>
https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
-- Daniel Marcelino http://danielmarcelino.com Skype: d_marcelino
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br < http://mc/compose?to=R-br@listas.c3sl.ufpr.br> https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
-- Luís Gustavo Silva e Silva
-----Inline Attachment Follows-----
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br <http://mc/compose?to=R-br@listas.c3sl.ufpr.br
https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
-------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: < http://listas.inf.ufpr.br/pipermail/r-br/attachments/20110810/04ae926b/attac...
------------------------------
Message: 2 Date: Wed, 10 Aug 2011 16:39:25 +0100 From: Benilton Carvalho <beniltoncarvalho@gmail.com> To: r-br@listas.c3sl.ufpr.br Subject: Re: [R-br] Obter coordenadas a partir de endereço Message-ID: <CAO-arWNLQq1SATXKNcTq7yUpbdg5b-fCNJm0tBru=rQ= 2FDKkw@mail.gmail.com> Content-Type: text/plain; charset="iso-8859-1"
talvez, inclusive, alguma interacao com o pessoal da pc2:
http://ceplivre.pc2consultoria.com/
b -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: < http://listas.inf.ufpr.br/pipermail/r-br/attachments/20110810/2416ff6e/attac...
------------------------------
Message: 3 Date: Wed, 10 Aug 2011 09:23:51 -0700 (PDT) From: Samuel Carvalho <samukajm@yahoo.com.br> To: r-br <r-br@listas.c3sl.ufpr.br> Subject: [R-br] automatização de ajuste de modelos de regressao Message-ID: <1312993431.87925.YahooMailNeo@web161201.mail.bf1.yahoo.com> Content-Type: text/plain; charset="iso-8859-1"
Caros(as) Estou ajustando um mesmo modelo linear para "x" parcelas diferentes e para isso gostaria de gerar um objeto para cada uma destas parcelas e ajustar este modelo. O que consigo, é fazer este ajuste inserindo o efeito da parcela na composição do modelo linear. Abaixo segue um CMR
dados <- data.frame(parcela=rep(1:3,each=5), x=rnorm(15), y=rnorm(15)) mod1 <- lm(y ~ x*factor(parcela), data=dados) #inserindo o efeito da parcela no modelo ou mod1 <- lm(y ~ x, subset(dados, parcela==1)) # este passo que gostaria de fazer de uma maneira mais automatizada mod2 <- lm(y ~ x, subset(dados, parcela==2)) mod3<- lm(y ~ x, subset(dados, parcela==3))
Pela atenção Obrigado
==================================== Samuel P. C. Carvalho Mestre em Ciências Florestais [UFLA] Doutorando em Recursos Florestais [ESALQ/USP] ============================================= -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: < http://listas.inf.ufpr.br/pipermail/r-br/attachments/20110810/172ab19a/attac...
------------------------------
Message: 4 Date: Wed, 10 Aug 2011 10:01:42 -0700 (PDT) From: Ivan Bezerra Allaman <ivanalaman@yahoo.com.br> To: R Brasil <r-br@listas.c3sl.ufpr.br> Subject: Re: [R-br] automatização de ajuste de modelos de regressao Message-ID: <1312995702.55404.YahooMailNeo@web161820.mail.bf1.yahoo.com> Content-Type: text/plain; charset="iso-8859-1"
De um modo bem menos elegante do que os nossos amigos da programação, pode-se ter:
length(levels(factor(dados$parcela))) results <- list() for(i in 1:length(levels(factor(dados$parcela)))){ results[[i]] <- lm(y ~ x, subset(dados, parcela==i)) } results lapply(results,summary) lapply(results,anova)
Allaman (S,f,P)
Ivan Bezerra Allaman Doutor em Zootecnia/UFLA email e msn - ivanalaman@yahoo.com.br -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: < http://listas.inf.ufpr.br/pipermail/r-br/attachments/20110810/1e7c4bcc/attac...
------------------------------
Message: 5 Date: Wed, 10 Aug 2011 18:04:27 +0100 From: Benilton Carvalho <beniltoncarvalho@gmail.com> To: r-br@listas.c3sl.ufpr.br, Ivan Bezerra Allaman <ivanalaman@yahoo.com.br> Subject: Re: [R-br] automatização de ajuste de modelos de regressao Message-ID: <CAO-arWOvRoGoHO0yFQhA55ejqsSHZt0spv= UDKnMjXpD+OxVMQ@mail.gmail.com> Content-Type: text/plain; charset=ISO-8859-1
by(dados, dados[['parcela']], function(z) lm(y~x, data=z))
------------------------------
Message: 6 Date: Wed, 10 Aug 2011 14:11:19 -0300 From: Henrique Dallazuanna <wwwhsd@gmail.com> To: r-br@listas.c3sl.ufpr.br, Samuel Carvalho <samukajm@yahoo.com.br> Subject: Re: [R-br] automatização de ajuste de modelos de regressao Message-ID: < CAPvBnPEvmGhh4cOgwi-e0XrfnHVB3kObwqTxOqz-9iMSB8dsoQ@mail.gmail.com> Content-Type: text/plain; charset=ISO-8859-1
Tente assim:
mod <- lapply(split(dados, dados$parcela), lm, formula = x ~ y)
2011/8/10 Samuel Carvalho <samukajm@yahoo.com.br>:
Caros(as) Estou ajustando um mesmo modelo linear para "x" parcelas diferentes e para isso gostaria de gerar um objeto para cada uma destas parcelas e ajustar este modelo. O que consigo, é fazer este ajuste inserindo o efeito da parcela na composição do modelo linear. Abaixo segue um CMR
dados <- data.frame(parcela=rep(1:3,each=5), x=rnorm(15), y=rnorm(15)) mod1 <- lm(y ~ x*factor(parcela), data=dados) #inserindo o efeito da parcela no modelo ou mod1 <- lm(y ~ x, subset(dados, parcela==1)) # este passo que gostaria de fazer de uma maneira mais automatizada mod2 <- lm(y ~ x, subset(dados, parcela==2)) mod3<- lm(y ~ x, subset(dados, parcela==3))
Pela atenção Obrigado
==================================== Samuel P. C. Carvalho Mestre em Ciências Florestais [UFLA] Doutorando em Recursos Florestais [ESALQ/USP] ============================================= _______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
-- Henrique Dallazuanna Curitiba-Paraná-Brasil 25° 25' 40" S 49° 16' 22" O
------------------------------
Message: 7 Date: Wed, 10 Aug 2011 15:38:05 -0300 From: Pedro Rafael <pedro.rafael.marinho@gmail.com> To: r-br@listas.c3sl.ufpr.br Subject: [R-br] [Dúvida] Funções para alto filtros. Message-ID: < CAKwavrm+GG6vLrGpGcbN1Mvskp3ZLBp0TCv3_cUMDAeHNvQxHA@mail.gmail.com> Content-Type: text/plain; charset="iso-8859-1"
Pessoa existe funções analogas ao subset? Achei muito interessante a função subset para filtrar grandes massas de dados segundo algumas características desejadas. O R fornece alguma outra função que tenha esse mesmo papel (fazer filtros em massa) ou algum outro recurso que seja interessante para fazer filtros em data.frames enormes? Para mim só basta o me informarem o nome da função, detalhamentos eu procuro no help.
Pedro Rafael -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: < http://listas.inf.ufpr.br/pipermail/r-br/attachments/20110810/5a917572/attac...
------------------------------
Message: 8 Date: Wed, 10 Aug 2011 16:21:41 -0300 From: Luis Iván Ortiz Valencia <liov2067@gmail.com> To: r-br@listas.c3sl.ufpr.br Subject: [R-br] apagar valores de um dataframe e colocar NA neles Message-ID: <CAJ+S-MH=a86GH79wa= Sq4HnDndSVtE5tvC0Cav-kbfp4encjtw@mail.gmail.com> Content-Type: text/plain; charset="iso-8859-1"
Galera
Tenho um data frame com valores, e preciso apagar esses valores e colocar NA neles.....qual a melhor forma?
Ivan -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: < http://listas.inf.ufpr.br/pipermail/r-br/attachments/20110810/05450618/attac...
------------------------------
Message: 9 Date: Wed, 10 Aug 2011 16:42:56 -0300 From: RODRIGO LILLA MANZIONE <rlmanzione@ig.com.br> To: r-br@listas.c3sl.ufpr.br Subject: [R-br] Accuracy 2012 - First Call for Papers - July 10-13, 2012, Florianópolis, SC - Brazil Message-ID: < CAE2kf_5DdKc_KR+4SC1PumXxhRT6oPRjB+YaEvDQaAYxr9034w@mail.gmail.com> Content-Type: text/plain; charset="windows-1252"
*ACCURACY 2012** International Spatial Accuracy Research Association (ISARA) The Tenth International Symposium on Spatial Accuracy Assessment in Natural Resources and Environmental Sciences July 10-13, 2012 Florianópolis, SC - Brazil*
http://2012.spatial-accuracy.org/
TOPICS: All topics concerned with spatial accuracy and uncertainty in a natural resources and environmental sciences context are appropriate, for example:
* Semantic uncertainty and vagueness * Modelling uncertainty using geostatistics * Propagation of uncertainty in GIS * Visualizing spatial uncertainty * Uncertainty in Remote Sensing * Spatio-temporal uncertainty * Accuracy and uncertainty of DEMs * Modelling scale in environmental systems * Positional uncertainty
PUBLICATION: We welcome the submission of both oral papers and posters. For both modes of presentation authors are invited to submit abstracts of no more than 500 words in English on original research.Those accepted will be presented as oral papers/posters at the symposium and published as short papers in the symposium proceedings (ISBN listed). All accepted authors will also be invited to submit a full paper for consideration towards an special issue of an international journal.
MODES OF PARTICIPATION: Oral papers and posters. Pre-conference workshop proposals also welcome.
DEADLINES:
Abstract submission: *December** 9th, ****2011*
Abstract acceptance notification: *March** 1st, ****2012*
Short final paper submission: *May** 11th, ****2012*
Workshop proposals: *October** 18th, **2011*
Workshop acceptance notification: *October** 31st, **2011* It is important to mention that this will be the first time the Spatial Accuracy Group co-organizes a conference with The Commission on Modelling Geographical System of the International Geographical Union (IGU-CMGS)<http://www.science.mcmaster.ca/%7Eigu-cmgs/>on the research area of common interest.
Carlos A. O. Vieira and Francisco Henrique de Oliveira (co-Chairs) Mariane Dal Santo (Secretary)
Contact: accuracy2012@cfh.ufsc.br< http://quimera.cpd.ufv.br/webmail/src/compose.php?send_to=accuracy2012%40cfh...
**************************************** Download a pdf of the full call for papers at: http://www.accuracy2012.ufsc.br/files/2011/07/Accuracy2012_Flyer.jpg
PS: Sorry for e-mail list crossed.
-- Prof. Carlos Antonio Oliveira Vieira Departamento de Geociências ? CFH/UFSC Trindade - Florianópolis - SC - Brasil CEP 88040-900 Cx. Postal 476 Fone: ++55(48)3721-8593 Cel: (48)9915-3653 E-mails: carlos.vieira@ufv.br carlos.vieira@ufsc.br
Visite o site: www.accuracy2012.ufsc.br -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: < http://listas.inf.ufpr.br/pipermail/r-br/attachments/20110810/03a37f1f/attac...
------------------------------
Message: 10 Date: Wed, 10 Aug 2011 16:41:53 -0300 (BRT) From: Paulo Justiniano <paulojus@leg.ufpr.br> To: r-br@listas.c3sl.ufpr.br Subject: Re: [R-br] apagar valores de um dataframe e colocar NA neles Message-ID: <alpine.DEB.2.00.1108101641400.3064@pataxo.est.ufpr.br> Content-Type: text/plain; charset="iso-8859-1"; Format="flowed"
todos os valores?
df[,] <- NA
On Wed, 10 Aug 2011, Luis Iván Ortiz Valencia wrote:
Galera
Tenho um data frame com valores, e preciso apagar esses valores e
colocar NA neles.....qual a melhor forma?
Ivan
------------------------------
Message: 11 Date: Wed, 10 Aug 2011 16:51:23 -0300 From: Luis Iván Ortiz Valencia <liov2067@gmail.com> To: r-br@listas.c3sl.ufpr.br Subject: Re: [R-br] apagar valores de um dataframe e colocar NA neles Message-ID: <CAJ+S-MHyQ3pixjTgc1oPou3X=Z+= GnG0FRBJXdzh0gjUhKQVpA@mail.gmail.com> Content-Type: text/plain; charset="iso-8859-1"
sim e mantendo a estrutura do data frame , funcionou, obrigado Paulo.
Em 10 de agosto de 2011 16:41, Paulo Justiniano <paulojus@leg.ufpr.br
escreveu:
todos os valores?
df[,] <- NA
On Wed, 10 Aug 2011, Luis Iván Ortiz Valencia wrote:
Galera
Tenho um data frame com valores, e preciso apagar esses valores e colocar NA neles.....qual a melhor forma?
Ivan
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
-------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: < http://listas.inf.ufpr.br/pipermail/r-br/attachments/20110810/1d05403a/attac...
------------------------------
Message: 12 Date: Wed, 10 Aug 2011 16:52:48 -0300 From: Luis Iván Ortiz Valencia <liov2067@gmail.com> To: r-br@listas.c3sl.ufpr.br Subject: Re: [R-br] funcao para valores iguais Message-ID: < CAJ+S-MEfpPfbzJjT5WTc-xAuZdipD32FYZBCNWVyt0-js_+m-A@mail.gmail.com> Content-Type: text/plain; charset="iso-8859-1"
obrigado....isso que precisava...
Ivan
Em 10 de agosto de 2011 11:21, Henrique Dallazuanna <wwwhsd@gmail.com
escreveu:
Tente assim:
!length(unique(v)) > 1
Onde v é o seu vetor
2011/8/10 Luis Iván Ortiz Valencia <liov2067@gmail.com>:
Bom dia
existe uma funcao no R que de um valor logico (T/F) se um conjunto de valores ( como datas) sao iguais?
atte
IVAN
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
-- Henrique Dallazuanna Curitiba-Paraná-Brasil 25° 25' 40" S 49° 16' 22" O _______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
............................................... -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: < http://listas.inf.ufpr.br/pipermail/r-br/attachments/20110810/6780e97b/attac...
------------------------------
Message: 13 Date: Wed, 10 Aug 2011 17:00:31 -0300 From: "Clayton Santos Delfino" <csd@arandanet.com.br> To: <r-br@listas.c3sl.ufpr.br> Subject: [R-br] Usar peso para tabela cruzada Message-ID: < 4DF023B51C70864891A31FDC6281AA6404F11170@arandaad.arandanet.com.br> Content-Type: text/plain; charset="iso-8859-1"
Olá pessoal, boa tarde.
Estou usando a função CrossTable do pacote "descr" para gerar uma tabulação sobre dois fatores: marcas x regiao, tudo certo.
O problema é que eu preciso que os percentuais sejam dados sobre o número de questionários enviados e não sobre o número de marcas apontadas.
Explico: na minha pesquisa, havia a opção do respondente incluir mais de uma marca na resposta para um item. Neste caso, eu tenho que considerar um "voto", por assim dizer, para cada marca que ele indicou mas preciso considerar apenas um questionário quando fizer a tabela cruzada, ou seja, O universo tem que ser o número de questionarios e não o número de votos.
Se algum puder me indicar alguma função ou algum caminho para isso eu agradeço.
Segue um fragmento dos dados para ajudar.
Valeu.
Clayton
que marca regiao 1 OLIVO NE 1 ABALUX NE 2 LUMIBRAS CO 2 RCG CO 2 SKYLUX CO 3 DAUTEC GSP 3 ECP GSP 3 LUMIBRAS GSP 3 DECADA GSP 5 RESMINI RS 6 LUMICENTER ISP 6 INTRAL ISP 6 ITAIM ISP 7 ABALUX CO 7 MAEL CO 8 TASCHIBRA SC 9 ABALUX ISP 9 BLAN ISP 11 ABALUX SC 12 LUMIMUNDI PR 12 ABALUX PR 12 ECP PR 13 ECP PR 13 ABALUX PR 14 INDELPA ISP 14 INTRAL ISP 15 ART-LUZ ISP 15 CAROLINO ISP 15 ITAIM ISP 15 LUMISOFT ISP 16 RCG PR 16 ABALUX PR 17 SKYLUX MG 17 LUMILUZ MG 17 BLUMENAU MG 17 LUMIBRAS MG 18 ITAIM GSP 19 ABALUX SC 19 TASCHIBRA SC 20 LUMA RJ 20 ABALUX RJ 20 BARSOTTI RJ 20 ITAIM RJ
------------------------------
Message: 14 Date: Wed, 10 Aug 2011 17:09:08 -0300 From: Daniel Dantas <daniel.dantas@hotmail.com> To: <r-br@listas.c3sl.ufpr.br> Subject: [R-br] Substituir NA's Message-ID: <COL120-W184A367D82C4BA229E3003E7230@phx.gbl> Content-Type: text/plain; charset="iso-8859-1"
Boa tarde pessoal,
A minha dúvida é: Como substituir os NA's de uma matriz pelo valor 0.1 e os que não forem NA manter os valores de x?
Lógica: Se x = NA, então 0.1, caso contrário x.
Tentei da forma abaixo mas não obtive exito:
x [,1] [,2] [,3] [,4] [,5] [,6] [,7] [1,] 0.359375 2.593750 2.453125 0.531250 NA NA NA [2,] 5.095238 6.619048 3.857143 2.119048 11 0 11 [3,] NA 5.333333 1.000000 2.000000 1 0 1 [4,] 0.800000 7.850000 3.850000 2.250000 4 1 2 [5,] 5.833333 9.000000 4.833333 3.666667 2 0 0 [6,] 2.285714 8.857143 3.428571 2.714286 NA NA NA
y<- ifelse(x==NA,0.1,x)
y [,1] [,2] [,3] [,4] [,5] [,6] [,7] [1,] NA NA NA NA NA NA NA [2,] NA NA NA NA NA NA NA [3,] NA NA NA NA NA NA NA [4,] NA NA NA NA NA NA NA [5,] NA NA NA NA NA NA NA [6,] NA NA NA NA NA NA NA
Tentei também de outra forma mas também sem sucess: y<- ifelse(x=="NA",0.1,x)
Obrigado, Daniel
-------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: < http://listas.inf.ufpr.br/pipermail/r-br/attachments/20110810/5531199f/attac...
------------------------------
Message: 15 Date: Wed, 10 Aug 2011 17:13:15 -0300 From: Gustavo Carvalho <gustavo.bio@gmail.com> To: r-br@listas.c3sl.ufpr.br Subject: Re: [R-br] Substituir NA's Message-ID: <CAKBHXWtfGf_zecqXWDF4RTHV2z= ubYY4iryQTVKKX8Q5WUJuRQ@mail.gmail.com> Content-Type: text/plain; charset=UTF-8
ifelse(is.na(x), 0.1, x) funciona?
2011/8/10 Daniel Dantas <daniel.dantas@hotmail.com>:
Boa tarde pessoal,
A minha dúvida é: Como substituir os NA's de uma matriz pelo valor 0.1 e os que não forem NA manter os valores de x?
Lógica: Se x = NA, então 0.1, caso contrário x.
Tentei da forma abaixo mas não obtive exito:
x [,1] [,2] [,3] [,4] [,5] [,6] [,7] [1,] 0.359375 2.593750 2.453125 0.531250 NA NA NA [2,] 5.095238 6.619048 3.857143 2.119048 11 0 11 [3,] NA 5.333333 1.000000 2.000000 1 0 1 [4,] 0.800000 7.850000 3.850000 2.250000 4 1 2 [5,] 5.833333 9.000000 4.833333 3.666667 2 0 0 [6,] 2.285714 8.857143 3.428571 2.714286 NA NA NA
y<- ifelse(x==NA,0.1,x)
y [,1] [,2] [,3] [,4] [,5] [,6] [,7] [1,] NA NA NA NA NA NA NA [2,] NA NA NA NA NA NA NA [3,] NA NA NA NA NA NA NA [4,] NA NA NA NA NA NA NA [5,] NA NA NA NA NA NA NA [6,] NA NA NA NA NA NA NA
Tentei também de outra forma mas também sem sucess: y<- ifelse(x=="NA",0.1,x)
Obrigado, Daniel
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
------------------------------
Message: 16 Date: Wed, 10 Aug 2011 17:15:29 -0300 From: Daniel Dantas <daniel.dantas@hotmail.com> To: <r-br@listas.c3sl.ufpr.br> Subject: Re: [R-br] Substituir NA's Message-ID: <COL120-W4362FC8215D1B945B327EFE7230@phx.gbl> Content-Type: text/plain; charset="iso-8859-2"
Melhor impossível! heheeh
Muito obrigado Gustavo!!!!!!
From: gustavo.bio@gmail.com Date: Wed, 10 Aug 2011 17:13:15 -0300 To: r-br@listas.c3sl.ufpr.br Subject: Re: [R-br] Substituir NA's
ifelse(is.na(x), 0.1, x) funciona?
2011/8/10 Daniel Dantas <daniel.dantas@hotmail.com>:
Boa tarde pessoal,
A minha dúvida é: Como substituir os NA's de uma matriz pelo valor 0.1 e os que n?o forem NA manter os valores de x?
Lógica: Se x = NA, ent?o 0.1, caso contrário x.
Tentei da forma abaixo mas n?o obtive exito:
x [,1] [,2] [,3] [,4] [,5] [,6] [,7] [1,] 0.359375 2.593750 2.453125 0.531250 NA NA NA [2,] 5.095238 6.619048 3.857143 2.119048 11 0 11 [3,] NA 5.333333 1.000000 2.000000 1 0 1 [4,] 0.800000 7.850000 3.850000 2.250000 4 1 2 [5,] 5.833333 9.000000 4.833333 3.666667 2 0 0 [6,] 2.285714 8.857143 3.428571 2.714286 NA NA NA
y<- ifelse(x==NA,0.1,x)
y [,1] [,2] [,3] [,4] [,5] [,6] [,7] [1,] NA NA NA NA NA NA NA [2,] NA NA NA NA NA NA NA [3,] NA NA NA NA NA NA NA [4,] NA NA NA NA NA NA NA [5,] NA NA NA NA NA NA NA [6,] NA NA NA NA NA NA NA
Tentei também de outra forma mas também sem sucess: y<- ifelse(x=="NA",0.1,x)
Obrigado, Daniel
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
-------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: < http://listas.inf.ufpr.br/pipermail/r-br/attachments/20110810/6884f07b/attac...
------------------------------
Message: 17 Date: Wed, 10 Aug 2011 17:15:42 -0300 (BRT) From: Paulo Justiniano <paulojus@leg.ufpr.br> To: r-br@listas.c3sl.ufpr.br Subject: Re: [R-br] Substituir NA's Message-ID: <alpine.DEB.2.00.1108101714050.3064@pataxo.est.ufpr.br> Content-Type: text/plain; charset="iso-8859-1"; Format="flowed"
veja a seguir, troque -1 por 0.1
ap <- cbind(c(1, NA, 2), 1:3, c(NA, 1, 2)) ap [,1] [,2] [,3] [1,] 1 1 NA [2,] NA 2 1 [3,] 2 3 2 ifelse(is.na(ap), -1, ap) [,1] [,2] [,3] [1,] 1 1 -1 [2,] -1 2 1 [3,] 2 3 2
On Wed, 10 Aug 2011, Daniel Dantas wrote:
Boa tarde pessoal,
A minha dúvida é: Como substituir os NA's de uma matriz pelo valor 0.1 e os que não forem NA manter os valores de x?
Lógica: Se x = NA, então 0.1, caso contrário x.
Tentei da forma abaixo mas não obtive exito:
x [,1] [,2] [,3] [,4] [,5] [,6] [,7] [1,] 0.359375 2.593750 2.453125 0.531250 NA NA NA [2,] 5.095238 6.619048 3.857143 2.119048 11 0 11 [3,] NA 5.333333 1.000000 2.000000 1 0 1 [4,] 0.800000 7.850000 3.850000 2.250000 4 1 2 [5,] 5.833333 9.000000 4.833333 3.666667 2 0 0 [6,] 2.285714 8.857143 3.428571 2.714286 NA NA NA
y<- ifelse(x==NA,0.1,x)
y [,1] [,2] [,3] [,4] [,5] [,6] [,7] [1,] NA NA NA NA NA NA NA [2,] NA NA NA NA NA NA NA [3,] NA NA NA NA NA NA NA [4,] NA NA NA NA NA NA NA [5,] NA NA NA NA NA NA NA [6,] NA NA NA NA NA NA NA
Tentei também de outra forma mas também sem sucess: y<- ifelse(x=="NA",0.1,x)
Obrigado, Daniel
------------------------------
Message: 18 Date: Wed, 10 Aug 2011 16:20:00 -0400 From: Edson Lira <edinhoestat@yahoo.com.br> To: "r-br@listas.c3sl.ufpr.br" <r-br@listas.c3sl.ufpr.br> Subject: Re: [R-br] Substituir NA's Message-ID: <D2C27C38-9D36-41B4-8986-927DC071B541@yahoo.com.br> Content-Type: text/plain; charset=utf-8
If(var="",0.1,var)
Edson Lira Estatístico Ma-Am
Em 10/08/2011, às 16:09, Daniel Dantas <daniel.dantas@hotmail.com> escreveu:
Boa tarde pessoal,
A minha dúvida é: Como substituir os NA's de uma matriz pelo valor 0.1 e os que não forem NA manter os valores de x?
Lógica: Se x = NA, então 0.1, caso contrário x.
Tentei da forma abaixo mas não obtive exito:
x [,1] [,2] [,3] [,4] [,5] [,6] [,7] [1,] 0.359375 2.593750 2.453125 0.531250 NA NA NA [2,] 5.095238 6.619048 3.857143 2.119048 11 0 11 [3,] NA 5.333333 1.000000 2.000000 1 0 1 [4,] 0.800000 7.850000 3.850000 2.250000 4 1 2 [5,] 5.833333 9.000000 4.833333 3.666667 2 0 0 [6,] 2.285714 8.857143 3.428571 2.714286 NA NA NA
y<- ifelse(x==NA,0.1,x)
y [,1] [,2] [,3] [,4] [,5] [,6] [,7] [1,] NA NA NA NA NA NA NA [2,] NA NA NA NA NA NA NA [3,] NA NA NA NA NA NA NA [4,] NA NA NA NA NA NA NA [5,] NA NA NA NA NA NA NA [6,] NA NA NA NA NA NA NA
Tentei também de outra forma mas também sem sucess: y<- ifelse(x=="NA",0.1,x)
Obrigado, Daniel
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
------------------------------
Message: 19 Date: Wed, 10 Aug 2011 17:25:55 -0300 From: Eder David Borges da Silva <eder@leg.ufpr.br> To: r-br@listas.c3sl.ufpr.br Subject: Re: [R-br] Substituir NA's Message-ID: < CALKkXXqLYrunKHOAJ0+dpVBGmueAVii-MDrUSAHtiDt6KbN1Fw@mail.gmail.com> Content-Type: text/plain; charset="iso-8859-1"
Daniel, Pode ser que resolva x[is.na(x)]<- 0.1 Att
Em 10 de agosto de 2011 17:09, Daniel Dantas <daniel.dantas@hotmail.com>escreveu:
Boa tarde pessoal,
A minha dúvida é: Como substituir os NA's de uma matriz pelo valor 0.1 e os que não forem NA manter os valores de x?
Lógica: Se x = NA, então 0.1, caso contrário x.
Tentei da forma abaixo mas não obtive exito:
x [,1] [,2] [,3] [,4] [,5] [,6] [,7] [1,] 0.359375 2.593750 2.453125 0.531250 NA NA NA [2,] 5.095238 6.619048 3.857143 2.119048 11 0 11 [3,] NA 5.333333 1.000000 2.000000 1 0 1 [4,] 0.800000 7.850000 3.850000 2.250000 4 1 2 [5,] 5.833333 9.000000 4.833333 3.666667 2 0 0 [6,] 2.285714 8.857143 3.428571 2.714286 NA NA NA
y<- ifelse(x==NA,0.1,x)
y [,1] [,2] [,3] [,4] [,5] [,6] [,7] [1,] NA NA NA NA NA NA NA [2,] NA NA NA NA NA NA NA [3,] NA NA NA NA NA NA NA [4,] NA NA NA NA NA NA NA [5,] NA NA NA NA NA NA NA [6,] NA NA NA NA NA NA NA
Tentei também de outra forma mas também sem sucess: y<- ifelse(x=="NA",0.1,x)
Obrigado, Daniel
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
-------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: < http://listas.inf.ufpr.br/pipermail/r-br/attachments/20110810/39a8ecdb/attac...
------------------------------
Message: 20 Date: Wed, 10 Aug 2011 17:30:52 -0300 From: Daniel Dantas <daniel.dantas@hotmail.com> To: <r-br@listas.c3sl.ufpr.br> Subject: Re: [R-br] Substituir NA's Message-ID: <COL120-W236336DEC4913359EB1A33E7230@phx.gbl> Content-Type: text/plain; charset="iso-8859-1"
Maravilha! Deu certo aqui pessoal. Muito Obrigado ao Gustavo, Edinho e o Prof. Paulo Justiniano!
E agora me surge uma outra dúvida:
ifelse(existe pelo menos um NA na linha, Exclua a linha, Mantenha a linha) ?
Como escrevo isso acima em linguagem R?
Obrigado, Daniel
From: edinhoestat@yahoo.com.br Date: Wed, 10 Aug 2011 16:20:00 -0400 To: r-br@listas.c3sl.ufpr.br Subject: Re: [R-br] Substituir NA's
If(var="",0.1,var)
Edson Lira Estatístico Ma-Am
Em 10/08/2011, às 16:09, Daniel Dantas <daniel.dantas@hotmail.com> escreveu:
Boa tarde pessoal,
A minha dúvida é: Como substituir os NA's de uma matriz pelo valor 0.1 e os que não forem NA manter os valores de x?
Lógica: Se x = NA, então 0.1, caso contrário x.
Tentei da forma abaixo mas não obtive exito:
x [,1] [,2] [,3] [,4] [,5] [,6] [,7] [1,] 0.359375 2.593750 2.453125 0.531250 NA NA NA [2,] 5.095238 6.619048 3.857143 2.119048 11 0 11 [3,] NA 5.333333 1.000000 2.000000 1 0 1 [4,] 0.800000 7.850000 3.850000 2.250000 4 1 2 [5,] 5.833333 9.000000 4.833333 3.666667 2 0 0 [6,] 2.285714 8.857143 3.428571 2.714286 NA NA NA
y<- ifelse(x==NA,0.1,x)
y [,1] [,2] [,3] [,4] [,5] [,6] [,7] [1,] NA NA NA NA NA NA NA [2,] NA NA NA NA NA NA NA [3,] NA NA NA NA NA NA NA [4,] NA NA NA NA NA NA NA [5,] NA NA NA NA NA NA NA [6,] NA NA NA NA NA NA NA
Tentei também de outra forma mas também sem sucess: y<- ifelse(x=="NA",0.1,x)
Obrigado, Daniel
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
-------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: < http://listas.inf.ufpr.br/pipermail/r-br/attachments/20110810/8dad73c6/attac...
------------------------------
Message: 21 Date: Wed, 10 Aug 2011 17:32:28 -0300 From: eder@leg.ufpr.br To: r-br@listas.c3sl.ufpr.br Subject: Re: [R-br] Substituir NA's Message-ID: <d80ddd8615de5b2e7273f0b59fe32ed2.squirrel@www.leg.ufpr.br> Content-Type: text/plain;charset=iso-8859-1
Daniel, na.omit(x) Att
Maravilha! Deu certo aqui pessoal. Muito Obrigado ao Gustavo, Edinho e o Prof. Paulo Justiniano!
E agora me surge uma outra dúvida:
ifelse(existe pelo menos um NA na linha, Exclua a linha, Mantenha a
linha)
?
Como escrevo isso acima em linguagem R?
Obrigado, Daniel
From: edinhoestat@yahoo.com.br Date: Wed, 10 Aug 2011 16:20:00 -0400 To: r-br@listas.c3sl.ufpr.br Subject: Re: [R-br] Substituir NA's
If(var="",0.1,var)
Edson Lira Estatístico Ma-Am
Em 10/08/2011, às 16:09, Daniel Dantas <daniel.dantas@hotmail.com> escreveu:
Boa tarde pessoal,
A minha dúvida é: Como substituir os NA's de uma matriz pelo valor 0.1 e os que não forem NA manter os valores de x?
Lógica: Se x = NA, então 0.1, caso contrário x.
Tentei da forma abaixo mas não obtive exito:
x [,1] [,2] [,3] [,4] [,5] [,6] [,7] [1,] 0.359375 2.593750 2.453125 0.531250 NA NA NA [2,] 5.095238 6.619048 3.857143 2.119048 11 0 11 [3,] NA 5.333333 1.000000 2.000000 1 0 1 [4,] 0.800000 7.850000 3.850000 2.250000 4 1 2 [5,] 5.833333 9.000000 4.833333 3.666667 2 0 0 [6,] 2.285714 8.857143 3.428571 2.714286 NA NA NA
y<- ifelse(x==NA,0.1,x)
y [,1] [,2] [,3] [,4] [,5] [,6] [,7] [1,] NA NA NA NA NA NA NA [2,] NA NA NA NA NA NA NA [3,] NA NA NA NA NA NA NA [4,] NA NA NA NA NA NA NA [5,] NA NA NA NA NA NA NA [6,] NA NA NA NA NA NA NA
Tentei também de outra forma mas também sem sucess: y<- ifelse(x=="NA",0.1,x)
Obrigado, Daniel
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
_______________________________________________
R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
------------------------------
Message: 22 Date: Wed, 10 Aug 2011 17:37:00 -0300 From: Marcos Silva <marcosfs2006@gmail.com> To: r-br@listas.c3sl.ufpr.br Subject: Re: [R-br] [Dúvida] Funções para alto filtros. Message-ID: < CAHKdobzMmKAgfnVGWXfqN5Gd0_Rmdv368oJoNODuxrAyBTHPWQ@mail.gmail.com> Content-Type: text/plain; charset="iso-8859-1"
Acho que talvez o pacote data.table lhe seja útil. Eu ainda não o utilizei, mas pelo que li parece ser bem rápido.
http://cran.r-project.org/web/packages/data.table/vignettes/datatable-intro....
Abs.
Em 10 de agosto de 2011 15:38, Pedro Rafael <pedro.rafael.marinho@gmail.com>escreveu:
Pessoa existe funções analogas ao subset? Achei muito interessante a função subset para filtrar grandes massas de dados segundo algumas características desejadas. O R fornece alguma outra função que tenha esse mesmo papel (fazer filtros em massa) ou algum outro recurso que seja interessante para fazer filtros em data.frames enormes? Para mim só basta o me informarem o nome da função, detalhamentos eu procuro no help.
Pedro Rafael
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
-- 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/20110810/a650d702/attac...
------------------------------
Message: 23 Date: Wed, 10 Aug 2011 17:37:08 -0300 (BRT) From: Paulo Justiniano <paulojus@leg.ufpr.br> To: r-br@listas.c3sl.ufpr.br Subject: Re: [R-br] Substituir NA's Message-ID: <alpine.DEB.2.00.1108101736310.3064@pataxo.est.ufpr.br> Content-Type: text/plain; charset="iso-8859-1"; Format="flowed"
complete.cases() retem apenas as linahs completas do objeto
On Wed, 10 Aug 2011, Daniel Dantas wrote:
Maravilha! Deu certo aqui pessoal. Muito Obrigado ao Gustavo, Edinho e o Prof. Paulo Justiniano!
E agora me surge uma outra dúvida:
ifelse(existe pelo menos um NA na linha, Exclua a linha, Mantenha a linha) ?
Como escrevo isso acima em linguagem R?
Obrigado, Daniel
From: edinhoestat@yahoo.com.br Date: Wed, 10 Aug 2011 16:20:00 -0400 To: r-br@listas.c3sl.ufpr.br Subject: Re: [R-br] Substituir NA's
If(var="",0.1,var)
Edson Lira Estatístico Ma-Am
Em 10/08/2011, às 16:09, Daniel Dantas <daniel.dantas@hotmail.com> escreveu:
Boa tarde pessoal,
A minha dúvida é: Como substituir os NA's de uma matriz pelo valor 0.1 e os que não forem NA manter os valores de x?
Lógica: Se x = NA, então 0.1, caso contrário x.
Tentei da forma abaixo mas não obtive exito:
x [,1] [,2] [,3] [,4] [,5] [,6] [,7] [1,] 0.359375 2.593750 2.453125 0.531250 NA NA NA [2,] 5.095238 6.619048 3.857143 2.119048 11 0 11 [3,] NA 5.333333 1.000000 2.000000 1 0 1 [4,] 0.800000 7.850000 3.850000 2.250000 4 1 2 [5,] 5.833333 9.000000 4.833333 3.666667 2 0 0 [6,] 2.285714 8.857143 3.428571 2.714286 NA NA NA
y<- ifelse(x==NA,0.1,x)
y [,1] [,2] [,3] [,4] [,5] [,6] [,7] [1,] NA NA NA NA NA NA NA [2,] NA NA NA NA NA NA NA [3,] NA NA NA NA NA NA NA [4,] NA NA NA NA NA NA NA [5,] NA NA NA NA NA NA NA [6,] NA NA NA NA NA NA NA
Tentei também de outra forma mas também sem sucess: y<- ifelse(x=="NA",0.1,x)
Obrigado, Daniel
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
------------------------------
Message: 24 Date: Wed, 10 Aug 2011 17:39:42 -0300 From: Jakson Alves de Aquino <jalvesaq@gmail.com> To: r-br@listas.c3sl.ufpr.br Subject: Re: [R-br] Usar peso para tabela cruzada Message-ID: <CAGBu4CMqxYior8fjuT2fHqS7V5VsWB-fAjbAzfsoXP8dTu= ugQ@mail.gmail.com> Content-Type: text/plain; charset=UTF-8
2011/8/10 Clayton Santos Delfino <csd@arandanet.com.br>:
Estou usando a função CrossTable do pacote "descr" para gerar uma tabulação sobre dois fatores: marcas x regiao, tudo certo.
O problema é que eu preciso que os percentuais sejam dados sobre o número de questionários enviados e não sobre o número de marcas apontadas.
Explico: na minha pesquisa, havia a opção do respondente incluir mais de uma marca na resposta para um item. Neste caso, eu tenho que considerar um "voto", por assim dizer, para cada marca que ele indicou mas preciso considerar apenas um questionário quando fizer a tabela cruzada, ou seja, O universo tem que ser o número de questionarios e não o número de votos.
Se algum puder me indicar alguma função ou algum caminho para isso eu agradeço.
Segue um fragmento dos dados para ajudar.
Supondo que o data.frame se chama "b", veja se o código abaixo faz o que você quer:
peso <- 1 / table(b$que) peso <- data.frame(que = as.numeric(names(peso)), peso = as.numeric(peso)) b2 <- merge(b, peso)
library(descr) crosstab(b2$marca, b2$regiao, b2$peso)
-- Jakson
------------------------------
Message: 25 Date: Wed, 10 Aug 2011 17:42:56 -0300 From: Marcos Silva <marcosfs2006@gmail.com> To: R-br@listas.c3sl.ufpr.br Subject: [R-br] Material Novo no CRAN Message-ID: <CAHKdobx9GgTJ9koG1bmNb6E2TaFFM8RqhdJtwHAVbKfjAW= kJQ@mail.gmail.com> Content-Type: text/plain; charset="iso-8859-1"
Só para avisar que existe um novo material sobre o R em portugues no CRAN.
http://cran.r-project.org/doc/contrib/Provete-Estatistica_aplicada.pdf
Valeu.
-- 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/20110810/cd1ded06/attac...
------------------------------
Message: 26 Date: Wed, 10 Aug 2011 18:49:46 -0300 From: Carlos Mendonça <csaeslpv@centroin.com.br> To: Forum_Linguagem R <r-br@listas.c3sl.ufpr.br> Subject: Re: [R-br] [Dúvida] Rodando Script R no terminal sem entrar no prompt. Message-ID: < CA+sjXFrF7oM9eKWbv2d5MxrLhowwCYZpW9c0Bk0rBY508ZJ6cg@mail.gmail.com> Content-Type: text/plain; charset="iso-8859-1"
Guilherme, mais uma vez, obrigado pela ajuda. Eu fiz o que você postou, porém, mas quando eu entro com o
segundo comando (no seu exemplo: "c:\R\tarefasC.r" ) é aberto o Tinn-R, sem que seja executado o script automaticamente,
Será que teria uma outra alternativa?
Um abraço,
Carlos Mendonça. -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: < http://listas.inf.ufpr.br/pipermail/r-br/attachments/20110810/ebdcf292/attac...
------------------------------
Message: 27 Date: Wed, 10 Aug 2011 18:50:48 -0300 From: Leonard Assis <assis.leonard@gmail.com> To: r-br@listas.c3sl.ufpr.br Subject: Re: [R-br] Accuracy 2012 - First Call for Papers - July 10-13, 2012, Florianópolis, SC - Brazil Message-ID: < CAEG0FK_juNtjXmZ9iHYYyc1VzsYFx8vXn7mofY7jcBpQA0kwnw@mail.gmail.com> Content-Type: text/plain; charset="utf-8"
Mais uma da série "Coisas interessantes que acontecem em Floripa depois que eu me mudei de lá"
lmassis <at> yahoo <dot> com <dot> br assis.leonard <at> gmail <dot> com
2011/8/10 RODRIGO LILLA MANZIONE <rlmanzione@ig.com.br>
*ACCURACY 2012** International Spatial Accuracy Research Association (ISARA) The Tenth International Symposium on Spatial Accuracy Assessment in Natural Resources and Environmental Sciences July 10-13, 2012 Florianópolis, SC - Brazil*
http://2012.spatial-accuracy.org/
TOPICS: All topics concerned with spatial accuracy and uncertainty in a natural resources and environmental sciences context are appropriate, for example:
* Semantic uncertainty and vagueness * Modelling uncertainty using geostatistics * Propagation of uncertainty in GIS * Visualizing spatial uncertainty * Uncertainty in Remote Sensing * Spatio-temporal uncertainty * Accuracy and uncertainty of DEMs * Modelling scale in environmental systems * Positional uncertainty
PUBLICATION: We welcome the submission of both oral papers and posters. For both modes of presentation authors are invited to submit abstracts of no more than 500 words in English on original research.Those accepted will be presented as oral papers/posters at the symposium and published as short papers in the symposium proceedings (ISBN listed). All accepted authors will also be invited to submit a full paper for consideration towards an special issue of an international journal.
MODES OF PARTICIPATION: Oral papers and posters. Pre-conference workshop proposals also welcome.
DEADLINES:
Abstract submission: *December** 9th, ****2011*
Abstract acceptance notification: *March** 1st, ****2012*
Short final paper submission: *May** 11th, ****2012*
Workshop proposals: *October** 18th, **2011*
Workshop acceptance notification: *October** 31st, **2011* It is important to mention that this will be the first time the Spatial Accuracy Group co-organizes a conference with The Commission on Modelling Geographical System of the International Geographical Union (IGU-CMGS)< http://www.science.mcmaster.ca/%7Eigu-cmgs/>on the research area of common interest.
Carlos A. O. Vieira and Francisco Henrique de Oliveira (co-Chairs) Mariane Dal Santo (Secretary)
Contact: accuracy2012@cfh.ufsc.br< http://quimera.cpd.ufv.br/webmail/src/compose.php?send_to=accuracy2012%40cfh...
**************************************** Download a pdf of the full call for papers at: http://www.accuracy2012.ufsc.br/files/2011/07/Accuracy2012_Flyer.jpg
PS: Sorry for e-mail list crossed.
-- Prof. Carlos Antonio Oliveira Vieira Departamento de Geociências ? CFH/UFSC Trindade - Florianópolis - SC - Brasil CEP 88040-900 Cx. Postal 476 Fone: ++55(48)3721-8593 Cel: (48)9915-3653 E-mails: carlos.vieira@ufv.br carlos.vieira@ufsc.br
Visite o site: www.accuracy2012.ufsc.br
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
-------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: < http://listas.inf.ufpr.br/pipermail/r-br/attachments/20110810/9e2ccd14/attac...
------------------------------
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
Fim da Digest R-br, volume 6, assunto 12 ****************************************
-- Júlio Sílvio de Sousa Bueno Filho
Departamento de Ciências Exatas Universidade Federal de Lavras Caixa Postal 3037 Lavras, MG - Brasil - 37200 000 tel: (+55) 35 3829 1369 fax: (+55) 35 3829 1371
"Natureza da gente não cabe em nenhuma certeza." João G. Rosa - Riobaldo (Grande Sertão: Veredas)
"Homo sum; humani nihil a me alienum puto." Terêncio - Chremes (Heautontimoroumenos)
-- Júlio Sílvio de Sousa Bueno Filho Departamento de Ciências Exatas Universidade Federal de Lavras Caixa Postal 3037 Lavras, MG - Brasil - 37200 000 tel: (+55) 35 3829 1369 fax: (+55) 35 3829 1371 "Natureza da gente não cabe em nenhuma certeza." João G. Rosa - Riobaldo (Grande Sertão: Veredas) "Homo sum; humani nihil a me alienum puto." Terêncio - Chremes (Heautontimoroumenos)
Compare ainda com: system.time(x[is.na(x)] <- .1) Na sua opcao 1, vc: a) Cria uma matriz logica marcando NAs; b) Converte a matriz logica (4 bytes cada elemento) para uma matriz numerica (8 bytes cada elemento) c) Cria uma segunda matriz logica comparando a matriz em (b) com 1; d) Usa os indices de (c) para fazer a substituicao Na opcao 2, vc: a) Cria uma matriz logica marcando NAs (esse e' o is.na); (mat1) b) Checa (internamente no ifelse) se cada um desses elementos de (a) e' um NA e guarda esse resultado (mat2) c) Faz uma copia de (a) (mat3) d) Cria uma matriz com a negacao de (b) (mat4) e) Cria um vetor q eh o subconjunto de mat3 usando os indices de mat4 (chame essa de mat5) f) Apaga mat3 e mat4 g) Testa se algum elemento de (e) e' verdadeiro - se sim: g1) cria novamente a matriz de negacao de (b) (agora ela e' mat6) g2) gera a combinacao de mat6 com mat1 (chame a combinacao de mat7); g3) apaga mat6; g4) cria uma copia de mat1 (chame de mat8); g5) cria um vetor com o comprimento do numero de verdadeiros de mat7; g6) substitui em mat8 as posicoes indicadas por mat7 pelo vetor criado em g5; g7) apaga mat1 g8) renomeia mat8 para mat1; h) repete todo o G para os falsos, substiuindo pelo valor alternativo (q e' x, no seu caso) i) substitui os faltantes (nao inclusos em G ou H) por NA j) retorna o resultado final b
Benilton, pelo pouco que entendo de R esta sua idéia de "system.time(x[is.na(x)] <- .1)" tem cara de ser muito mais rápida e eficiente em termos de memória que as duas anteriores, pois assim como a opção 1, só faz algo onde realmente interessa. a 1ª opção seria quase tão rápida quanto, mas faz uma comparação a mais ao comparar o "is.na(x)" com "1" Quando ligar meu notebook eu vou testar as 3 opções pra ter certeza lmassis <at> yahoo <dot> com <dot> br assis.leonard <at> gmail <dot> com 2011/8/11 Benilton Carvalho <beniltoncarvalho@gmail.com>
Compare ainda com:
system.time(x[is.na(x)] <- .1)
Na sua opcao 1, vc: a) Cria uma matriz logica marcando NAs; b) Converte a matriz logica (4 bytes cada elemento) para uma matriz numerica (8 bytes cada elemento) c) Cria uma segunda matriz logica comparando a matriz em (b) com 1; d) Usa os indices de (c) para fazer a substituicao
Na opcao 2, vc: a) Cria uma matriz logica marcando NAs (esse e' o is.na); (mat1) b) Checa (internamente no ifelse) se cada um desses elementos de (a) e' um NA e guarda esse resultado (mat2) c) Faz uma copia de (a) (mat3) d) Cria uma matriz com a negacao de (b) (mat4) e) Cria um vetor q eh o subconjunto de mat3 usando os indices de mat4 (chame essa de mat5) f) Apaga mat3 e mat4 g) Testa se algum elemento de (e) e' verdadeiro - se sim: g1) cria novamente a matriz de negacao de (b) (agora ela e' mat6) g2) gera a combinacao de mat6 com mat1 (chame a combinacao de mat7); g3) apaga mat6; g4) cria uma copia de mat1 (chame de mat8); g5) cria um vetor com o comprimento do numero de verdadeiros de mat7; g6) substitui em mat8 as posicoes indicadas por mat7 pelo vetor criado em g5; g7) apaga mat1 g8) renomeia mat8 para mat1; h) repete todo o G para os falsos, substiuindo pelo valor alternativo (q e' x, no seu caso) i) substitui os faltantes (nao inclusos em G ou H) por NA j) retorna o resultado final
b _______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
A verdade, Leonard, e' que o que "mata" a opcao 1 e' a conversao da matriz logica is.na(x) para valores *reais* (para que a comparacao com 1 possa ser realizada). Muitos usuarios sao surpreendidos com os seguintes resultados: is.double(1) ## TRUE is.integer(1) ## FALSE Entao, a expressao is.na(x) == 1 vai exigir a conversao para numeros reais, que usa mais memoria e tempo para a conversao... Agora, se vc tiver o previo conhecimento de que essa substituicao deve acontecer em apenas uma pequena fracao dos dados, vc pode matar a pau com: x[which(is.na(x))] <- .1 Entretanto, e' importante notar que esses ganhos sao substanciais apenas para conjuntos de dados de grandes volumes ou atividades que sejam repetidas muitas e muitas vezes. Se for algo a ser executado apenas uma vez num conjunto de dados pequeno, o que o usuario fara' com os 3ms que ele economizou? b
Benilton, bom saber desses pequenos detalhes. No meu caso, de uns tempos pra cá eu tenho trabalhado com bases de dados da ordem de milhoes de registros e perto de 50 variáveis. Via de regra, eu faço 99% do "trabalho sujo" (Consistência e transformação das variáveis) usando algum BD SQL (MySQL, Oracle, SQL Server, depende do caso) e após quase tudo arrumado, eu levo pro R. Com o R em 64 bits, tenho feito alguns testes para ver se faço parte da prepara ção já no R e esses milissegundos a menos tem feito a diferença, principalmente na parte de lidar com memória. Eu não faço 100% no R porque ainda faço essas transformações com mais rapidez e segurança usando SQL nativo. Um dia (ainda este ano) com certeza o farei com mais naturalidade no R. lmassis <at> yahoo <dot> com <dot> br assis.leonard <at> gmail <dot> com 2011/8/11 Benilton Carvalho <beniltoncarvalho@gmail.com>
A verdade, Leonard, e' que o que "mata" a opcao 1 e' a conversao da matriz logica is.na(x) para valores *reais* (para que a comparacao com 1 possa ser realizada).
Muitos usuarios sao surpreendidos com os seguintes resultados:
is.double(1) ## TRUE is.integer(1) ## FALSE
Entao, a expressao
is.na(x) == 1
vai exigir a conversao para numeros reais, que usa mais memoria e tempo para a conversao...
Agora, se vc tiver o previo conhecimento de que essa substituicao deve acontecer em apenas uma pequena fracao dos dados, vc pode matar a pau com:
x[which(is.na(x))] <- .1
Entretanto, e' importante notar que esses ganhos sao substanciais apenas para conjuntos de dados de grandes volumes ou atividades que sejam repetidas muitas e muitas vezes. Se for algo a ser executado apenas uma vez num conjunto de dados pequeno, o que o usuario fara' com os 3ms que ele economizou?
b _______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
participantes (3)
-
Benilton Carvalho -
Julio Bueno -
Leonard Assis