[R-br] Tinn-R: novo website sob protocolo https
Prezados, O projeto Tinn-R está com novo website sob o protocolo https: Dears, The Tinn-R projetc has a new website under the https protocol: https://nbcgib.uesc.br/tinnr/en/ Best, ///\\\///\\\///\\\///\\\///\\\///\\\///\\\///\\\ Jose Claudio Faria UESC/DCET/Brasil joseclaudio.faria at gmail.com Telefones: 55(73)3680.5545 - UESC 55(73)99966.9100 - VIVO ///\\\///\\\///\\\///\\\///\\\///\\\///\\\///\\\ If you have software to deal with statistics, you have arms; if you have good software, you have arms and legs; if you have software like R, you have arms, legs and wings... the height of your flight depends only on you! ___ 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.
Re: [R-br] Ajuda com a passagem incorreta de variável string para uma função do R
Bruno, Com as provisões de adequação do exemplo e demais considerações, *acho* obtive que a resposta que você deseja fazendo o seguinte: 1) na criação das data.tables perc_validos e votos_regiao eu coloquei que a chave para ambas era a região com o parâmetro Key="Regiao". 2) usando a seguinte chamada obtive o seguinte (ignore o fato que meu R é parametrizado para português e a vírgula usada como marca de raíz): > merge(perc_validos, votos_regiao[,Regiao,"Demais Candidatos"], all.x=T, sort=T) # isto aqui é tudo uma linha só!! Regiao Estado Bolsonaro Haddad Ciro Outros 1: Centro-OesteDistrito Federal0,5837 0,1187 0,1660 0,1316 2: Centro-Oeste Goias0,5724 0,2186 0,0860 0,1230 3: Centro-Oeste Mato Grosso0,6004 0,2476 0,0559 0,0961 4: Centro-Oeste Mato Grosso do Sul0,5506 0,2387 0,0804 0,1304 5: Exterior0,5879 0,1010 0,1452 0,1659 6: Nordeste Alagoas0,3440 0,4475 0,1012 0,1072 7: Nordeste Bahia0,2341 0,6028 0,0941 0,0690 8: Nordeste Ceara0,2174 0,3312 0,4095 0,0419 9: NordesteMaranhao0,2428 0,6126 0,0839 0,0606 10: Nordeste Paraiba0,3130 0,4546 0,1675 0,0650 11: Nordeste Pernambuco0,3057 0,4887 0,1356 0,0700 12: Nordeste Piaui0,1876 0,6340 0,1142 0,0642 13: Nordeste Rio Grande do Norte0,3021 0,4119 0,2231 0,0631 14: Nordeste Sergipe0,2721 0,5009 0,1302 0,0967 15:NorteAcre0,6224 0,1853 0,0517 0,1405 16:Norte Amapa0,4074 0,3277 0,1234 0,1417 17:NorteAmazonas0,4348 0,4030 0,0750 0,0873 18:NortePara0,3619 0,4139 0,1003 0,1237 19:NorteRondonia0,6224 0,2036 0,0603 0,1739 20:Norte Roraima0,6297 0,1785 0,0536 0,1383 21:Norte Tocantins0,4464 0,4112 0,0717 0,0707 22: Sudeste Espirito Santo0,5476 0,2420 0,0954 0,1149 23: SudesteMinas Gerais0,4831 0,2765 0,1164 0,1241 24: Sudeste Rio de Janeiro0,5979 0,1469 0,1522 0,1030 25: Sudeste Sao Paulo0,5300 0,1642 0,1135 0,1922 26: Sul Parana0,5689 0,1970 0,0831 0,1510 27: Sul Rio Grande do Sul0,5263 0,2281 0,1137 0,1318 28: Sul Santa Catarina0,6582 0,1513 0,0668 0,1236 Regiao Estado Bolsonaro Haddad Ciro Outros Demais Candidatos 1:952142 2:952142 3:952142 4:952142 5: 32078 6: 1894092 7: 1894092 8: 1894092 9: 1894092 10: 1894092 11: 1894092 12: 1894092 13: 1894092 14: 1894092 15:982103 16:982103 17:982103 18:982103 19:982103 20:982103 21:982103 22: 6968773 23: 6968773 24: 6968773 25: 6968773 26: 2258047 27: 2258047 28: 2258047 Demais Candidatos > HTH -- Cesar Rabak On Fri, Jan 18, 2019 at 9:19 AM Bruno César Pasquini por (R-br) < r-br@listas.c3sl.ufpr.br> wrote: > *César*, > > Bom dia. > > Eu reconheço que, sob o aspecto de banco de dados, não faz sentido ter a > mescla de proporções com totais absolutos de votos válidos. E que também > acabo duplicando os valores no cruzamento. Meu exemplo não foi bom neste > sentido. > > Ainda assim, a dúvida continua sendo como fazer a função reconhecer a > variável que eu gostaria de levar para o cruzamento além da variável chave > para o cruzamento (neste caso a variavel *Regiao*). > > Assim, ignorando estes problemas de bancos de dados, o que preciso fazer > para passar o parâmetro da função de forma correta? Você(s) pode(m) me > apontar o que estou fazendo de errado nas versões da função *consolida*? > > Grato mais uma vez pela sua atenção, > > Bruno César Pasquini > Estatístico > > > Em ter, 15 de jan de 2019 às 22:31, Cesar Rabak > escreveu: > >> Bruno, >> >> *Acho* que estou começando a entender a sua demanda, mas para ter >> certeza é necessário ainda elicitar umas coisinhas: >> >> a) No exemplo que você passa como resultado desejado você tem uma mescla >> de proporções com totais absolutos dos votos para a nova coluna oriunda da >> operação de mescla; >> >> b) Como você usa Região como a chave comum entre as duas tabelas, os >> valores de contagem de votos são repetidos pois na tabela perc_validos >> a região é subdividida por UF enquanto na tabela votos_regiao há apenas >> o agregado e não a quebra por UF. >> >> O resultado dessa forma faz sentido para você e é exatamente o que você >> deseja da operação da sua função Consolida? >> >> HTH >> -- >> Cesar Rabak >> >> >> On Tue, Jan 15, 2019 at 8:01 AM Bruno César Pasquini
[R-br] Construir um laço que modifique o conteúdo do meu contador
Bom dia a todos!
Há algum tempo venho tentando encontrar uma lógica de laço aonde eu consiga
eliminar determinadas posições de uma lista (que uso de contador), de
acordo com uma condição, e seguir com laço.
Em suma, dentro de uma lista de polígonos, preciso identificar os polígonos
que se sobrepõe (mesmo que apenas se encostem), uni-los num novo polígono
(sobrescrevendo o primeiro?), eliminando o que restou da união e seguindo o
fluxo do laço com o resultado da união.
Assim, um polígono que foi unido não mais seria considerado no laço.
Segue um código como exemplo, aonde testei algumas possibilidades para
contornar a questão. Acredito que a leitura do código elucide melhor meu
problema.
Caso alguém tenha uma ideia de logica/abordagem diferente, ficarei feliz em
testar!
Desde já, agradeço o auxilio de todos!
#
rodar_bibliotecas = function(necessarias){
if(necessarias){
library(rgrass7)
library(spatstat)
library(maptools)
library(shapefiles)
library(foreign)
library(magrittr)
library(formattable)
library(e1071)
library(rlang)
library(rgdal)
library(rgeos)
library(raster)
library(sp)
library(sf)
library(RcppCNPy)
library(deldir)
library(dismo)
library(dplyr)
library(ggplot2)
library(gstat)
library(tidyverse)
library(smoothr)
library(viridisLite)
library(gpclib)
}
return('Ok')
}
#
rodar_bibliotecas(TRUE)
xpol = c(0,1,1,0,0)
ypol = c(0,0,1,1,0)
pol = SpatialPolygons(list(
Polygons(list(Polygon(cbind(xpol-1.05,ypol))), ID="x1"),
Polygons(list(Polygon(cbind(xpol,ypol))), ID="x2"),
Polygons(list(Polygon(cbind(xpol,ypol - 1.0))), ID="x3"),
Polygons(list(Polygon(cbind(xpol + 1.0, ypol))), ID="x4"),
Polygons(list(Polygon(cbind(xpol+.4, ypol+.1))), ID="x5")))
plot(pol)
#
#nao precisava ter feito isso, mas fiz para deixar o exemplo no mesmo
formato com que meus dados estao vindo
areas = length(pol)
lista_vazia = list()
for (area in 1:length(areas)) {
lista_vazia[area] = pol[area]
}
lista = lista_vazia
lista.1 = lista_vazia
#tentativa de loop para unir poligonos que se encostam
# for (i in 1:length(lista)) {
while (i < length(lista)) {
if(i >= length(lista.1)){
break()
}else{
j = 2
while (j < length(lista.1)) {
# for (j in 2:length(lista.1)) {
if(!is.na((over(lista[[i]], lista.1[[j]], returnList = F) == 1))) {
lista[[i]] = gUnion(lista.1[[i]], lista.1[[j]])
lista.1[[i]] = gUnion(lista.1[[i]], lista.1[[j]])
#lista[[j]] = NULL
lista.1 = lista.1[-j]
lista = lista[-j]
}else{
j = j+1
}
}
i = i+1
}
}
#
fim = lista.1[[1]]
plot(fim)
for (x in 2:length(lista)){
if(x==2){
if(is.na((over(fim, lista[[x]], returnList = T) == 1))){
fim = bind(fim, lista[[x]])
}
}else{
a = is.na((over(fim, lista[[x]], returnList = T) == 1))
if(a[length(a)] == TRUE){
fim = bind(fim, lista[[x]])
}
}
}
#o objetivo final seria ter todas as areas da lista unidas num unico objeto
#dessa forma, o contorno do polt(pol) devera ser igual ao contorno do
plot(fim)
plot(pol)
plot(fim)
Yury Duarte
Engenheiro Agrônomo - 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.
Re: [R-br] Ajuda com a passagem incorreta de variável string para uma função do R
*César*, Bom dia. Eu reconheço que, sob o aspecto de banco de dados, não faz sentido ter a mescla de proporções com totais absolutos de votos válidos. E que também acabo duplicando os valores no cruzamento. Meu exemplo não foi bom neste sentido. Ainda assim, a dúvida continua sendo como fazer a função reconhecer a variável que eu gostaria de levar para o cruzamento além da variável chave para o cruzamento (neste caso a variavel *Regiao*). Assim, ignorando estes problemas de bancos de dados, o que preciso fazer para passar o parâmetro da função de forma correta? Você(s) pode(m) me apontar o que estou fazendo de errado nas versões da função *consolida*? Grato mais uma vez pela sua atenção, Bruno César Pasquini Estatístico Em ter, 15 de jan de 2019 às 22:31, Cesar Rabak escreveu: > Bruno, > > *Acho* que estou começando a entender a sua demanda, mas para ter certeza > é necessário ainda elicitar umas coisinhas: > > a) No exemplo que você passa como resultado desejado você tem uma mescla > de proporções com totais absolutos dos votos para a nova coluna oriunda da > operação de mescla; > > b) Como você usa Região como a chave comum entre as duas tabelas, os > valores de contagem de votos são repetidos pois na tabela perc_validos a > região é subdividida por UF enquanto na tabela votos_regiao há apenas o > agregado e não a quebra por UF. > > O resultado dessa forma faz sentido para você e é exatamente o que você > deseja da operação da sua função Consolida? > > HTH > -- > Cesar Rabak > > > On Tue, Jan 15, 2019 at 8:01 AM Bruno César Pasquini por (R-br) < > r-br@listas.c3sl.ufpr.br> wrote: > >> *Daniel* e *César*, >> >> Agradeço muito o terem tentado rodar meu código... >> >> Arranjei este exemplo para tentar resolver um problema que estou tendo >> com dados da indústria química alemã onde trabalho, dados que não posso >> expor aqui. Arranjei um exemplo fake (ainda que com dados reais) para pedir >> a ajuda no processamento da função. >> >> Minha expectativa é a de conseguir que o R selecione apenas a variável >> chave para o cruzamento (*Regiao*) mais alguma outra (uma das colunas >> com contagem de votos) cuja interpretação não estou conseguindo acertar no >> meu código R. >> >> Como o problema é este, eu deixei os nomes das demais variáveis >> propositalmente diferentes, eu não espero mesmo que o R associe uma >> variável chamada "Ciro" com outra que se chama "Ciro Gomes" (a menos que eu >> o faça manualmente depois...). >> >> O que eu gostaria de obter neste cruzamento a ser feito pela função é >> algo como (vamos supor que peça a coluna dos votos dos demais candidatos): >> >> Regiao Estado Bolsonaro Haddad Ciro Outros 'Demais Candidatos' >> 'Centro-Oeste' 'Distrito Federal' 0.5837 0.1187 0.1660 0.1316 952142 >> 'Centro-Oeste' 'Goias' 0.5724 0.2186 0.0860 0.1230 952142 >> 'Centro-Oeste' 'Mato Grosso' 0.6004 0.2476 0.0559 0.0961 952142 >> 'Centro-Oeste' 'Mato Grosso do Sul' 0.5506 0.2387 0.0804 0.1304 952142 >> 'Exterior' '' 0.5879 0.1010 0.1452 0.1659 32078 >> 'Nordeste' 'Alagoas' 0.3440 0.4475 0.1012 0.1072 1894092 >> 'Nordeste' 'Bahia' 0.2341 0.6028 0.0941 0.0690 1894092 >> 'Nordeste' 'Ceara' 0.2174 0.3312 0.4095 0.0419 1894092 >> (...) >> É a tabela *perc_validos* com o acréscimo da coluna "Demais Candidatos". >> >> Meu desafio é separar, dentre as várias colunas na tabela *votos_regiao*, >> apenas a coluna chave (*Regiao*) e a coluna que eu apontar como >> parametro na função (neste exemplo acima a "Demais Candidatos"). Da maneira >> que coloquei (as 3 versões da função *consolida*), nenhuma delas tem >> funcionado e é nisso que eu preciso da ajuda para entender no que estou >> errando. O fato de gerar duplicidades e de que (no exemplo acima) a coluna >> "Outros" não se relacionar com a coluna "Demais Candidatos" nao são >> problema, eu tratarei na sequência do meu código. Para mim o importante é >> acertar a seleção para o cruzamento... >> >> Assim, como eu faço para selecionar uma das colunas com contagem de votos >> além da variável chave nas funções? O que eu estou fazendo de errado? >> >> Grato mais uma vez pela atenção de vocês, >> >> Bruno César Pasquini >> Estatístico. >> >> >> Em sex, 11 de jan de 2019 às 23:37, Cesar Rabak por (R-br) < >> r-br@listas.c3sl.ufpr.br> escreveu: >> >>> Bruno, apenas uma dúvida: como você espera fazer um *merge* em dois >>> conjuntos de dados cujas "chaves" (no data.table, que um dataframe) as >>> variáveis ou colunas... ou sendo mais simplório: como você espera que o SW >>> estatístico *saiba* que Bolsonaro na data.table perc_validos é a *mesma >>> coisa* que 'Jair Bolsonaro' na votos_regiao 樂?? >>> >>> HTH >>> -- >>> Cesar Rabak >>> >>> >>> On Fri, Jan 11, 2019 at 9:17 AM Bruno César Pasquini por (R-br) < >>> r-br@listas.c3sl.ufpr.br> wrote: >>> PessoALL, bom dia! Estou com dificuldade em passar os valores de uma variável string para uma função do R de forma que esta função a interprete corretamente. Por exemplo, para
