Julho 2014 - R-br - DINF UFPR

[OFF -Tópic] Cotas em concursos para negros e índios!
by Andre Oliveira 12 Jun '49

12 Jun '49

Pessoal, tem um colegar meu que vou fazer um concurso ele é descendente de negro ele é pardo. Ele veio com a pergunta como provar que sou negro, pois, tem vagas reservada para negros e índios? Eu sinceramente não sei e não tenho ideia pois nunca tive esta curiosidade. O que de fato comprova sua raça? Algum documento? O que são usados em concursos para provar? obrigado André Oliveira Souza

5 6

Legenda eixo X
by Luciano F. Sgarbi 10 Jun '49

10 Jun '49

Prezados, Estou tentando centralizar a legenda do eixo X em uma figura com vários gráficos. Estou conseguindo centralizar a legenda da linha inferior como no exemplo, mas as linhas do meio não. par(mfrow=c(2,2)) plot(rnorm(100),xlab="",ylab="y1") plot(rnorm(100),xlab="",ylab="y2") mtext(side=1,cex=2,line=-1.8,text="Variável Explanatória 1",outer=TRUE) ### o problema está aqui, pois a legenda desce para a parte inferior da figura. plot(rnorm(100),xlab="",ylab="y1") plot(rnorm(100),xlab="",ylab="y2") mtext(side=1,cex=2,line=-1.8,text="Variável Explanatória 2",outer=TRUE)## Esse dá certo Alguém podia dar uma luz de como eu posso fazer isso? Abraços -- *Luciano F. Sgarbi* Mestrando em Ecologia e Evolução Laboratório de Ecologia de Insetos (sl. 222) Departamento de Ecologia Instituto de Ciências Biológicas - ICB 1 Universidade Federal de Goiás, campus II Goiânia-GO 74001-970 Brazil

2 2

RCurl: passando parâmetros e executando função javascript
by Éder Comunello 04 Dez '14

04 Dez '14

Colegas, boa tarde! Estou precisando de ajuda com relação ao pacote *RCurl*. Tomando por exemplo o endereço < http://hidroweb.ana.gov.br/Estacao.asp?Codigo=2254001>, ao acessá-lo via *browser *pode-se notar dois botões que executam trechos de código em *javascript *e geram links para o *download *de arquivos de dados: * Botão [Arquivo Access] remete ao comando "javascript:criarArq(2254001,2)" * Botão [Arquivo Texto] remete ao comando "javascript:criarArq(2254001,1)" Estou tentando usar o *RCurl *para passar diretamente os parâmetros para criação do *link *para o "Arquivo Texto". Isto feito, posteriormente pretendo usar o *link *gerado para *download* dos dados. Contudo, não estou tendo sucesso e ficarei muito grato por qualquer ajuda. Abaixo segue o código que tentei aplicar: ### <BEGIN> ### library(RCurl) myURL <- 'http://hidroweb.ana.gov.br/Estacao.asp?Codigo=2254001' ### URL resultante da operação via browser: ### myURL2 <- ' http://hidroweb.ana.gov.br/Estacao.asp?Codigo=2254001&CriaArq=true&TipoArq=1 ' myCurl <- getCurlHandle(cookiefile = "myCookies.txt", useragent="Mozilla/5.0", verbose = T, autoreferer = T, followlocation = T) myParams <- list(Codigo=2254001, CriaArq='true', TipoArq=1) ### Codigo: ID da estação ### CriaArq: true (executa função?), ### TipoArq: 1 (tipo texto) e 2 (Access) postForm(myURL, .params=myParams, curl=myCurl) getURL(myURL, curl=myCurl) ### Operação falha, retornando página original! ### Em caso de sucesso embutiria no código um link no formato: ### <a href="ARQ/A20131008-164720-14/CHUVAS.ZIP"> ### <END> ### -- Éder Comunello <c <comunello.eder(a)gmail.com>omunello.eder(a)gmail.com> Dourados, MS - [22 16.5'S, 54 49'W]

