- R-br - DINF UFPR

índices de linha/coluna numa variável ou função no R
by alanarocha＠sapo.pt 04 Abr '13

04 Abr '13

Boa tarde, tenho um ficheiro com umas linhas e colunas: estes são os meus dados: 2012 JAN FEV MAR ABR MAI JUN JUL AGO SET OUT NOV DEZ Custo Tratamento (Fármacos, Análises e MCDs) Não Panakeia 23,62 28,31 22,46 22,03 27,66 20,92 21,28 25,64 20,38 19,96 30,07 17,6 % de doentes com Hemoglobina >= 10 gr/dl e <= 13 gr/dl Não Panakeia 75,0% 75,8% 77,6% 77,4% 77,1% 75,0% 75,3% 77,5% 78,3% 76,8% 75,8% 76,8% estou a fazer o seguinte código: setwd("f:/dados panakeia e não panakeia") dados<-read.table("Dados.csv",header=TRUE,sep=";",stringsAsFactors=FALSE,dec=",") for(i in 1:5){ dados[i]<-as.numeric(dados[i]) for(j in 1:13) { dados[j]<-as.real(gsub('%','',dados[j])) } } Error: (list) object cannot be coerced to type 'double' colnames(dados) <- c(2012,"Jan:Dez") dados não conheço o erro. Ana

2 1

file.append
by Alexandre Ribeiro Leichsenring 04 Abr '13

04 Abr '13

Olá a todos, Estou tendo dificuldades com a função file.append. Quando faço a concatenação de dois arquivos RData usando "file.append", vejo que o tamanho do arquivo resultante (em bytes) é igual à soma dos tamanhos dos arquivos originais. Porém, quando carrego o arquivo concatenado, aparece um objeto contendo somente os elementos do primeiro arquivo: > rm(list=ls()) > # Criando arquivo 1 > (df <- data.frame(x = letters[1:5], y = 1:5)) x y 1 a 1 2 b 2 3 c 3 4 d 4 5 e 5 > save(df, file = "df1.RData") > rm(df) > # Criando arquivo 2 > (df <- data.frame(x = LETTERS[1:5], y = 10*(1:5))) x y 1 A 10 2 B 20 3 C 30 4 D 40 5 E 50 > save(df, file = "df2.RData") > rm(df) > # Criando uma cópia do arquivo 1 > file.copy(from = "df1.RData", to = "df.RData", overwrite = T) [1] TRUE > > # Concatenando df2 em df. > file.append("df.RData", "df2.RData") [1] TRUE > file.info("df1.RData") *size *isdir mode mtime ctime atime exe df1.RData *177 *FALSE 666 2013-04-03 17:19:39 2013-04-03 16:52:49 2013-04-03 16:52:49 no > file.info("df2.RData") *size *isdir mode mtime ctime atime exe df2.RData *197 *FALSE 666 2013-04-03 17:19:39 2013-04-03 16:52:50 2013-04-03 16:52:50 no > file.info("df.RData") *size *isdir mode mtime ctime atime exe df.RData *374 *FALSE 666 2013-04-03 17:19:39 2013-04-03 16:56:50 2013-04-03 16:56:50 no > load("df.RData") > df x y 1 a 1 2 b 2 3 c 3 4 d 4 5 e 5 Alguém sabe dizer o que está acontecendo? Obrigado, Alexandre

3 7

R 3.0.0
by Thiago V. dos Santos 04 Abr '13

04 Abr '13

Pessoal, Alguém já testando o R v.3? Algum problema de falta de pacote, ou incompatibilidade de pacotes? Estou curioso para testar mas ao mesmo tempo não quero comprometer trabalhos em andamento se alguma coisa parar de funcionar. Saudações, Thiago.

5 7

Mapa com lat e long
by Edson Lira 03 Abr '13

03 Abr '13

Caros amigos, tenho um banco de dados com 910 observações com 17 variáveis, sendo duas a latitude e a longitude do local da coleta. O link abaixo é uma amostra do banco com algumas observações. http://www.datafilehost.com/download-9219b795.html O link abaixo é um arquivo zipado com os dados geográficos de Manaus (bairros.shp, bairros.dbf e etc) http://www.datafilehost.com/download-87046b14.html Gostaria de plotar mapas temáticos no R, um deles seria o mapa com a variável avaliação. No mapa colocar o nome e as avaliações por bairro e depois outro por zona geográfica Como plotar mapas com variaveis qualitativas? Exemplo, sexo, escolaridade, etc. Dei uma olhada no material do Jonas, mas não consegui replicar para meu conjunto de dados. Um abraço. Edson Lira Estatístico Manaus-Amazonas

1 0

[DIVULGAÇÃO] Versão preliminar de função para ajuste de modelos não lineares via interface gráfica
by Walmes Zeviani 03 Abr '13

03 Abr '13

