Oi Leonardo,

Obrigada pela sua ajuda.

Coloquei o arquivo rda no Dropbox. Veja se consegue abrir agora.

https://www.dropbox.com/s/wg5zmqud4q62yng/dataC.inia.rda?dl=0

Eu tenho duas ocasiões amostrais que deveriam ser equivalentes. Porém, na primeira (rep1C) tenho mais meses amostrados. Gostaria de preencher a segunda ocasião (rep2C) com os meses faltantes para que fique igual ao primeiro data.frame.

Estava tentando usar a função "rbind.fill" do pacote "plyr" mas sem sucesso.

Segue CMR atualizado:

#---------------------------------------------------------------------
## Building matrix for replicates
# Sampling 1
rep1C <- dataC.inia[dataC.inia$replicate == 1,]

table(rep1C$area, rep1C$season, rep1C$transect)
dim(rep1C)

# Sampling 2 
rep2C <- dataC.inia[dataC.inia$replicate == 2,]
table(rep2C$area, rep2C$season, rep2C$transect)
dim(rep2C)

comb.rep <- rbind.fill(rep1C, rep2C)
dim(comb.rep[comb.rep$replicate == '2',])

#---------------------------------------------------------------------

Obrigada,

Heloise


Em 25 de junho de 2016 16:32, Leonardo Fontenelle via R-br <r-br@listas.c3sl.ufpr.br> escreveu:
Tentei baixar o arquivo, mas o que chegou foi um arquivo vazio (zero byte).
 
Se o que você quer realmente é esticar um data.frame, você pode fazer algo assim:
 
df <- data.frame(x = rnorm(10), y = rbinom(10, 1, 0.5))
df[11:20, ] <- NA
df
 
Só que... Estou curioso para saber que tipo de problema você pretende resolver com isso.
 
Att,
 
 
 
Em Sáb 25 jun. 2016, às 12:20, Heloíse Pavanato via R-br escreveu:
Boa tarde,
 
Eu tenho dois data.frames com número de linhas diferentes (nrow(rep1C) = 73, nrow(rep2C) = 45), e colunas iguais (19).
Eu quero que ambos data.frames fiquem com a mesma dimensão. Para isso, rep2C deve ser aumentado com "NA". Porém, quero manter os mesmos índices "area", "season", "month" para ambos data.frames.
 
Alguém tem alguma idéia de que função usar?
 
Segue CMR:
 
#----------------------------------------------------------------------
 
## Load data
load('dataC.inia.rda')
 
## Building matrix for replicates
# Sampling 1
rep1C <- dataC.inia[dataC.inia$replicate == 1,]
 
table(rep1C$area, rep1C$season, rep1C$transect)
dim(rep1C)
 
# Sampling 2 
rep2 <- dataC.inia[dataC$replicate == 2,]
table(rep2$area, rep2$season, rep2$transect)
dim(rep2)
 
 #----------------------------------------------------------------------
 
Obrigada pela ajuda!
 
Heloise
_______________________________________________
R-br mailing list
Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
 

_______________________________________________
R-br mailing list
R-br@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.