4 3

Inclusão de variáveis numa regressão
by Alexandre Loures 01 Ago '14

01 Ago '14

Boa tarde! Preciso rodar uma regressão em que há muitas variáveis cujo nome inicia da mesma forma. Por exemplo: iso1ARG iso1BRA iso1PRY iso1URY Alguém sabe de alguma forma de incluir essas variáveis de uma só vez? Ou seja, ao invés de utilizar o padrão reg <- lm (y ~ iso1ARG + iso1BRA + iso1PRY + iso1URY + ...) Haveria alguma maneira em que definindo apenas iso1 todas as variáveis que inicia assim seriam incluídas? Por exemplo: reg <- lm (y ~ iso1*) Outra dúvida: nos resultados há como definir para que seja mostrado apenas algumas variáveis. Suponha as seguintes variáveis: rta fta bothin gsp sur1995 mercef Mas quero que apareça apenas os resultados para sur1995 e mercef. Há como fazer? Desde já muito obrigado! -- *Alexandre Rodrigues Loures*

3 5

Tabelas Complexas
by Leandro Marino 31 Jul '14

31 Jul '14

Caros, rotineiramente me deparo com um problema que não sei como resolver. Considerem o seguinte exemplo: (c1 <- trunc(runif(1000,1,10))) (c2 <- trunc(runif(1000,5,70))) (c3 <- trunc(runif(1000,1,4))) (var <- rnorm(1000,10,2)) (peso <- round(rnorm(1000,1,.2)^2,1)) df <- data.frame(c1,c2,c3,var,peso) Gostaria de uma função que pudesse me fornecer em uma única tabela do tipo cols = c1,c2,c3,count,medvar e, mais genericamente, cols = c1,c2,c3,somapeso,medpondvar com todas as combinações existentes (as vezes todas as teoricamente possiveis) entre c1,c2,c3 c1 c2 c3 c1*c2 c1*c3 c2*c3 c1*c2*c3 De forma mais específica, gostaria: t1 <- aggregate(list(count = df$var), list(c1=rep('*tot',1000) ,c2=rep('*tot',1000),c3=rep('*tot',1000)),length) tc1 <- aggregate(list(count = df$var), list(c1=df$c1 ,c2=rep('*tot',1000),c3=rep('*tot',1000)),length) tc2 <- aggregate(list(count = df$var), list(c1=rep('*tot',1000),c2=df$c2 ,c3=rep('*tot',1000)),length) tc3 <- aggregate(list(count = df$var), list(c1=rep('*tot',1000),c2=rep('*tot',1000),c3=df$c3 ),length) tc1c2 <- aggregate(list(count = df$var), list(c1=df$c1 ,c2=df$c2 ,c3=rep('*tot',1000)),length) tc1c3 <- aggregate(list(count = df$var), list(c1=df$c1 ,c2=rep('*tot',1000),c3=df$c3 ),length) tc2c3 <- aggregate(list(count = df$var), list(c1=rep('*tot',1000),c2=df$c2 ,c3=df$c3 ),length) tc1c2c3 <- aggregate(list(count = df$var), list(c1=df$c1 ,c2=df$c2 ,c3=df$c3),length) comp1 <- rbind(t1,tc1,tc2,tc3,tc1c2,tc1c3,tc2c3,tc1c2c3) rm(t1,tc1,tc2,tc3,tc1c2,tc1c3,tc2c3,tc1c2c3) t1 <- aggregate(list(medvar = df$var), list(c1=rep('*tot',1000) ,c2=rep('*tot',1000),c3=rep('*tot',1000)),mean) tc1 <- aggregate(list(medvar = df$var), list(c1=df$c1 ,c2=rep('*tot',1000),c3=rep('*tot',1000)),mean) tc2 <- aggregate(list(medvar = df$var), list(c1=rep('*tot',1000),c2=df$c2 ,c3=rep('*tot',1000)),mean) tc3 <- aggregate(list(medvar = df$var), list(c1=rep('*tot',1000),c2=rep('*tot',1000),c3=df$c3 ),mean) tc1c2 <- aggregate(list(medvar = df$var), list(c1=df$c1 ,c2=df$c2 ,c3=rep('*tot',1000)),mean) tc1c3 <- aggregate(list(medvar = df$var), list(c1=df$c1 ,c2=rep('*tot',1000),c3=df$c3 ),mean) tc2c3 <- aggregate(list(medvar = df$var), list(c1=rep('*tot',1000),c2=df$c2 ,c3=df$c3 ),mean) tc1c2c3 <- aggregate(list(medvar = df$var), list(c1=df$c1 ,c2=df$c2 ,c3=df$c3),mean) comp2 <- rbind(t1,tc1,tc2,tc3,tc1c2,tc1c3,tc2c3,tc1c2c3) rm(tc1,tc2,tc3,tc1c2,tc1c3,tc2c3,tc1c2c3) comp <- merge(comp1,comp2,by=c('c1','c2','c3'),all=T) rm(comp1,comp2) Exite algum pacote que faca isso?

