[R-br] Forçar a geração do número das linhas em as.matrix() combinado com funções do pacote dplyr

2020-11-25 Por tôpico ASANTOS por (R-br)
Prezados Membros do r-br, Estou tentando criar um objeto X_train através de funções do pacote dplyr e a função as.matrix(), mas eu não consigo criar o número das linhas para esse objeto. Meu CMR é: |library(dplyr)

[R-br] Conversão de alguns elementos de texto em variáveis de um data frame com o pacote tidyverse

2020-11-12 Por tôpico ASANTOS por (R-br)
Bom dia Membros, Eu gostaria de realizar a manipulação de um *txt para uso de algumas informações como variáveis em um data frame a ser criado. Em meu exemplo: #Pacote library(tidyverse) # Leitura do arquivo

Re: [R-br] tidyverse e vroom: Leitura de informações alvo em um arquivo *txt e também computo de informação ausente

2020-09-29 Por tôpico ASANTOS por (R-br)
Muito obrigado pela ajuda Cid, mas ainda tem alguma informação que está sendo perdida, pois: myfile <- vroom("https://raw.githubusercontent.com/Leprechault/yolov3ants/master/result_imgval.txt;, delim = "\t", skip = 5) myfile <- myfile %>% rename(dados = `folder input=imgval/ and

[R-br] tidyverse e vroom: Leitura de informações alvo em um arquivo *txt e também computo de informação ausente

2020-09-29 Por tôpico ASANTOS por (R-br)
Prezados membros, Surgiu um novo problema para a extração de informações em um arquivo *txt quando eu tenho que computar também quando eu não tenho determinada informação (lca) e preciso considerar isso no meu data.frame final. Em meu exemplo: #Pacotes library(vroom) library(tidyverse)

Re: [R-br] Dúvida para conversão de um output em *txt para data.frame usando tidyverse [RESOLVIDO]

2020-09-29 Por tôpico ASANTOS por (R-br)
/3085587/alexandre-dos-santos/ -- Em 28/09/2020 17:45, ASANTOS escreveu: Estou com um problema para criar um dataframe a partir de um conjunto de duas linhas de interesse, sendo: library(tidyverse) myfile<-read_lines("https://raw.githubusercontent.com/Leprechault/yolov3ants/maste

[R-br] Dúvida para conversão de um output em *txt para data.frame usando tidyverse [NÃO FORMATADO]

2020-09-28 Por tôpico ASANTOS por (R-br)
Estou com um problema para criar um dataframe a partir de um conjunto de duas linhas de interesse, sendo: library(tidyverse) myfile<-read_lines("https://raw.githubusercontent.com/Leprechault/yolov3ants/master/yolov3-lca_416_conv81_sub_8_log.txt;) head(myfile) Em algumas parte do meu arquivo

[R-br] Dúvida para conversão de um output em *txt para data.frame usando tidyverse

2020-09-28 Por tôpico ASANTOS por (R-br)
Estoucomumproblemaparacriarumdataframeapartirdeumconjuntodeduaslinhasdeinteresse, sendo: library(tidyverse) myfile<-read_lines("https://raw.githubusercontent.com/Leprechault/yolov3ants/master/yolov3-lca_416_conv81_sub_8_log.txt;) head(myfile)

[R-br] Diferença entre o teste de normalidade normalidade sobre a variável resposta e sobre a aov() dos dados em função da variável explicativa

2020-08-21 Por tôpico ASANTOS por (R-br)
Prezados Membro do R-br, Gostaria de saber a diferença entre realizar: 1) Análise de normalidade sobre a variável resposta x <- rep(seq(from=10, to=50, by=0.5),6) y1 <- rnorm(length(x), mean=10, sd=1.5) y1.res<-y1-mean(y1) shapiro.test(y1.res) # Shapiro-Wilk normality test # #data: y1.res #W

Re: [R-br] Criar um dataframe pela combinação de duas linhas de informação em *txt

2020-04-01 Por tôpico ASANTOS por (R-br)
Muito obrigado Max, genial e muito didática a sua resposta!!! Apenas mudei o final para *csv para evitar a confusão que dá no *txt entre *numeric*/*character*, sendo: filename <- myfile[1, 1] %>%   str_extract(".*:") %>%   str_remove("\\.jpg:") %>%   paste0("pred_", ., ".csv") filename #

[R-br] Criar um dataframe pela combinação de duas linhas de informação em *txt

2020-03-30 Por tôpico ASANTOS por (R-br)
Prezados membros do r-br, Eu gostaria de criar um novo data frame à partir de output de uma análise em *txt empregando o pacote *tidyverse*, sendo: library(tidyverse) #Arquivo original https://www.dropbox.com/s/2f13c2wb66zfrmr/result.txt?dl=0 #Faço a leitura do arquivo

Re: [R-br] Editar dados em arquivo *txt em um data frame

2020-03-26 Por tôpico ASANTOS por (R-br)
Obrigado Max, Mauro e Cesar, Deu certo, só tive que transformar o objeto *tibble* em *dataframe* na solução inicial do Max e tem outra que não necessita do pacote tidyverse, mas utilizam gsub, strsplit e grep, seguem as soluções: # Solução 1 library(tidyverse) myfile <- read_lines("log.txt")

[R-br] Editar dados em arquivo *txt em um data frame

2020-03-25 Por tôpico ASANTOS por (R-br)
Prezados membros do r-br, Eu gostaria de criar um data frame à partir de output de uma análise em *txt, sendo: #Arquivo original https://www.dropbox.com/s/pncmjwl3camap6d/log.txt?dl=0 #Faço a leitura do arquivo myfile<-read.table("log.txt", sep="\t", quote="", comment.char="")

[R-br] Problema para criar um GeoTIFF a partir da divisão um raster RGB

2019-07-17 Por tôpico ASANTOS por (R-br)
Prezados Membros, Eu gostaria de dividir um raster RGB em várias partes e salvar cada imagem no formato GeoTiff, mas no nome do arquivo eu preciso da contagem de pontos (pts) dentro de cada divisão. Meu código funciona perfeitamente quando eu uso uma única camada do raster, mas com o objeto

[R-br] Problema para plotar intervalo de confiança no ggplot2 para modelo GLM de Poisson com junção de níveis

2019-06-19 Por tôpico ASANTOS por (R-br)
Prezados Membros, Estou tentando plotar sem sucesso o intervalo em um modelo GLM de Poisson onde fiz a junção de níveis para a variável categórica Gender. Alguém baseado no CRM abaixo poderia dar uma luz? #Pacotes library(ggplot2) library(dplyr) library(tidyverse) #Dados inventados com uma

Re: [R-br] Loop para ajuste de nls reciclando os start values

2019-04-25 Por tôpico ASANTOS por (R-br)
rem." Acredito que  afunção nlsLM conte o número de interação para obter o melhor ajuste e limita um valor máximo para nao ficar rodando indefinidamente. Esta contagem é crescente não? Desculpe a pergunta mas estou tentando enteder a questão para propor um solução On Apr 25 2019, at 12:46

Re: [R-br] Loop para ajuste de nls reciclando os start values

2019-04-25 Por tôpico ASANTOS por (R-br)
7,36,48,60,72,88,96,27,36,48,60,27,27,36,48,60,72,88,96,27,36,48,60,72,88,96,27,36,48,60,72,88,96) Diameter<-c(13.9,16.2,19.1,19.3,4.7,6.7,9.6,11.2,13.1,15.3,15.4,5.4,7,9.9,11.7,13.4,16.1,16.2,5.9,8.3,12.3,14.5,2.3,5.2,6.2,8.6,9.3,11.3,15.1,15.5,5,7,7.9,8.4,10.5,14,14,4.1,4.9,6,6.7,7.7,8,8.2) d<-dados <- data.frame(Feature,Age,Diameter) str(d) # #Realizando os ajustes modelo<-function(dado

[R-br] Loop para ajuste de nls reciclando os start values

2019-04-25 Por tôpico ASANTOS por (R-br)
Prezados Membros,     Gostaria de fazer um loop (999 vezes) para ajustar dois modelos nls (Diameter ~ a1 * Age^a2) à partir de um subset em função da minha variável Feature, porém a cada vez que realiza o loop eu gostaria de reciclar os start values através da modificação em

Re: [R-br] Teste de Qui-quadrado aplicado para a distribuição binomial

2019-03-06 Por tôpico ASANTOS por (R-br)
Boa noite Cesar,     Obrigado pela ajuda. Para mim, quando eu rodo aparece também alguns alertas: Warning messages: 1: In chisq.test(table(emp), table(est), correct = TRUE) : Aproximação do qui-quadrado pode estar incorreta 2: In densfun(x, parm[1], parm[2], ...) :NaNs produzidos 3: In

[R-br] Teste de Qui-quadrado aplicado para a distribuição binomial

2019-03-05 Por tôpico ASANTOS por (R-br)
Prezados Membros,     Estou tentando realizar um teste de aderência (Qui-quadrado) aplicado a dados com distribuição binomial negativa sem sucesso. Em meu CRM: #Pacote MASS library(MASS) #Crio um banco de dados simulado Features<-sort(rep(1:3,100)) Resp1<-rnbinom(200,0.75,0.10) ##60 dados

[R-br] Problema com optim() em modelos não lineares

2019-03-01 Por tôpico ASANTOS por (R-br)
Prezados Membros,     Estou tentando realizar a estimação dos coeficientes de um modelo não linear com a função optim(), mas só recebo a mensagem de erro: Error in optim(c(0.97, 0.32), function(a) f(a, x, yexp)) : função alvo em optim retorna um objeto de comprimento 11 ao invés de 1   

[R-br] Ajuda para plotar IC para modelo glm com junção de níveis

2019-01-29 Por tôpico ASANTOS por (R-br)
Prezados Membros do R-br,     Estou tentando plotar um modelo glmcom stat_smooth() no ggplot2 sem sucesso. Minha ideia é representar o intervalo de confiança para um modelo onde realizei a junção de dois níveis para o fator Feature. Ou seja, modelos iguais são representados por uma única

[R-br] Problema para plotar IC para modelo glm Gamma usando stat_smooth() no ggplot2

2018-12-09 Por tôpico ASANTOS por (R-br)
Prezados Membros do R-br,     Estou tentando plotar um modelo glm Gamma com stat_smooth() no ggplot2 sem sucesso. Minha ideia é representar o intervalo de confiança para um modelo onde realizei a junção de dois níveis para o fator Feature. Segundo exemplo fictício do meu problema:

Re: [R-br] Sorteio de n linhas com especificação de variáveis e repetição dos valores calculados nas linhas

2018-11-06 Por tôpico ASANTOS por (R-br)
= 2 for(amb in ambs) {   subpopulacao = d[d$Amb == amb]   for (i in 1:repeticoes) {     amostra = subpopulacao[sample(NROW(subpopulacao), 5),]     amostra$desv_pad = sd(amostra$rate, na.rm = T)     resultado = rbind(resultado, amostra)   } } Atenciosamente, Rodrigo Ângelo On Mon, Nov 5, 2018 at 2:38

[R-br] Sorteio de n linhas com especificação de variáveis e repetição dos valores calculados nas linhas

2018-11-05 Por tôpico ASANTOS por (R-br)
Prezados Membros,     Segue um exemplo do que estou tentando fazer: #Tenho um banco de dados d com 4 variáveis (State, Amb, Year e rate) library(data.table) d  <- fread ("    State    Amb Year    rate    GA   soil    2015 .4    GA   soil   

[R-br] Extraindo os raios e área de uma elipse ellipsoidhull() do pacote cluster

2018-05-23 Por tôpico ASANTOS via R-br
Caros Membros,     Com fins ilustrativos e exploratório, tenho pontos correspondentes a dois tratamentos A e B espacialmente distribuídos no campo, estou delimitando o limite (zona de influência) de cada um como uma elipse, através da função ellipsoidhull() do pacote cluster conforme CRM

Re: [R-br] Emprego da PCA para seleção de variáveis mais correlacionadas no primeiro componente principal

2018-05-05 Por tôpico ASANTOS via R-br
áveis neste caso porque entendo que o CMR é só para discutir a técnica. HTH 2018-05-03 16:30 GMT-03:00 ASANTOS <alexandre.san...@cas.ifmt.edu.br <mailto:alexandre.san...@cas.ifmt.edu.br>>: Obrigado Cezar, Então mudando names(load.rot[,2][order(abs(load.rot[,

Re: [R-br] Emprego da PCA para seleção de variáveis mais correlacionadas no primeiro componente principal

2018-05-03 Por tôpico ASANTOS via R-br
Obrigado Cezar, Então mudando names(load.rot[,2][order(abs(load.rot[,2]),decreasing=TRUE)][1:topN]) e names(load.rot[,3][order(abs(load.rot[,3]),decreasing=TRUE)][1:topN]), vou ter as cinco variáveis mais correlacionadas com a segunda e terceira componentes principais respectivamente?

[R-br] Emprego da PCA para seleção de variáveis mais correlacionadas no primeiro componente principal

2018-05-02 Por tôpico ASANTOS via R-br
Prezados Membros,     Gostaria de selecionar as 5 variáveis resposta  no primeiro componente principal mais correlacionadas usando a PCA, através da função prcomp(), conforme o post

[R-br] Extrair por sorteio linhas de um data frame dentro de cada nível de um fator

2018-04-26 Por tôpico ASANTOS via R-br
    Prezados Membros do R, Preciso extrair linhas de um data frame dentro de cada nível de um fator, usando a função sample_n() do pacote dplyr. Sendo meu CRM: #Data set artificial df <- data.frame(matrix(rnorm(80), nrow=40)) df$color <-  rep(c("blue", "red", "yellow", "pink"), each=10)

Re: [R-br] Identificação das variáveis resposta em análise de correlação canônica

2017-10-16 Por tôpico ASANTOS via R-br
Ops, ficou faltando chamar o pacote cadisc: library(candisc) data(Rohwer, package="heplots") X <- as.matrix(Rohwer[,6:10]) # the PA tests Y <- as.matrix(Rohwer[,3:5]) # the aptitude/ability variables (cc <- cancor(X, Y, set.names=c("PA", "Ability"))) --

[R-br] Identificação das variáveis resposta em análise de correlação canônica

2017-10-11 Por tôpico ASANTOS via R-br
Boa tarde Membros, Estou trabalhando com análise de correlação canônica com a função cancor() do pacote candisc, por exemplo e segundo a função, se eu faço: data(Rohwer, package="heplots") X <- as.matrix(Rohwer[,6:10]) # the PA tests Y <- as.matrix(Rohwer[,3:5]) # the

[R-br] Material em R de modelos mistos

2017-10-02 Por tôpico ASANTOS via R-br
Bom dia Membros,    Favor gostaria de solicitar bom materiais de modelos mistos aplicados ao R, alguém poderia ajudar? Obrigado e abraços, Alexandre -- == Alexandre dos Santos Proteção Florestal IFMT - Instituto Federal

[R-br] Problema em ler múltiplas imagens *jp2 com a função stack()

2017-09-29 Por tôpico ASANTOS via R-br
Prezados Membros, Estava acostumado a ler múltiplas imagens em *tif com o CRM abaixo e retirar informações de interesse, mas quando tento fazer o mesmo para imagens do satélite Sentinel 2 em *jp2 não funciona, a função stack() do pacote raster não funciona. Alguém saberia me dizer o

Re: [R-br] Referências para justificar o uso de teste de médias baseados em preditores lineares [OFF-TOPIC]

2017-02-24 Por tôpico ASANTOS via R-br
Walmes, Mais uma vez prestou um claro e didático esclarecimento da questão levantada, obrigado pela explanação e referências apontadas, Redobrados agradecimentos, Alexandre -- == Alexandre dos Santos Proteção

[R-br] Referências para justificar o uso de teste de médias baseados em preditores lineares [OFF-TOPIC]

2017-02-24 Por tôpico ASANTOS via R-br
Prezados membros, Utilizo de maneira rotineira o ajuste de modelos GLM (normalmente para as famílias de Poisson e binomial) e realizo para variáveis qualitativas comparações múltiplas de médias baseada em funções como glht() do pacote multicomp. No entanto, tenho encontrado

[R-br] Extração de valores de pixels de interesse em uma área circular usando extract()

2017-02-09 Por tôpico ASANTOS via R-br
Prezados membros, Gostaria de extrair a média de valores dos pixels de interesse em um raster, dadas as coordenadas centrais de áreas circulares e a determinação do raio, que é dada pelo buffer da função extract() do pacote raster, porém da forma como estou fazendo não esta

Re: [R-br] Selecionar a extração de valores dos pixels em linhas a cada número de pixels arbitrário

2017-02-03 Por tôpico ASANTOS via R-br
Muito obrigado Jônatan, ajudou muito!!! -- == Alexandre dos Santos Proteção Florestal IFMT - Instituto Federal de Educação, Ciência e Tecnologia de Mato Grosso Campus Cáceres Caixa Postal 244 Avenida dos Ramires, s/n Bairro:

Re: [R-br] Selecionar a extração de valores dos pixels em linhas a cada número de pixels arbitrário

2017-02-03 Por tôpico ASANTOS via R-br
Obrigado Jônatan, Desculpe se não fui claro na minha pergunta , mas a função sugerida xyFromCell(r, df$cel): x y [1,] -162 -81 Retorna apenas a coordenada do pixel V1 = 61, gostaria de extrair a coordenada do centro de todos os pixels de V1 a V10 x y cel

Re: [R-br] Selecionar a extração de valores dos pixels em linhas a cada número de pixels arbitrário

2017-02-03 Por tôpico ASANTOS via R-br
col = p$col[ir], ncols = 2, row = p$row[ir], nrows = 1) }# end fun ) df <- data.frame(p, vals2cols) df 2017-01-26 17:43 GMT-02:00 ASANTOS via R-br <r-br@listas.c3sl.ufpr.br <mailto:r

[R-br] Selecionar a extração de valores dos pixels em linhas a cada número de pixels arbitrário

2017-01-26 Por tôpico ASANTOS via R-br
Prezados Membros, Tenho um raster hipotético r: require(raster); require(sp) ## Criando um raster r <- raster(nc=10, nr=10) r <- setValues(r, round(runif(ncell(r))* 255)) Consigo extrair os valores dos pixels de interesse dadas as coordenadas centrais dos mesmos: x <-

Re: [R-br] Modificar um data frame em uma matriz de comparação múltipla específica

2017-01-23 Por tôpico ASANTOS via R-br
(out3[[i]])=names } Tito Conte Em 11 de janeiro de 2017 21:28, ASANTOS via R-br <r-br@listas.c3sl.ufpr.br <mailto:r-br@listas.c3sl.ufpr.br>> escreveu: Caros Membros, Eu gostaria de modificar um data frame em uma matriz de comparação múltipla específic

[R-br] Modificar um data frame em uma matriz de comparação múltipla específica

2017-01-11 Por tôpico ASANTOS via R-br
Caros Membros, Eu gostaria de modificar um data frame em uma matriz de comparação múltipla específica para tanto tenho um data frame DF com a nota dada por dois indivíduos (Indv) para cinco diferentes produtos químicos, sendo: Indv<-c(1,2) deltametrina<-c(1,1) fipronil<-c(5,3)

Re: [R-br] Agregar níveis e converter em colunas [RESOLVIDO]

2016-04-18 Por tôpico ASANTOS
1:2, each = 6) # Cria a coluna com a variável N, identificando os sujeitos novoDS <- reshape(DS, timevar = 'PAISAGEM', idvar = 'N', direction = 'wide') # Transforma os dados 2016-04-18 9:09 GMT-03:00 ASANTOS <alexandresanto...@yahoo.com.br <mailto:alexandresanto...@yahoo.com.br>

[R-br] Agregar níveis e converter em colunas

2016-04-18 Por tôpico ASANTOS
Caros Listeiros, Tenho um banco de dados (DS) representado abaixo: ##Dados originais PAISAGEM<-c("Area_Urbana","Cerrado","Mata", "NaoClassificada", "Pastagem","Agua", "Area_Urbana","Cerrado","Mata", "NaoClassificada", "Pastagem","Agua")

[R-br] Classificação de um data frame em função de outro

2016-04-04 Por tôpico ASANTOS
Caros Listeiros, Tenho dois data frames DF1 e DF2, sendo que o primeiro representa a comparação múltipla entre alguns tratamentos de DF2 e o p valor correspondente. Eu gostaria de criar um variável groups dentro de DF2 em função do valor de p de DF1, de foram que meu output final seja:

[R-br] Classificação de um data frame em função de outro

2016-04-04 Por tôpico ASANTOS
Caros Listeiros, Tenho dois data frames DF1 e DF2, sendo que o primeiro representa a comparação múltipla entre alguns tratamentos de DF2 e o p valor correspondente. Eu gostaria de criar um variável groups dentro de DF2 em função do valor de p de DF1, de foram que meu output final

Re: [R-br] Criando um fatorial completo com dados desbalanceados [RESOLVIDO]

2016-03-29 Por tôpico ASANTOS
Muito obrigado Walmes!! Era exatamente a dica que eu queria, da <- data.frame(F1 = rep(LETTERS[1:4], c(4, 6, 10, 20)), F2 = sample(1:3, size = 40, replace = TRUE)) str(da) length(da[,1]) xtabs(~F1 + F2, data = da) --

Re: [R-br] Função para criar agrupamento de variáveis em função do valor de p

2016-03-28 Por tôpico ASANTOS
Prezados Listeiros, Gostaria de uma ajuda do grupo para criação de uma função para criação de uma variável dados$groups, em função da significância de res$aov.tab$Pr=> 0.05, de maneira que níveis de fatores iguais serão fundidos, como no exemplo abaixo onde trat1 e trat2 são

[R-br] Função para criar agrupamento de variáveis em função do valor de p

2016-03-28 Por tôpico ASANTOS
Prezados Listeiros, Gostaria de uma ajuda do grupo para criação de uma função para criação de uma variável dados$groups, em função da significância de res$aov.tab$Pr=> 0.05, de maneira que níveis de fatores iguais serão fundidos, como no exemplo abaixo onde trat1 e trat2 são

[R-br] Criando um fatorial completo com dados desbalanceados

2016-03-25 Por tôpico ASANTOS
Prezados Listeiros, Gostaria de criar um fatorial completo entre 4 tratamentos com dados desbalanceados usando a função gen.factorial() com o pacote AlgDesign. Alguém poderia me ajudar, segue CRM abaixo: #Dados artificiais tratamentos_b <- gl(4, 15, labels = paste("t", 1:3, sep=""))##

Re: [R-br] Separação de dados em classes usando if e ifelse

2016-03-22 Por tôpico ASANTOS
veu: Além disso, não tinha reparado, a comparação que você deseja pra Classe 1 é "A" ou "C" ou "F" ou "H", pois não dá pra ser A e C e F e H juntos, certo? Em 22 de março de 2016 11:50, Rafael Garcia Cunha <rafar...@gmail.com <mailto:rafar...@gma

Re: [R-br] Separação de dados em classes usando if e ifelse

2016-03-22 Por tôpico ASANTOS
...@yahoo.com.br alexandre.san...@cas.ifmt.edu.br Lattes: http://lattes.cnpq.br/1360403201088680 OrcID: orcid.org/-0001-8232-6722 Researchgate: https://www.researchgate.net/profile/Alexandre_Santos10 LinkedIn: https://br.linkedin.com/in/alexandre-dos-santos-87961635

Re: [R-br] Separação de dados em classes usando if e ifelse [RESOLVIDO]

2016-03-22 Por tôpico ASANTOS
ê notar, você está trabalhando com ifelse, então, se o primeiro if não for atendido, ele já é maior que 1, então não precisa fazer essa comparação novamente. Em 22 de março de 2016 10:58, ASANTOS <alexandresanto...@yahoo.com.br <mailto:alexandresanto...@yahoo.com.br>> escreveu: P

[R-br] Separação de dados em classes usando if e ifelse

2016-03-22 Por tôpico ASANTOS
Prezados listeiros, Gostaria se criar uma coluna de classificação do meu objeto var em classes, segundo intervalos arbitrários como quando <=1 vai se chamar "Classe1", >1 e <2 vai se chamar "Classe2", etc. Porém o meu objeto de classificação RES$classes não esta dando certo aliás é uma

Re: [R-br] Matriz de correlação entre vetores de diferentes tamanhos [RESOLVIDO]

2016-03-21 Por tôpico ASANTOS
ces (UEM) DSc in Agricultural Systems Engineering (USP/Esalq) Brazilian Agricultural Research Corporation (Embrapa) Dourados, MS, Brazil || GEO, -22.2752, -54.8182, 408m UTC-04:00 / DST: UTC-03:00 Em 21 de março de 2016 11:02, ASANTOS <alexandr

Re: [R-br] Matriz de correlação entre vetores de diferentes tamanhos [RESOLVIDO]

2016-03-21 Por tôpico ASANTOS
Muito obrigado Éder, Foi muito útil sim, já estava largando mão, Redobrados agradecimentos, -- == Alexandre dos Santos Proteção Florestal IFMT - Instituto Federal de Educação, Ciência e Tecnologia de Mato Grosso Campus

Re: [R-br] Matriz de correlação entre vetores de diferentes tamanhos

2016-03-19 Por tôpico ASANTOS
/www.researchgate.net/profile/Alexandre_Santos10 LinkedIn: https://br.linkedin.com/in/alexandre-dos-santos-87961635 ====== Em 16/03/2016 14:58, ASANTOS escreveu: correla <- round(cor.prob(var1,var2,var3,var4),4) ___

[R-br] Matriz de correlação entre vetores de diferentes tamanhos

2016-03-19 Por tôpico ASANTOS
Prezados Listeiros, Estou tentando implementar uma matriz de correlação para dados desbalanceados, isso é possível? Segue CRM abaixo da tentativa do que venho tentando fazer, alguém poderia iluminar a questão para mim? #Variáveis artificiais var1<-rnorm(200,5,0.25)## Tamanho do

Re: [R-br] Criar comparações múltiplas entre fatores ... O RETORNO

2016-03-11 Por tôpico ASANTOS
22 Researchgate: https://www.researchgate.net/profile/Alexandre_Santos10 LinkedIn: https://br.linkedin.com/in/alexandre-dos-santos-87961635 == Em 10/03/2016 08:33, ASANTOS escreveu: Muito obrigado Éder Era exatamente a função que eu procurava, funcionou perf

Re: [R-br] Criar comparações múltiplas entre fatores [RESOLVIDO]

2016-03-10 Por tôpico ASANTOS
Muito obrigado Éder Era exatamente a função que eu procurava, funcionou perfeitamente, Abraços, -- == Alexandre dos Santos Proteção Florestal IFMT - Instituto Federal de Educação, Ciência e Tecnologia de Mato Grosso

[R-br] Criar comparações múltiplas entre fatores

2016-03-09 Por tôpico ASANTOS
Caros listeiros, Gostaria de achar uma maneira de automatizar a criação de comparações múltiplas entre fatores, no meu caso: #Fator treat <- gl(3, 20, labels = paste("t", 1:3, sep="")) #Variables sp1_1 = rnorm(10, 5, 0.25) sp1_2 = rnorm(50, 2.5, 0.25) sp1 = c(sp1_1,sp1_2) sp2 =

Re: [R-br] Obtenção de Valores em Pontos de Arquivo Raster x ASCII [RESOLVIDO]

2016-02-18 Por tôpico ASANTOS
Muito obrigado Éder e Thiago, Acredito que colocamos uma pedra sobre a questão!!! Priorizar raster() é = ganho de velocidade de processamentos e menor uso de memória. -- == Alexandre dos Santos Proteção Florestal IFMT

Re: [R-br] Automatização de contrastes pela combinação de níveis para PERMANOVA

2016-02-17 Por tôpico ASANTOS
Obrigado pela resposta Walmes, Estou tentando fazer testes two-way post-hoc para dados multivariados, isso baseado em testes one-way post-hoc que tenho encontrados na literatura, que usam TukeyHSD() que foi desenvolvidos para dados univariados, mas veem sendo usados para dados

[R-br] Obtenção de Valores em Pontos de Arquivo Raster x ASCII

2016-02-17 Por tôpico ASANTOS
Boa noite Éder, Montei uma rotina abaixo para iniciarmos um novo tópico e é possível observar o que você havia comentado, sendo: ### require(raster) require(sp) require(rgdal) # RasterLayer inventado r <- raster(nrows=1, ncols=1) r <- setValues(r, 1:ncell(r)) r_SGDF<- as(r,

Re: [R-br] Obtenção de Valores em Pontos de Arquivo Raster

2016-02-16 Por tôpico ASANTOS
|| GEO, -22.2752, -54.8182, 408m UTC-04:00 / DST: UTC-03:00 Em 16 de fevereiro de 2016 10:24, ASANTOS <alexandresanto...@yahoo.com.br <mailto:alexandresanto...@yahoo.com.br>> escreveu: Ótima Rotina Éder! Acho que tem que trocar download.file(url1, fn, mo

Re: [R-br] Obtenção de Valores em Pontos de Arquivo Raster

2016-02-16 Por tôpico ASANTOS
Ótima Rotina Éder! Acho que tem que trocar download.file(url1, fn, mode="wb") por download.file(url0, fn, mode="wb") Mais uma outra coisa, se eu trocar o formato nc e no meu caso, que são geoTiff por *asc não tornaria essa operação mais rápida e menos sujeita a restrições de

[R-br] Automatização de contrastes pela combinação de níveis para PERMANOVA

2016-02-12 Por tôpico ASANTOS
Caros Listeiros, Eu estava tentando adaptar uma rotina do Walmes para geração de uma matriz de combinação de níveis para ajustes de modelos GLM, só que para PERMANOVA, criados pela função adonis () do pacote vegan, sem sucesso, na minha tentativa a rotina já não funciona na geração da

Re: [R-br] Função com vários if e else if que não é SpatialGridDataFrame [RESOLVIDO]

2016-02-08 Por tôpico ASANTOS
Muito obrigado Éder, funcionou perfeitamente!! Também tem outra alteração que resolve o meu problema e aumenta a velocidade de processamento, uma vez que tenho rasters muito grandes, sendo: radconvL <- function(x, band = 2) { Lmax <- switch(band, "2" =

Re: [R-br] Função com vários if e else if que não é SpatialGridDataFrame

2016-02-05 Por tôpico ASANTOS
Prezados Listeiros, Mais um problema com a minha função, apesar de eu especificar ao final que class(results) == "SpatialGridDataFrame", o resultado final não é um SpatialGridDataFrame mas um objeto numeric e não sei porque, alguém pode me ajudar? Segue a função nova desenvolvida

Re: [R-br] Função com vários if e else if que não funciona [RESOLVIDO]

2016-02-05 Por tôpico ASANTOS
Muito mais "limpo" fica o código final Éder, Muito obrigado, Abraços, -- == Alexandre dos Santos Proteção Florestal IFMT - Instituto Federal de Educação, Ciência e Tecnologia de Mato Grosso Campus Cáceres Caixa Postal

Re: [R-br] Função com vários if e else if que não funciona - O RETORNO

2016-02-03 Por tôpico ASANTOS
= Em 03/02/2016 17:10, Thiago Serafim escreveu: Lendo a mensagem de erro, vemos que Lmax não foi definido. Olhando seu programa, Lmax só é definido quando band é 2, ou 3, ou 4 ou 5. Conclui-se que, na sua chamada de função, band não é igual a nenhum desses valores. Quando a linha x <

Re: [R-br] Função com vários if e else if que não funciona [RESOLVIDO]

2016-02-03 Por tôpico ASANTOS
Obrigado Jonathan e Éder, Não ia conseguir jamais encontrar o erro ligado pmach() e Éder ficou uma importante dica em sempre fazer um print() para ver os elementos e resultados envolvidos para não incorrer em erros, Redobrados agradecimentos pessoal, Segue o problema resolvido:

[R-br] Vetor com vários formatos de datas

2016-02-03 Por tôpico ASANTOS
Caros Listeiros, Tenho um vetor com diferentes formatos de datas abaixo, que se tento tirar a média não funciona e se tento explicitar um format=%d/%m/%Y", acabo deixando de fora o %d-%m-%Y e %d.%m.%Y. Aonde pergunto é possível trabalhar com um vetor de datas em diferentes formatos?

[R-br] Função com vários if e else if que não funciona - O RETORNO

2016-02-03 Por tôpico ASANTOS
ttps://www.researchgate.net/profile/Alexandre_Santos10 LinkedIn:https://br.linkedin.com/in/alexandre-dos-santos-87961635 == Em 28/12/2015 16:22, ASANTOS escreveu: require(raster) require(sp) # RasterLayer inven

Re: [R-br] Vetor com vários formatos de datas [RESOLVIDO]

2016-02-03 Por tôpico ASANTOS
tudo que não é número por '/': datas<-c("12-10-2011","10.03.2013","05/06/2016" ) gsub('[^0-9]', '/', datas) # Apenas para ver o passo anterior ao as.Date() as.Date(gsub('[^0-9]', '/', datas), '%d/%m/%Y') 2016-02-03 15:58 GMT-02:00 ASANTOS <alexandresanto...@

Re: [R-br] Problema com datas que se tornam numéricas [RESOLVIDO]

2016-02-02 Por tôpico ASANTOS
Obrigado Éder, resolveu o meu problema. Preciso começar a programar de maneira mais "limpa", valeu pelas dicas, Abraços, Segue solução: ## Função para leitura da tabela HTML readFE <- function(url0){ require(RCurl); require(XML) url1 <- gsub("(^.*)(/s/.*)(\\?.*$)",

[R-br] Problema com datas que se tornam numéricas

2016-02-01 Por tôpico ASANTOS
Caros Listeiros, Desenvolvi uma função que extrai dentre várias informações de uma tabela, a menor e a maior data, meu problema é que mesmo especificando a data como as.Date(), ela fica numérica após a execução da função, alguém poderia me dar uma luz? Segue CRM: ## Função para

Re: [R-br] RES: Criar função para tirar a média entre grupos sob condições dadas [RESOLVIDO]

2016-01-31 Por tôpico ASANTOS
Muito obrigado Éder, Tem razão, vou deixar as filtragens para fora da função, Abraços, -- == Alexandre dos Santos Proteção Florestal IFMT - Instituto Federal de Educação, Ciência e Tecnologia de Mato Grosso Campus Cáceres

Re: [R-br] RES: Criar função para tirar a média entre grupos sob condições dadas

2016-01-31 Por tôpico ASANTOS
Obrigado Paulo, Tinham inconsistências no meu código que foram corrigidos com suas dicas, porém a segunda função results<-subset(results,!(latitude == "0." | longitude == "0.")) ele não roda e continua a aparecer coordenadas 0, sendo: ### require(RCurl);

Re: [R-br] RES: Criar função para tirar a média entre grupos sob condições dadas

2016-01-30 Por tôpico ASANTOS
ropboxusercontent.com/content_link/tkauy9obP7pgxKYpb9j5ZR2LCSUTe2iJpaULTWEN4RzdfR6AtirbNWGtt8q9Ncex/file?dl=1;\r\nyou should be redirected automatically.\r\n\r\n\r\n\r\nWSGI Server\r\n \r\n\r\n" Abraços, Paulo Em 30 de janeiro de 2016 12:16, ASANTOS <alexandres

Re: [R-br] RES: Criar função para tirar a média entre grupos sob condições dadas

2016-01-30 Por tôpico ASANTOS
Bom dia Éder, Tentei criar uma função com os comandos de leitura da tabela em HTML e também não funfou, posso pedir novamente sua ajuda, Obrigado, ## Função de leitura da tabela readFE<- function (x, URL = ""){ page <- getURL(URL) classes <- c(rep("factor", 6), rep("numeric", 4),

Re: [R-br] RES: Criar função para tirar a média entre grupos sob condições dadas [RESOLVIDO]

2016-01-29 Por tôpico ASANTOS
Muito obrigado Éder!!! Problema resolvido!!! Abraços, -- == Alexandre dos Santos Proteção Florestal IFMT - Instituto Federal de Educação, Ciência e Tecnologia de Mato Grosso Campus Cáceres Caixa Postal 244 Avenida dos

Re: [R-br] RES: Criar função para tirar a média entre grupos sob condições dadas

2016-01-28 Por tôpico ASANTOS
Boa noite Éder, Tentei transformar a rotina criada por você em função e não funcionou e não sei porque, poderia me ajudar? Segue CRM: ### require(RCurl); require(XML) url0 <- "https://www.dropbox.com/s/znmr0lwda2y6fc5/BD_teste2.html?dl=1; url1 <-

Re: [R-br] RES: Criar um convex hull para um objeto shapefile [RESOLVIDO]

2016-01-26 Por tôpico ASANTOS
Mauro, O problema esta na separação existente nessa sentença, tente fazer: srdf=SpatialPolygonsDataFrame(sr,data.frame(row.names=c('1','2','3','4'), PIDS=1:4)) Solução completa conferida: ### require(rgdal) require(maptools)

[R-br] Criar um convex hull para um objeto shapefile

2016-01-25 Por tôpico ASANTOS
Prezados Listeiros, Eu gostaria de criar um convex hull que envolvesse 4 polígonos, representados por um objeto oriundo da leitura de um readShapeLines(), sem ter que transformar o objeto em SpatialPolygonsDataFrame, isso é possível? Meu CRM: #Pacotes require(rgdal)

Re: [R-br] Criar um convex hull para um objeto shapefile [RESOLVIDO]

2016-01-25 Por tôpico ASANTOS
Fantástico Éder!! Na verdade só tinha um errinho em um mycoords que era my.coords, Muito obrigado pela solução. Segue problema resolvido: ### require(rgdal) require(maptools) #--- #Crio 4 polígonos sr

Re: [R-br] RES: Criar função para tirar a média entre grupos sob condições dadas [RESOLVIDO]

2016-01-22 Por tôpico ASANTOS
nello PhD Student in Agricultural Systems Engineering (USP/Esalq) Brazilian Agricultural Research Corporation (Embrapa) Dourados, MS, Brazil [22 16.5'S, 54 49.0'W] Em 21 de janeiro de 2016 17:55, Manoel Galdino <mcz@gmail.com <mailto:mcz@gmail.com>> es

[R-br] Criar função para tirar a média entre grupos sob condições dadas

2016-01-21 Por tôpico ASANTOS
Caros listeiros, Estou tentando criar uma função aggPestFE que para uma primeira variável se for "Formiga", vai tirar a media da coluna 5, mas se for "Besouros" ou "Barata" vai tira a média da coluna 4. Sendo que quero o resultado dado em forma de list, ficando o meu resultado: [[1]]

Re: [R-br] Criar função para tirar a média entre grupos sob condições dadas [RESOLVIDO]

2016-01-21 Por tôpico ASANTOS
15Abre Campo 0 23.8 Barata 73 Volta Redonda 25 0.0 Formiga 15 Vitoria 0 5.3 Besouros 73Abre Campo 25 0.0 Formiga 74 Volta Redonda 0 2.0 Formiga 74 Vitoria 0 11.3 Mas seus resultad

Re: [R-br] Criar função para tirar a média entre grupos sob condições dadas

2016-01-21 Por tôpico ASANTOS
0 1.5 Besouros 73 Volta Redonda 50 0.0 Barata 15 Vitoria 25 0.0 Formiga 15Abre Campo 0 23.8 Barata 73 Volta Redonda 25 0.0 Formiga 15 Vitoria 0 5.3 Besouros 73Abre Campo 25 0.0

Re: [R-br] Criar função para tirar a média entre grupos sob condições dadas [RESOLVIDO]

2016-01-21 Por tôpico ASANTOS
49.0'W] Em 21 de janeiro de 2016 17:55, Manoel Galdino <mcz@gmail.com <mailto:mcz@gmail.com>> escreveu: Nem consigo executar sua função de begar o banco, diz q não existe GET cheguei a carrega o pacote XML, mas tbm não funfou 2016-01-21 18:28 GMT-0

[R-br] Conversão de matriz em raster georeferenciado

2016-01-18 Por tôpico ASANTOS
Prezados Listeiros, Gostaria de realizar a conversão de uma matriz em raster georeferenciado com duas informações, a representação de plantas em uma matriz (B) e juntar as informações geográficas conhecendo-se o espaçamento entre plantas (d1), no entanto, gostaria de saber se

[R-br] Múltiplas funções em uma única função

2016-01-15 Por tôpico ASANTOS
Prezados Listeiros, Gostaria de criar uma função com múltiplas funções em seu interior, no meu caso gostaria de criar uma função denominada MYsummary, com três funções no interior dela, sendo que à partir de banco de dados artificial: ##Banco de dados artificial

Re: [R-br] Múltiplas funções em uma única função [RESOLVIDO]

2016-01-15 Por tôpico ASANTOS
ails:alexandresanto...@yahoo.com.br alexandre.san...@cas.ifmt.edu.br Lattes: http://lattes.cnpq.br/1360403201088680 OrcID: orcid.org/-0001-8232-6722 Researchgate: https://www.researchgate.net/profile/Alexandre_Santos10 LinkedIn: https://br.linkedin.com/in/alexandre-dos-santos-879616

[R-br] Classificação de pontos em cada polígono em um shapefile

2016-01-14 Por tôpico ASANTOS
Caros Listeiros Eu criei um shapefile POLY e gostaria de lançar alguns pontos aleatórios (objeto pts) e depois classifica-los com a função over() para saber em qual polígono esta contido cada ponto, no entanto, todas as modificações que eu faço geram em incompatibilidade na avaliação

Re: [R-br] Classificação de pontos em cada polígono em um shapefile

2016-01-14 Por tôpico ASANTOS
Muito obrigado Éder!! Essa sua solução é ótima quando tenho SpatialPoints(), que é o meu caso, fiz com planar points do spatstat apenas para montar o CMR. Valeu pela solução alternativa!! -- == Alexandre dos

Re: [R-br] Classificação de pontos em cada polígono em um shapefile [RESOLVIDO]

2016-01-14 Por tôpico ASANTOS
Obrigado Elias!! Fiz de um outro jeito que também funcionou, sendo: RES<-NULL for (i in 1:length(contorno_line_X$PIDS)){ RES<-rbind(RES, c(contorno_line_X$PIDS[i],length(pts$b[[i]]$x))) } -- == Alexandre dos Santos

Re: [R-br] Seleção de dígitos dos valores de um vetor [RESOLVIDO]

2016-01-13 Por tôpico ASANTOS
961635 == Em 13/01/2016 16:59, Marcos Silva escreveu: substr(db, 4, 6) [1] "002" "003" "016" "014" "004" "020" "002" "023" "027" > Em 13 de janeiro de 2016 17:50, ASANTOS <alexandresanto...@yahoo.c

[R-br] Seleção de dígitos dos valores de um vetor

2016-01-13 Por tôpico ASANTOS
Prezados Listeiros, Tenho um vetor de dados db<-c(201002,486003,486016,486014,486004,486020,486002,486023,486027) e gostaria de extrair somente os três últimos dígitos de cada valor. Isso de uma maneira que eu tenha um novo vetor de dados sendo newdb: 002 003 016 014 004 020 002 023

[R-br] Leitura de tabela em formato HTML no dropbox

2015-12-29 Por tôpico ASANTOS
Prezados Listeiros, Estou tentando ler uma tabela em HTML que hospedei no dropbox, porém a função readHTMLTable() parece não funcionar se o arquivo esta no dropbox, alguém poderia me ajudar? Segue CRM: ##Leitura de uma tabela em HTML usando httr e XML ##Pacotes require(httr)

  1   2   3   4   >