Displaying 3 results from an estimated 3 matches for "idcond".
2016 Jan 25
4
Corregir mismo ID para individuos diferentes en una serie temporal
...le o no que el individuo sea el mismo a lo largo del tiempo.
newID <-sapply(unique(database$ID_original), function(x) c(0,cumsum(diff(database$Month_Capt[database$ID_original==x]))%%48))names(newID)<-(unique(database$ID_original))
new_df<-data.frame(database$ID_original,database$Month_Capt,IDcond=NA,new_ID=NA)for(i in unique(database$ID_original)){ new_df[new_df[,1]==i,3]<-newID[[which(unique(database$ID_original)==i)]]}ltrs<-c(LETTERS,apply(combn(LETTERS,2,simplify = T),2,function(x) paste(x,sep = "",collapse = "")))
letterwrap <- function(n, depth = 1) { arg...
2016 Jan 26
2
Corregir mismo ID para individuos diferentes en una serie temporal
...o no que el individuo sea el mismo a lo largo del tiempo.
newID <-sapply(unique(database$ID_original), function(x) c(0,cumsum(diff(database$Month_Capt[database$ID_original==x]))%%48))names(newID)<-(unique(database$ID_original))
new_df<-data.frame(database$ID_original,database$Month_Capt,IDcond=NA,new_ID=NA)for(i in unique(database$ID_original)){ new_df[new_df[,1]==i,3]<-newID[[which(unique(database$ID_original)==i)]]}ltrs<-c(LETTERS,apply(combn(LETTERS,2,simplify = T),2,function(x) paste(x,sep = "",collapse = "")))
letterwrap <- function(n, depth = 1) { ar...
2016 Jan 26
2
Corregir mismo ID para individuos diferentes en una serie temporal
...o a lo largo del
>> tiempo.
>> newID <-sapply(unique(database$ID_original), function(x)
>> c(0,cumsum(diff(database$Month_Capt[database$ID_original==x]))%%48))names(newID)<-(unique(database$ID_original))
>> new_df<-data.frame(database$ID_original,database$Month_Capt,IDcond=NA,new_ID=NA)for(i
>> in unique(database$ID_original)){
>> new_df[new_df[,1]==i,3]<-newID[[which(unique(database$ID_original)==i)]]}ltrs<-c(LETTERS,apply(combn(LETTERS,2,simplify
>> = T),2,function(x) paste(x,sep = "",collapse = "")))
>> letterwrap...