Junho 2014 - R-br - DINF UFPR

variável sem valor
by Waldelene Moura 05 Jun '14

05 Jun '14

Olá pessoal Voces sabem se é possível criar uma variável no R sem dar valor para ela? dizer que apenas é uma variável? Waldelene Moura Analista de Sistemas Universidade Federal do Maranhão - PROEN

4 5

várias linhas em um única coluna
by luc.souza＠usp.br 05 Jun '14

05 Jun '14

Prezados, tenho uma planilha com várias linhas. Gostaria de colocar os dados dessas várias linhas, em uma única coluna, um após o outro. como pode ser feito isso? Obrigado Lucas Lucas F. de Souza Eng. Agrícola - CONAB M.Sc. Produção Vegetal - UENF Doutor em Agrometeorologia - ESALQ/USP tel: (19) 98160-7068

4 7

Ajuda 3 loop for
by Wagner Bonat 05 Jun '14

05 Jun '14

Caros, Preciso de uma ajuda com a funcao abaixo. O que quero fazer e exatamente o que a minha funcao faz, porem sem usar esses for, pq e muito lento e eu preciso avaliar isso para matrized W realmente grande talvez 20000 x 20000, eu fiz algumas tentativas usando expand.grid e apply, mas tive problemas com alocacao de memoria ... Tenho certeza q deve ter uma forma de fazer isso rapido .... Alguma idea ?? Obrigado A = c(1,2,3) W = matrix(rnorm(9),3,3) res = c(1,2,3) cov.prod <- function(A, W, mu3){ soma = 0 n <- dim(W)[1] for(i in 1:n){ for(j in 1:n){ for(k in 1:n){ temp <- A[i]*W[j,k]*r[i]*r[j]*r[k] soma <- soma+temp } } } return(soma) } -- Wagner Hugo Bonat LEG - Laboratório de Estatística e Geoinformação UFPR - Universidade Federal do Paraná

2 1

Re: [R-br] várias linhas em um única coluna
by Robert Iquiapaza 04 Jun '14

04 Jun '14

melt_check <- function (data, id.vars, measure.vars) { varnames <- names(data) if (!missing(id.vars) && is.numeric(id.vars)) id.vars <- varnames[id.vars] if (!missing(measure.vars) && is.numeric(measure.vars)) measure.vars <- varnames[measure.vars] if (!missing(id.vars)) { unknown <- setdiff(id.vars, varnames) if (length(unknown) > 0) { stop("id variables not found in data: ", paste(unknown, collapse = ", "), call. = FALSE) } } if (!missing(measure.vars)) { unknown <- setdiff(measure.vars, varnames) if (length(unknown) > 0) { stop("measure variables not found in data: ", paste(unknown, collapse = ", "), call. = FALSE) } } if (missing(id.vars) && missing(measure.vars)) { categorical <- sapply(data, function(x) class(x)[1]) %in% c("factor", "ordered", "character") id.vars <- varnames[categorical] measure.vars <- varnames[!categorical] message("Using ", paste(id.vars, collapse = ", "), " as id variables") } if (missing(id.vars)) id.vars <- varnames[!(varnames %in% c(measure.vars))] if (missing(measure.vars)) measure.vars <- varnames[!(varnames %in% c(id.vars))] list(id = id.vars, measure = measure.vars) } From: luc.souza(a)usp.br Sent: Wednesday, June 04, 2014 5:09 PM To: r-br(a)listas.c3sl.ufpr.br Subject: Re: [R-br] várias linhas em um única coluna Obrigado. Mas está faltando a função melt_check abs Lucas F. de Souza Eng. Agrícola - CONAB M.Sc. Produção Vegetal - UENF Doutor em Agrometeorologia - ESALQ/USP tel: (19) 98160-7068 -------------------------------------------------------------------------------- De: "Robert Iquiapaza" <rbali(a)ufmg.br> Para: r-br(a)listas.c3sl.ufpr.br Enviadas: Quarta-feira, 4 de Junho de 2014 17:00:03 Assunto: Re: [R-br] várias linhas em um única coluna A função melt para data frames: x=data.frame(rbind(runif(5), rbind(runif(5)))) t(x) meltdf <- function (data, id.vars, measure.vars, variable_name = "variable", na.rm = !preserve.na, preserve.na = TRUE) { if (!missing(preserve.na)) message("Use of preserve.na is now deprecated, please use na.rm instead") var <- melt_check(data, id.vars, measure.vars) if (length(var$measure) == 0) { return(data[, var$id, drop = FALSE]) } ids <- data[, var$id, drop = FALSE] df <- do.call("rbind", lapply(var$measure, function(x) { data.frame(ids, x, data[, x]) })) names(df) <- c(names(ids), variable_name, "value") df[[variable_name]] <- factor(df[[variable_name]], unique(df[[variable_name]])) if (na.rm) { df <- df[!is.na(df$value), , drop = FALSE] } rownames(df) <- NULL df } meltdf(x) Sds From: luc.souza(a)usp.br Sent: Wednesday, June 04, 2014 3:56 PM To: r-br(a)listas.c3sl.ufpr.br Subject: Re: [R-br] várias linhas em um única coluna Obrigado. Mas como não tenho o pacote instalado, tenho um problema. Sou func. público e o proxy não deixa eu baixar o pacote. Estou procurando uma solução para isso, através do R, mas não estou conseguindo. Conhece algo a respeito de liberação do proxy no R? Obrigado Lucas Lucas F. de Souza Eng. Agrícola - CONAB M.Sc. Produção Vegetal - UENF Doutor em Agrometeorologia - ESALQ/USP tel: (19) 98160-7068 ------------------------------------------------------------------------------ De: "Rodrigo Muniz" <uenf.rodrigo(a)gmail.com> Para: r-br(a)listas.c3sl.ufpr.br Enviadas: Quarta-feira, 4 de Junho de 2014 15:49:27 Assunto: Re: [R-br] várias linhas em um única coluna Exatamente Lucas a função melt é do pacote Reshape. Att.. 2014-06-04 15:27 GMT-03:00 <luc.souza(a)usp.br>: Rodrigo, obrigado. Essa função melt é do pacote reshape? Lucas Lucas F. de Souza Eng. Agrícola - CONAB M.Sc. Produção Vegetal - UENF Doutor em Agrometeorologia - ESALQ/USP tel: (19) 98160-7068 -------------------------------------------------------------------------- De: "Rodrigo Muniz" <uenf.rodrigo(a)gmail.com> Para: r-br(a)listas.c3sl.ufpr.br Enviadas: Quarta-feira, 4 de Junho de 2014 15:08:27 Assunto: Re: [R-br] várias linhas em um única coluna Considere o seguinte exemplo e veja se da certo para os seus dados. x=data.frame(rbind(runif(5), rbind(runif(5)))) t(x) melt(x) Att.. 2014-06-04 14:27 GMT-03:00 <luc.souza(a)usp.br>: Prezados, tenho uma planilha com várias linhas. Gostaria de colocar os dados dessas várias linhas, em uma única coluna, um após o outro. como pode ser feito isso? Obrigado Lucas Lucas F. de Souza Eng. Agrícola - CONAB M.Sc. Produção Vegetal - UENF Doutor em Agrometeorologia - ESALQ/USP tel: (19) 98160-7068 -------------------------------------------------------------------------------- _______________________________________________ R-br mailing list R-br(a)listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.

