Re: [R-br] Multiplots usando lattice

2016-05-12 Por tôpico salah
Olá Marcos Talvez este exemplo lhe ajude library(lattice) # Data w <- as.matrix(dist(Loblolly)) x <- as.matrix(dist(HairEyeColor)) y <- as.matrix(dist(rock)) z <- as.matrix(dist(women)) # Plot assignments pw <- levelplot(w, scales = list(draw = FALSE)) # "scales..." removes axes px <-

[R-br] Multiplots usando lattice

2016-05-12 Por tôpico marcos paulo
Pessoal estou querendo plotar 4 gráficos na mesma janela gráfica,usando o pacote lattice pra confecção desses plots. Porém não estou conseguindo colocar mais que dois na mesma janela, usando a função print. Segue exemplo: g1<- xyplot(NDVI~DAE|Cultivar, data=dados, col=1, layout=c(5,1),

Re: [R-br] Colocar legenda sem borda

2016-05-12 Por tôpico Maurício Lordêlo
Segue uma sugestão: B<-matrix(c(578,1289, 439,1061),ncol=2) colnames(B)=c("Feminino","Masculino") rownames(B)=c("População","IBGE") barplot(B, beside=T,col=c("blue","limegreen"), main="",ylim=c(0,2000)) legend(x=5, y=1900,xpd=FALSE, legend=c("População","IBGE"),fill=c("blue","limegreen"),bty="n")

Re: [R-br] Modelo Misto - Parcela Subdividida em DIC

2016-05-12 Por tôpico Fernando Antonio de souza
Alisson e João muito obrigado pela atenção. Alisson eu havia pensado nesta solução que você apresentou, mas não estava muito seguro. Abraços === Fernando Souza Zootecnista, DSc. Produção e Alimentação Animal

Re: [R-br] Modelo Misto - Parcela Subdividida em DIC

2016-05-12 Por tôpico Alisson Lucrécio
Caro Fernando, A formulação mais adequada é o tempo para efeitos aleatorios. modelo <- lme(fixed=Y~A*B*Tempo, random=1|Tempo, data=dados) Você usaria parcela = tempo+K e modelo <- lme(fixed=Y~A*B*Tempo, random=1|parcela, data=dados) se você tivesse particionado sua parcela em 23 partes e em

[R-br] Colocar legenda sem borda

2016-05-12 Por tôpico Andre Oliveira
Boa tarde,como posso tirar borda desta legenda? Tentei bty="n" mas não deu certo! B<-matrix(c(578,1289, 439,1061),ncol=2) colnames(B)=c("Feminino","Masculino") rownames(B)=c("População","IBGE") barplot(B, beside=T,legend.text=TRUE,col=c(4,"limegreen"),   main="",ylim=c(0,2000)) Obrigado  André

Re: [R-br] Criar uma coluna de lancamentos de pesca

2016-05-12 Por tôpico Éder Comunello
Humberto, É provável que seja uma linha (ou mais) em duplicidade para os 4 campos: boat, ano, mes e dia. ?duplicated ​ Éder Comunello Agronomist (UEM), MSc in Environ. Sciences (UEM) DSc in Agricultural Systems Engineering (USP/Esalq) Brazilian

Re: [R-br] Acessar microdados RAIS Estabelecimentos

2016-05-12 Por tôpico Éder Comunello
​Carlos, boa tarde! Eu dei uma olhada nos arquivos e de fato não batem. Acho que a melhor saída é a que o colega Rodrigo indicou. Mas se você estiver disposto a testar, poderia avaliar essa divisão que fiz. Teria que verificar se as colunas importadas estão coerentes com o dados

Re: [R-br] Acessar microdados RAIS Estabelecimentos

2016-05-12 Por tôpico Rodrigo Coster
Carlos, O MTE possui uma lista de e-mails para discussão relacionados aos dados da RAIS e CAGED, talvez tu tenha mais sucesso se fizer essa pergunta por la. Segue link: https://br.groups.yahoo.com/neo/groups/basesmte/info . Até 2013 (o último que eu li), os dados eram separados por ; 2016-05-12

Re: [R-br] Acessar microdados RAIS Estabelecimentos

2016-05-12 Por tôpico Carlos Andrade
Éder, Obrigado pela resposta. Também baixei este arquivo. Pelo que entendi os campos são descritos e informado o tamanho. Somando esses valores dá 87. Abrindo o arquivo txt vejo que são 172 colunas, com várias delas vazias no meio do registro. O arquivo de layout não está claro, não informa os

Re: [R-br] Modelo Misto - Parcela Subdividida em DIC

2016-05-12 Por tôpico João Henrique Caviglione
Olá Fernando, Sobre o delineamento que descreve, creio que o correto seja utilizar um *hierárquico *no lugar de subparcela, pois não é possível aleatorizar o tempo. pois é necessária aleatorizar a *subparcela *dentro da parcela. Ou seja o T1=10min sempre será antes do T2=20min. Entretanto

[R-br] Modelo Misto - Parcela Subdividida em DIC

2016-05-12 Por tôpico Fernando Antonio de souza
Caros colegas, estou com a seguinte dúvida e gostaria de discutir com vocês. Estou com dados de um experimento realizado em esquema de parcela subdividida em delineamento inteiramente casualizado. Há dois fatores experimentais A ( 2 níveis) e B (dois níveis) e a resposta Y foi medida

Re: [R-br] Tabela e Graficos no PDF

2016-05-12 Por tôpico Elias Carvalho
Obrigado pela sugestão Joao Rodrigo, mas não deu certo, acabou não gerando a tabela, tentei outras coisas até que achei a solução: *grid.newpage(); # from grid package, to start a new page* par(mfrow=c(1,1)) addtable2plot(-5, 35, nmatrix, bty = "n", display.rownames = FALSE, hlines = TRUE,

Re: [R-br] Uso de laços e while().

2016-05-12 Por tôpico Michelle Bau Graczyk
Oi Rodrigo e Augusto, muito obrigada, deu certo! Rodrigo, eu as vezes me "embanano" toda tentando usar o while e por isso acabo usando-o de modo errado e tento recorrer ao for(). Mas agora eu acho que entendi de vez: eu não preciso do for para dar continuidade ao laço ( eu achava que além do

Re: [R-br] Uso de laços e while().

2016-05-12 Por tôpico Rodrigo Coster
Michelle, Eu tinha me preocupado só com o erro enviado, não com o algoritmo. Olhando com mais atenção, vi que tu está usando o for() para algo que não pode ser feito com for() (ok, até pode, mas não é o ideal). O for() sempre vai passar por todos elementos do vetor informado, mas não é isso que

[R-br] RES: Criar uma coluna de lancamentos de pesca

2016-05-12 Por tôpico Humberto Hazin
Bom dia Eder, Muito obrigado pela ajuda acredito que funcionara agora. Rodei teu exemplo e deu certo, porém quando rodei nos meus dados acusou um erro. Eu vou verificar o que esse erro. De toda forma, muito obrigado! Error in `[<-.data.frame`(`*tmp*`, sel[ord], "lance", value = c(1L, 0L

Re: [R-br] Uso de laços e while().

2016-05-12 Por tôpico Augusto Ribas
Eu não consegui entender exatamente seu problema. Você poderia fornecer um exemplo de como são os dados de entrada, e o que tem que estar saindo? Mas pela sua descrição la em cima, você não quer fazer algo mais ou menos como no exemplo abaixo? v<-c(1,2,5,4,8,9,10,4,2,7,6,8,2) ts_objeto<-ts(v)

Re: [R-br] Uso de laços e while().

2016-05-12 Por tôpico Michelle Bau Graczyk
Oi Rodrigo, primeiro obrigada pela resposta. Acho que ainda não deu certo, porque eu tentei gravar os dados e olha como fica: > v<-c(1,2,5,4,8,9,10,4,2,7,6,8,2) > ts<-ts(v) > matrizz<-matrix(NA,13,2) > for(j in 1:10){ + + if(ts[j]>4){ + + vc<-10*ts[j] + matrizz[k,1]<-vc + for(k in

[R-br] Uso de laços e while().

2016-05-12 Por tôpico Michelle Bau Graczyk
Caros, bom dia, Estou com um problema de lógica de programação. O que eu esperava era o seguinte: se ts[j]>4, eu abro uma operação e ela só para quando ts[j]<4. Enquanto uma operação está aberta, não se pode abrir mais nenhuma. Para isso eu tentei fazer de duas formas, usando e não usando o

Re: [R-br] Acessar microdados RAIS Estabelecimentos

2016-05-12 Por tôpico Éder Comunello
Carlos, bom dia! Normalmente tem uma descrição do formato junto dos dados. Nesse caso não está no mesmo diretório, mas logo acima... ftp://ftp.mtps.gov.br/pdet/microdados/RAIS/RAIS_estabelecimento_layout.xls ​ Éder Comunello Agronomist (UEM), MSc

Re: [R-br] Tabela e Graficos no PDF

2016-05-12 Por tôpico joão Rodrigo Castro
Elias, Se a ideia é deixá-los separados, prq nao fechar o plot antes de gerar a tabela colocando mais um dev.off? Sds Em 12/05/2016 08:41, "Elias Carvalho" escreveu: > Pessoal > > Eu gerei uns gráficos e gostaria de imprimir uma tabela na primeira ou > última página, estou

[R-br] Tabela e Graficos no PDF

2016-05-12 Por tôpico Elias Carvalho
Pessoal Eu gerei uns gráficos e gostaria de imprimir uma tabela na primeira ou última página, estou usando o seguinte comando: par(mfrow=c(2,4)) imprimi gráficos ... par(mfrow=c(1,1)) addtable2plot(-5, -3, nmatrix, bty = "n", display.rownames = FALSE, hlines = TRUE, vlines =

Re: [R-br] Criar uma coluna de lancamentos de pesca

2016-05-12 Por tôpico Éder Comunello
Mauro, bom dia! O trecho que você executa é pra fazer isso mesmo. Faltou executar o trecho final do script. ​ Éder Comunello Agronomist (UEM), MSc in Environ. Sciences (UEM) DSc in Agricultural Systems Engineering (USP/Esalq) Brazilian