# HG changeset patch # User petr-novak # Date 1565869729 14400 # Node ID ab56b34d67d8ee02f972042890057511c5a41527 # Parent ddc6bab2088918ff9daca037d1c83f8587631eba Uploaded diff -r ddc6bab20889 -r ab56b34d67d8 summarize_gff.R --- a/summarize_gff.R Thu Aug 15 07:20:12 2019 -0400 +++ b/summarize_gff.R Thu Aug 15 07:48:49 2019 -0400 @@ -24,7 +24,7 @@ if (any(short)){ gffattr_list[short] = lapply(gffattr_list[short],function(x) c(x, rep(NA, 13 - length(x)))) } - gffattr = as.data.frame(do.call(rbind, gffattr_list)) + gffattr = as.data.frame(do.call(rbind, gffattr_list), stringsAsFactors = FALSE) ## get attributes names attrnames = strsplit(dfraw[1,9],split=c("=|;"))[[1]][c(TRUE,FALSE)]