1 0

Re: [R-br] várias linhas em um única coluna
by Robert Iquiapaza 04 Jun '14

04 Jun '14

A função melt para data frames: x=data.frame(rbind(runif(5), rbind(runif(5)))) t(x) meltdf <- function (data, id.vars, measure.vars, variable_name = "variable", na.rm = !preserve.na, preserve.na = TRUE) { if (!missing(preserve.na)) message("Use of preserve.na is now deprecated, please use na.rm instead") var <- melt_check(data, id.vars, measure.vars) if (length(var$measure) == 0) { return(data[, var$id, drop = FALSE]) } ids <- data[, var$id, drop = FALSE] df <- do.call("rbind", lapply(var$measure, function(x) { data.frame(ids, x, data[, x]) })) names(df) <- c(names(ids), variable_name, "value") df[[variable_name]] <- factor(df[[variable_name]], unique(df[[variable_name]])) if (na.rm) { df <- df[!is.na(df$value), , drop = FALSE] } rownames(df) <- NULL df } meltdf(x) Sds From: luc.souza(a)usp.br Sent: Wednesday, June 04, 2014 3:56 PM To: r-br(a)listas.c3sl.ufpr.br Subject: Re: [R-br] várias linhas em um única coluna Obrigado. Mas como não tenho o pacote instalado, tenho um problema. Sou func. público e o proxy não deixa eu baixar o pacote. Estou procurando uma solução para isso, através do R, mas não estou conseguindo. Conhece algo a respeito de liberação do proxy no R? Obrigado Lucas Lucas F. de Souza Eng. Agrícola - CONAB M.Sc. Produção Vegetal - UENF Doutor em Agrometeorologia - ESALQ/USP tel: (19) 98160-7068 -------------------------------------------------------------------------------- De: "Rodrigo Muniz" <uenf.rodrigo(a)gmail.com> Para: r-br(a)listas.c3sl.ufpr.br Enviadas: Quarta-feira, 4 de Junho de 2014 15:49:27 Assunto: Re: [R-br] várias linhas em um única coluna Exatamente Lucas a função melt é do pacote Reshape. Att.. 2014-06-04 15:27 GMT-03:00 <luc.souza(a)usp.br>: Rodrigo, obrigado. Essa função melt é do pacote reshape? Lucas Lucas F. de Souza Eng. Agrícola - CONAB M.Sc. Produção Vegetal - UENF Doutor em Agrometeorologia - ESALQ/USP tel: (19) 98160-7068 ---------------------------------------------------------------------------- De: "Rodrigo Muniz" <uenf.rodrigo(a)gmail.com> Para: r-br(a)listas.c3sl.ufpr.br Enviadas: Quarta-feira, 4 de Junho de 2014 15:08:27 Assunto: Re: [R-br] várias linhas em um única coluna Considere o seguinte exemplo e veja se da certo para os seus dados. x=data.frame(rbind(runif(5), rbind(runif(5)))) t(x) melt(x) Att.. 2014-06-04 14:27 GMT-03:00 <luc.souza(a)usp.br>: Prezados, tenho uma planilha com várias linhas. Gostaria de colocar os dados dessas várias linhas, em uma única coluna, um após o outro. como pode ser feito isso? Obrigado Lucas Lucas F. de Souza Eng. Agrícola - CONAB M.Sc. Produção Vegetal - UENF Doutor em Agrometeorologia - ESALQ/USP tel: (19) 98160-7068 -------------------------------------------------------------------------------- _______________________________________________ R-br mailing list R-br(a)listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.