Saudações listeiros, Venho por meio deste anunciar a versão preliminar da função que desenvolvi como parte de rotinas relacionado à minha Tese. A função permite o usuário ajustar modelos de regressão não linear controlando a posição da função por meio de deslizadores que alteram os valores dos parâmetros até que se possa a partir de então ajustar o modelo pela nls(). A interface gráfica é baseada nas funcionalidades do pacote rpanel. Essas implementações dão possibilidade para o usuário melhor conhecer o modelo, as propriedades da função e o significado dos parâmetros. Suas aplicações didáticas são inúmeras. A função está disponível no link https://dl.dropbox.com/u/48140237/rp.nlregression.R e um CMR com 7 exemplos está disponível em https://dl.dropbox.com/u/48140237/rp.nlregression_examples.R Gostaria que os interessados corressem os exemplos, que são reproduzíveis, e apontassem sugestões. Para convidá-los à experiência, a função cria uma interface gráfica tal como mostra essa figura animada em http://r-br.2285057.n4.nabble.com/ Dentre os 7 exemplos tem-se curvas de crescimento-temperatura, de água do solo, de lactação, de produtividade-nutrição, produtividade-desfolha. A intenção seria submeter à função ao mantenedor do rpanel para que componha o conjunto de funções deste. Uma implementação anterior à essa eu disponibilizei em https://ridiculas.wordpress.com/2012/12/07/interface-grafica-para-ajuste-de… Certo de vossa colaboração, agradeço. Walmes. ========================================================================== Walmes Marques Zeviani LEG (Laboratório de Estatística e Geoinformação, 25.450418 S, 49.231759 W) Departamento de Estatística - Universidade Federal do Paraná fone: (+55) 41 3361 3573 VoIP: (3361 3600) 1053 1173 e-mail: walmes(a)ufpr.br skype: walmeszeviani twitter: @walmeszeviani homepage: http://www.leg.ufpr.br/~walmes linux user number: 531218 ==========================================================================

3 3

problema TwitteR
by Vinicius Brito Rocha 03 Abr '13

03 Abr '13

Senhores, estou tentando usar o twitteR, especificamente a função searchTwitter e estou tendo esse erro Erro em twInterfaceObj$doAPICall(cmd, params, "GET", ...) : OAuth authentication is required with Twitter's API v1.1 alguém pode ajudar ? abs -- *Vinicius Brito Rocha.* *Estatístico e Atuário (IM / UFRJ)** Mestre em Pesquisa Operacional (COPPE / UFRJ)* www.aplicademic.blogspot.com http://twitter.com/viniciusbritor "Não se preocupe muito com as suas dificuldades em Matemática, posso assegurar-lhe que as minhas são ainda maiores." - Albert Einstein.

2 6

Variante do método seleção.
by Jackeline Bonetti Campos 02 Abr '13

02 Abr '13

Olá, O método de ordenação por seleção normal (onde o menor elemento é encontrado e colocado na primeira posição e assim consecutivamente até que todo o vetor seja ordenado) é dado pelo algoritmo: selecao<-function(vet){ tam<-length(vet) for(i in 1:tam) { pm<-which.min(vet[i:tam]) pm<-pm+i-1 temp<-vet[i] vet[i]<-vet[pm] vet[pm]<-temp } return(vet)} Como posso alterar esse código para que a busca seja feita pelo maior elemento e este seja colocado na última posição? Pensei em algo assim: selecao<-function(vet){ tam<-length(vet) for(i in tam:1) { pm<-which.max(vet[tam:i]) pm<-pm+ ?? temp<-vet[i] vet[i]<-vet[pm] vet[pm]<-temp } return(vet)} Porém, não sei que atribuição dar ao novo pm para que a ultima colocação seja desconsiderada. Agradeço desde já! Att,Jackeline

3 3

Identificando pontos em um plot
by Sérgio Henrique almeida da silva ju 02 Abr '13

02 Abr '13

Olá Qual comando eu uso pra identificar o nome de um ponto em um plot, quando eu uso o identify ele me mostra a posição da variável, mas eu gostaria que ele me mostrasse a variável "NOME" e não a posição de x. Como posso fazer? Banco NOME x 1 Agreste Alagoano 9 2 Agreste Paraibano 9 3 Agreste Pernambucano 30 4 Agreste Potiguar 3 5 Agreste Sergipano 4 6 Ara\xe7atuba 1 7 Araraquara 5 8 Assis 2 9 Baixadas 0 10 Baixo Amazonas 11 plot(x) identify????? -- Sérgio Henrique Almeida da Silva Junior Doutorando em Epidemiologia em Saúde Pública Escola Nacional de Saúde Pública Sérgio Arouca - ENSP/FIOCRUZ http://lattes.cnpq.br/1611345552843383 Tel: (21) 68463637 / 94429486

3 3

valores em percentagem
by alanarocha＠sapo.pt 02 Abr '13

02 Abr '13

Boa tarde, eu tenho este codigo: for (i in 2:6) { # Executa o comando a seguir para as colunas 2 a 6 (ano 2008 a 2012) dados[,i] <- as.real(gsub('%','',dados[,i])) # Tira o símbolo de percentual e transforma texto em número se eu quisesse que os valores apareçam com o simbolo de percentagem faço: for (i in 2:6) { # Executa o comando a seguir para as colunas 2 a 6 (ano 2008 a 2012) dados[,i] <- as.real('',dados[,i])) # Tira o símbolo de percentual e transforma texto em número } } exemplo 30% Com cumprimentos Ana Rocha

2 1

parcela subdividida
by Juraci Mendes Moreira 02 Abr '13

02 Abr '13

ola pessoal como faço anava em parcela subdividida com bloco agradeço a atenção

3 2