3 2

Resposta automática
by Ivan Bezerra Allaman 31 Jul '14

31 Jul '14

1 0

Faculdade estatistica EAD
by Peterson Gardin 30 Jul '14

30 Jul '14

Pessoal Alguém do grupo sabe me dizer se existe no Brasil faculdade de estatística a distância? Desde já agradeço a informação. Att. João Peterson João Peterson Pereira Gardin Doutor em Fisiologia Vegetal, Eng. Agr., Pesquisador Fones: (49) 3533 5626 e 9933-4290 MSN: petersongardin(a)yahoo.com.br - SKYPE: petersongardin Endereço: Rua João Zardo, 1660, Bairro Campo Experimental, Videira - SC - CEP 89560-000

4 3

Função spplot
by Jacqueline Cantú 30 Jul '14

30 Jul '14

Olá pessoal,Usando a função spplot é possível definir o número de classes?Estou usando essa função para fazer um mapa temático, por padrão o R utiliza 16 classes. Eu gostaria que fosse menos classes.. Att, Jacqueline

3 2

transformar factor em date
by luc.souza＠usp.br 30 Jul '14

30 Jul '14

Prezados, tenho um data.frame, onde uma coluna estão algumas datas, cuja classe é FACTOR. As datas estão da seguinte maneira: "16-Jan", "1-Feb", "17-Feb".... Gostaria que essas datas ficassem no formato DATE e se possível, ficasse como 16-Jan, 1-Fev, 16-Fev. Não sei se é possível passar para o português. Desde já agradeço. Lucas F. de Souza Eng. Agrícola - CONAB M.Sc. Produção Vegetal - UENF Doutor em Agrometeorologia - ESALQ/USP tel: (19) 98160-7068

3 3

pacote RCurl
by Paulo Nogueira Starzynski 30 Jul '14

30 Jul '14

Senhores, como já manifestei em outras mensagens, gosto e acho útil criar algoritmos (spiders, boots, etc... tem muitos nomes) que buscam dados não estruturados na internet e depois organizam esses dados em tabelas para posterior análise. Não vejo muito o R sendo utilizado com essa finalidade de extrair dados de forma rotineira. Gostaria de aprender mais sobre o curl ( http://curl.haxx.se/) que no R pode ser utilizado através do pacote RCurl. O link acima apresenta um bom conteúdo mas não para leigos, e tenho algumas dificuldades em digerir o material. Algum de vocês conhece o assunto e pode indicar outros materiais, tutoriais, portais de conhecimento, wikis, etc, envolvendo curl? Não precisa ser necessariamente ligado ao R. Quem sabe reunindo mais fontes eu possa evoluir o conhecimento atual. Abraços, Paulo

4 7