4 5

teste exato de Fisher
by Ze Henrique 04 Jun '14

04 Jun '14

Boa tarde, gostaria de saber se consigo aplicar o teste exato de Fisher usando o arquivo de dados abaixo. Já tentei alterar os valores do argumento workspace mas mesmo assim o erro persiste. data <- structure(list(V1 = c(2L, 1L, 0L, 6L, 1L, 4L, 4L, 4L, 4L, 6L, 7L, 1L, 0L, 4L, 1L, 4L, 0L, 1L, 0L, 0L), V2 = c(4L, 4L, 2L, 2L, 2L, 3L, 3L, 1L, 2L, 2L, 2L, 3L, 5L, 2L, 3L, 2L, 5L, 0L, 2L, 0L ), V3 = c(2L, 0L, 5L, 1L, 5L, 2L, 3L, 3L, 2L, 1L, 0L, 3L, 1L, 4L, 3L, 2L, 1L, 2L, 7L, 2L), V4 = c(2L, 5L, 3L, 1L, 2L, 1L, 0L, 2L, 2L, 1L, 1L, 1L, 4L, 0L, 3L, 2L, 4L, 7L, 1L, 8L)), .Names = c("V1", "V2", "V3", "V4"), class = "data.frame", row.names = c(NA, -20L )) fisher.test(data,workspace=1000e+300) Agradeço desde já pela ajuda. -- *José Henrique Soler Guilhen* Graduando em Agronomia Universidade Federal do Espírito Santo - CCAUFES

1 0

converter várias linhas em uma coluna
by luc.souza＠usp.br 04 Jun '14

04 Jun '14

Para reforçar minha dúvida: tenho a planilha com várias linhas linha 1- 1 2 3 4 5 6 7 linha 2- 0 5 6 4 3 3 2 linha 3- 8 6 4 0 3 2 1 gostaria de transformar para: coluna 1 coluna 2 1 0 2 5 3 6 4 4 5 3 6 3 7 2 1 8 2 6 3 4 4 0 5 3 6 2 7 1 Espero ter ajudado a melhorar a pergunta. Obrigado Lucas Lucas F. de Souza Eng. Agrícola - CONAB M.Sc. Produção Vegetal - UENF Doutor em Agrometeorologia - ESALQ/USP tel: (19) 98160-7068

2 1

estimador robusto do semivariograma- conceitual
by Hélio Gallo Rocha 04 Jun '14

04 Jun '14

Caros da lista, Uma dúvida conceitual Comparando os estimadores de semivariancia de Materon e de Cressie, observei que de há um acréscimo dos valores da semivariancia quando estimado por Cressie, principalmente nas semivariancias do patamar. Haveria alguma influência prática na interpolação? Grato, -- Hélio Gallo Rocha IFSULDEMINAS - Câmpus Muzambinho

2 2

Fuzzy Clustering
by Victor Eduardo 04 Jun '14

04 Jun '14

Galera, alguém tem algum material bom sobre Fuzzy Clustering no R? Estou tentando aplicar esse método num banco de dados que tenho, mas os resultados não estão me convencendo, acredito que esteja errado. O meu banco de dados tem uma variável quantitiva, 2 qualitativas e outras 4 variáveis que são notas (0 a 10). Preciso aplicar esse método a esse banco de dados, mas estou passando por problemas. Utilizei a função fanny Vi que existe um outro pacote chamado e1071. Alguém sabe como posso construir um gráfico através dos resultados do cmeans?

1 1

decimais
by Luiz Roberto Martins Pinto 03 Jun '14

03 Jun '14

Tenho os valores 2.345 -> preciso capturar somente as casas decimais, isto é, preciso de -> .345 2.567 -> preciso capturar somente as casas decimais, isto é, preciso de -> .567 como faço? Luiz Roberto. Luiz Roberto Martins Pinto Prof. Pleno/DCET/UESC Laboratório de Estatística Computacional Universidade Estadual de Santa Cruz Ilhéus-Bahia luizroberto.uesc(a)gmail.com skype: lrmpinto http://lattes.cnpq.br/2732314327604831

7 7