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 <-
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),
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")
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
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
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é
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
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
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
É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
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
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
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,
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
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
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
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)
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
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
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
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
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 =
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
23 matches
Mail list logo