Closed juansahe closed 9 years ago
When calling gts over a large colname the grouping fails to mapply since duplicates are dropped.
Lets begin with the following data.frame
bnames1 <- c("CO0993W01010011388888NA0001TF001001XXXXXXXPR0011", "CO0993W01110011388888NA0001TF001002XXXXXXXPR0012", "CO0994W02210011388888NA0001TF001003XXXXXXXPR0013", "CO0994W02310011388889NA0002TF001004XXXXXXXPR0014", "RE0995W01410011388889NA0002TF001005XXXXXXXPR0015", "RE0995W02510011388889NA0003TF001006XXXXXXXPR0016", "RE0996W03110011388889NA0003TF001007XXXXXXXPR0017", "WA0997W01210011388889NA0003TF001008XXXXXXXPR0018", "WA0998W01310011488898NA0004TF001009XXXXXXXPR0019", "WA0999W03410011488898NA0004TF001010XXXXXXXPR0010", "FL0983W01510011488898NA0004TF001011XXXXXXXPR0011", "FL0983W02110011488878NA0005TF001012XXXXXXXPR0011", "FL0983W02210011488878NA0005TF001013XXXXXXXPR0013", "IC0973W01310011488878NA0005TF001014XXXXXXXPR0011", "IC0972W01410011488878NA0006TF001015XXXXXXXPR0011", "IC0972W01510011488878NA0006TF001016XXXXXXXPR0011") bts1 <- matrix(ts(rnorm(160)), ncol = 16) colnames(bts1) <- bnames1 x1 <- gts(bts1, characters = list(c(2, 4, 3, 4), c(3, 5, 6, 15, 6)))
This will generate the following warning:
Warning message: In mapply(rep, as.list(gnames), times, SIMPLIFY = FALSE) : longer argument not a multiple of length of shorter
And the following groups with NA assignments
$G1 [1] "G1/CO" "G1/RE" "G1/WA" "G1/FL" "G1/IC" $G2 [1] "G2/CO0993" "G2/CO0994" "G2/RE0995" "G2/RE0996" "G2/WA0997" "G2/WA0998" "G2/WA0999" [8] "G2/FL0983" "G2/IC0973" "G2/IC0972" $G3 [1] "G3/CO0993W01" "G3/CO0994W02" "G3/RE0995W01" "G3/RE0995W02" "G3/RE0996W03" "G3/WA0997W01" [7] "G3/WA0998W01" "G3/WA0999W03" "G3/FL0983W01" "G3/FL0983W02" "G3/IC0973W01" "G3/IC0972W01" $G4 [1] "G4/CO0993W010100" "G4/CO0993W011100" "G4/CO0994W022100" "G4/CO0994W023100" [5] "G4/RE0995W014100" "G4/RE0995W025100" "G4/RE0996W031100" "G4/WA0997W012100" [9] "G4/WA0998W013100" "G4/WA0999W034100" "G4/FL0983W015100" "G4/FL0983W021100" [13] "G4/FL0983W022100" "G4/IC0973W013100" "G4/IC0972W014100" "G4/IC0972W015100" $G5 [1] "G5/113" "G5/114" $G6 [1] "G6/11388888" "G6/11388889" "G6/11488898" "G6/11488878" $G7 [1] "G7/11388888NA0001" "G7/11388889NA0002" "G7/11388889NA0003" "G7/11488898NA0004" [5] "G7/11488878NA0005" "G7/11488878NA0006" $G8 [1] "G8/11388888NA0001TF001001XXXXXXX" "G8/11388888NA0001TF001002XXXXXXX" [3] "G8/11388888NA0001TF001003XXXXXXX" "G8/11388889NA0002TF001004XXXXXXX" [5] "G8/11388889NA0002TF001005XXXXXXX" "G8/11388889NA0003TF001006XXXXXXX" [7] "G8/11388889NA0003TF001007XXXXXXX" "G8/11388889NA0003TF001008XXXXXXX" [9] "G8/11488898NA0004TF001009XXXXXXX" "G8/11488898NA0004TF001010XXXXXXX" [11] "G8/11488898NA0004TF001011XXXXXXX" "G8/11488878NA0005TF001012XXXXXXX" [13] "G8/11488878NA0005TF001013XXXXXXX" "G8/11488878NA0005TF001014XXXXXXX" [15] "G8/11488878NA0006TF001015XXXXXXX" "G8/11488878NA0006TF001016XXXXXXX" $G9 [1] "G9/11388888NA0001TF001001XXXXXXXPR0011" "G9/11388888NA0001TF001002XXXXXXXPR0012" [3] "G9/11388888NA0001TF001003XXXXXXXPR0013" "G9/11388889NA0002TF001004XXXXXXXPR0014" [5] "G9/11388889NA0002TF001005XXXXXXXPR0015" "G9/11388889NA0003TF001006XXXXXXXPR0016" [7] "G9/11388889NA0003TF001007XXXXXXXPR0017" "G9/11388889NA0003TF001008XXXXXXXPR0018" [9] "G9/11488898NA0004TF001009XXXXXXXPR0019" "G9/11488898NA0004TF001010XXXXXXXPR0010" [11] "G9/11488898NA0004TF001011XXXXXXXPR0011" "G9/11488878NA0005TF001012XXXXXXXPR0011" [13] "G9/11488878NA0005TF001013XXXXXXXPR0013" "G9/11488878NA0005TF001014XXXXXXXPR0011" [15] "G9/11488878NA0006TF001015XXXXXXXPR0011" "G9/11488878NA0006TF001016XXXXXXXPR0011" $G10 [1] "G10/CO113" "G10/RE113" "G10/WA113" "G10/WA114" "G10/FL114" "G10/IC114" $G11 [1] "G11/CO11388888" "G11/CO11388889" "G11/RE11388889" "G11/WA11388889" "G11/WA11488898" [6] "G11/FL11488898" "G11/FL11488878" "G11/IC11488878" $<NA> [1] "G1/CO11388888NA0001" "G1/CO11388889NA0002" "G1/RE11388889NA0002" "G1/RE11388889NA0003" [5] "G1/WA11388889NA0003" "G1/WA11488898NA0004" "G1/FL11488898NA0004" "G1/FL11488878NA0005" [9] "G1/IC11488878NA0005" "G1/IC11488878NA0006" $<NA> [1] "G2/CO11388888NA0001TF001001XXXXXXX" "G2/CO11388888NA0001TF001002XXXXXXX" [3] "G2/CO11388888NA0001TF001003XXXXXXX" "G2/CO11388889NA0002TF001004XXXXXXX" [5] "G2/RE11388889NA0002TF001005XXXXXXX" "G2/RE11388889NA0003TF001006XXXXXXX" [7] "G2/RE11388889NA0003TF001007XXXXXXX" "G2/WA11388889NA0003TF001008XXXXXXX" [9] "G2/WA11488898NA0004TF001009XXXXXXX" "G2/WA11488898NA0004TF001010XXXXXXX" [11] "G2/FL11488898NA0004TF001011XXXXXXX" "G2/FL11488878NA0005TF001012XXXXXXX" [13] "G2/FL11488878NA0005TF001013XXXXXXX" "G2/IC11488878NA0005TF001014XXXXXXX" [15] "G2/IC11488878NA0006TF001015XXXXXXX" "G2/IC11488878NA0006TF001016XXXXXXX" $<NA> [1] "G3/CO11388888NA0001TF001001XXXXXXXPR0011" "G3/CO11388888NA0001TF001002XXXXXXXPR0012" [3] "G3/CO11388888NA0001TF001003XXXXXXXPR0013" "G3/CO11388889NA0002TF001004XXXXXXXPR0014" [5] "G3/RE11388889NA0002TF001005XXXXXXXPR0015" "G3/RE11388889NA0003TF001006XXXXXXXPR0016" [7] "G3/RE11388889NA0003TF001007XXXXXXXPR0017" "G3/WA11388889NA0003TF001008XXXXXXXPR0018" [9] "G3/WA11488898NA0004TF001009XXXXXXXPR0019" "G3/WA11488898NA0004TF001010XXXXXXXPR0010" [11] "G3/FL11488898NA0004TF001011XXXXXXXPR0011" "G3/FL11488878NA0005TF001012XXXXXXXPR0011" [13] "G3/FL11488878NA0005TF001013XXXXXXXPR0013" "G3/IC11488878NA0005TF001014XXXXXXXPR0011" [15] "G3/IC11488878NA0006TF001015XXXXXXXPR0011" "G3/IC11488878NA0006TF001016XXXXXXXPR0011" $<NA> [1] "G4/CO0993113" "G4/CO0994113" "G4/RE0995113" "G4/RE0996113" "G4/WA0997113" "G4/WA0998114" [7] "G4/WA0999114" "G4/FL0983114" "G4/IC0973114" "G4/IC0972114" $<NA> [1] "G5/CO099311388888" "G5/CO099411388888" "G5/CO099411388889" "G5/RE099511388889" [5] "G5/RE099611388889" "G5/WA099711388889" "G5/WA099811488898" "G5/WA099911488898" [9] "G5/FL098311488898" "G5/FL098311488878" "G5/IC097311488878" "G5/IC097211488878" $<NA> [1] "G6/CO099311388888NA0001" "G6/CO099411388888NA0001" "G6/CO099411388889NA0002" [4] "G6/RE099511388889NA0002" "G6/RE099511388889NA0003" "G6/RE099611388889NA0003" [7] "G6/WA099711388889NA0003" "G6/WA099811488898NA0004" "G6/WA099911488898NA0004" [10] "G6/FL098311488898NA0004" "G6/FL098311488878NA0005" "G6/IC097311488878NA0005" [13] "G6/IC097211488878NA0006" $<NA> [1] "G7/CO099311388888NA0001TF001001XXXXXXX" "G7/CO099311388888NA0001TF001002XXXXXXX" [3] "G7/CO099411388888NA0001TF001003XXXXXXX" "G7/CO099411388889NA0002TF001004XXXXXXX" [5] "G7/RE099511388889NA0002TF001005XXXXXXX" "G7/RE099511388889NA0003TF001006XXXXXXX" [7] "G7/RE099611388889NA0003TF001007XXXXXXX" "G7/WA099711388889NA0003TF001008XXXXXXX" [9] "G7/WA099811488898NA0004TF001009XXXXXXX" "G7/WA099911488898NA0004TF001010XXXXXXX" [11] "G7/FL098311488898NA0004TF001011XXXXXXX" "G7/FL098311488878NA0005TF001012XXXXXXX" [13] "G7/FL098311488878NA0005TF001013XXXXXXX" "G7/IC097311488878NA0005TF001014XXXXXXX" [15] "G7/IC097211488878NA0006TF001015XXXXXXX" "G7/IC097211488878NA0006TF001016XXXXXXX" $<NA> [1] "G8/CO099311388888NA0001TF001001XXXXXXXPR0011" [2] "G8/CO099311388888NA0001TF001002XXXXXXXPR0012" [3] "G8/CO099411388888NA0001TF001003XXXXXXXPR0013" [4] "G8/CO099411388889NA0002TF001004XXXXXXXPR0014" [5] "G8/RE099511388889NA0002TF001005XXXXXXXPR0015" [6] "G8/RE099511388889NA0003TF001006XXXXXXXPR0016" [7] "G8/RE099611388889NA0003TF001007XXXXXXXPR0017" [8] "G8/WA099711388889NA0003TF001008XXXXXXXPR0018" [9] "G8/WA099811488898NA0004TF001009XXXXXXXPR0019" [10] "G8/WA099911488898NA0004TF001010XXXXXXXPR0010" [11] "G8/FL098311488898NA0004TF001011XXXXXXXPR0011" [12] "G8/FL098311488878NA0005TF001012XXXXXXXPR0011" [13] "G8/FL098311488878NA0005TF001013XXXXXXXPR0013" [14] "G8/IC097311488878NA0005TF001014XXXXXXXPR0011" [15] "G8/IC097211488878NA0006TF001015XXXXXXXPR0011" [16] "G8/IC097211488878NA0006TF001016XXXXXXXPR0011" $<NA> [1] "G9/CO0993W01113" "G9/CO0994W02113" "G9/RE0995W01113" "G9/RE0995W02113" "G9/RE0996W03113" [6] "G9/WA0997W01113" "G9/WA0998W01114" "G9/WA0999W03114" "G9/FL0983W01114" "G9/FL0983W02114" [11] "G9/IC0973W01114" "G9/IC0972W01114" $<NA> [1] "G10/CO0993W0111388888" "G10/CO0994W0211388888" "G10/CO0994W0211388889" [4] "G10/RE0995W0111388889" "G10/RE0995W0211388889" "G10/RE0996W0311388889" [7] "G10/WA0997W0111388889" "G10/WA0998W0111488898" "G10/WA0999W0311488898" [10] "G10/FL0983W0111488898" "G10/FL0983W0211488878" "G10/IC0973W0111488878" [13] "G10/IC0972W0111488878" $<NA> [1] "G11/CO0993W0111388888NA0001" "G11/CO0994W0211388888NA0001" "G11/CO0994W0211388889NA0002" [4] "G11/RE0995W0111388889NA0002" "G11/RE0995W0211388889NA0003" "G11/RE0996W0311388889NA0003" [7] "G11/WA0997W0111388889NA0003" "G11/WA0998W0111488898NA0004" "G11/WA0999W0311488898NA0004" [10] "G11/FL0983W0111488898NA0004" "G11/FL0983W0211488878NA0005" "G11/IC0973W0111488878NA0005" [13] "G11/IC0972W0111488878NA0006" $<NA> [1] "G1/CO0993W0111388888NA0001TF001001XXXXXXX" "G1/CO0993W0111388888NA0001TF001002XXXXXXX" [3] "G1/CO0994W0211388888NA0001TF001003XXXXXXX" "G1/CO0994W0211388889NA0002TF001004XXXXXXX" [5] "G1/RE0995W0111388889NA0002TF001005XXXXXXX" "G1/RE0995W0211388889NA0003TF001006XXXXXXX" [7] "G1/RE0996W0311388889NA0003TF001007XXXXXXX" "G1/WA0997W0111388889NA0003TF001008XXXXXXX" [9] "G1/WA0998W0111488898NA0004TF001009XXXXXXX" "G1/WA0999W0311488898NA0004TF001010XXXXXXX" [11] "G1/FL0983W0111488898NA0004TF001011XXXXXXX" "G1/FL0983W0211488878NA0005TF001012XXXXXXX" [13] "G1/FL0983W0211488878NA0005TF001013XXXXXXX" "G1/IC0973W0111488878NA0005TF001014XXXXXXX" [15] "G1/IC0972W0111488878NA0006TF001015XXXXXXX" "G1/IC0972W0111488878NA0006TF001016XXXXXXX" $<NA> [1] "G2/CO0993W0111388888NA0001TF001001XXXXXXXPR0011" [2] "G2/CO0993W0111388888NA0001TF001002XXXXXXXPR0012" [3] "G2/CO0994W0211388888NA0001TF001003XXXXXXXPR0013" [4] "G2/CO0994W0211388889NA0002TF001004XXXXXXXPR0014" [5] "G2/RE0995W0111388889NA0002TF001005XXXXXXXPR0015" [6] "G2/RE0995W0211388889NA0003TF001006XXXXXXXPR0016" [7] "G2/RE0996W0311388889NA0003TF001007XXXXXXXPR0017" [8] "G2/WA0997W0111388889NA0003TF001008XXXXXXXPR0018" [9] "G2/WA0998W0111488898NA0004TF001009XXXXXXXPR0019" [10] "G2/WA0999W0311488898NA0004TF001010XXXXXXXPR0010" [11] "G2/FL0983W0111488898NA0004TF001011XXXXXXXPR0011" [12] "G2/FL0983W0211488878NA0005TF001012XXXXXXXPR0011" [13] "G2/FL0983W0211488878NA0005TF001013XXXXXXXPR0013" [14] "G2/IC0973W0111488878NA0005TF001014XXXXXXXPR0011" [15] "G2/IC0972W0111488878NA0006TF001015XXXXXXXPR0011" [16] "G2/IC0972W0111488878NA0006TF001016XXXXXXXPR0011" $<NA> [1] "G3/CO0993W010100113" "G3/CO0993W011100113" "G3/CO0994W022100113" "G3/CO0994W023100113" [5] "G3/RE0995W014100113" "G3/RE0995W025100113" "G3/RE0996W031100113" "G3/WA0997W012100113" [9] "G3/WA0998W013100114" "G3/WA0999W034100114" "G3/FL0983W015100114" "G3/FL0983W021100114" [13] "G3/FL0983W022100114" "G3/IC0973W013100114" "G3/IC0972W014100114" "G3/IC0972W015100114" $<NA> [1] "G4/CO0993W01010011388888" "G4/CO0993W01110011388888" "G4/CO0994W02210011388888" [4] "G4/CO0994W02310011388889" "G4/RE0995W01410011388889" "G4/RE0995W02510011388889" [7] "G4/RE0996W03110011388889" "G4/WA0997W01210011388889" "G4/WA0998W01310011488898" [10] "G4/WA0999W03410011488898" "G4/FL0983W01510011488898" "G4/FL0983W02110011488878" [13] "G4/FL0983W02210011488878" "G4/IC0973W01310011488878" "G4/IC0972W01410011488878" [16] "G4/IC0972W01510011488878" $<NA> [1] "G5/CO0993W01010011388888NA0001" "G5/CO0993W01110011388888NA0001" [3] "G5/CO0994W02210011388888NA0001" "G5/CO0994W02310011388889NA0002" [5] "G5/RE0995W01410011388889NA0002" "G5/RE0995W02510011388889NA0003" [7] "G5/RE0996W03110011388889NA0003" "G5/WA0997W01210011388889NA0003" [9] "G5/WA0998W01310011488898NA0004" "G5/WA0999W03410011488898NA0004" [11] "G5/FL0983W01510011488898NA0004" "G5/FL0983W02110011488878NA0005" [13] "G5/FL0983W02210011488878NA0005" "G5/IC0973W01310011488878NA0005" [15] "G5/IC0972W01410011488878NA0006" "G5/IC0972W01510011488878NA0006" $<NA> [1] "G6/CO0993W01010011388888NA0001TF001001XXXXXXX" [2] "G6/CO0993W01110011388888NA0001TF001002XXXXXXX" [3] "G6/CO0994W02210011388888NA0001TF001003XXXXXXX" [4] "G6/CO0994W02310011388889NA0002TF001004XXXXXXX" [5] "G6/RE0995W01410011388889NA0002TF001005XXXXXXX" [6] "G6/RE0995W02510011388889NA0003TF001006XXXXXXX" [7] "G6/RE0996W03110011388889NA0003TF001007XXXXXXX" [8] "G6/WA0997W01210011388889NA0003TF001008XXXXXXX" [9] "G6/WA0998W01310011488898NA0004TF001009XXXXXXX" [10] "G6/WA0999W03410011488898NA0004TF001010XXXXXXX" [11] "G6/FL0983W01510011488898NA0004TF001011XXXXXXX" [12] "G6/FL0983W02110011488878NA0005TF001012XXXXXXX" [13] "G6/FL0983W02210011488878NA0005TF001013XXXXXXX" [14] "G6/IC0973W01310011488878NA0005TF001014XXXXXXX" [15] "G6/IC0972W01410011488878NA0006TF001015XXXXXXX" [16] "G6/IC0972W01510011488878NA0006TF001016XXXXXXX"
if the line in charge of duplicates in GmatrixG is removed
GmatrixG <- function(xmat) { if (is.character(xmat)) { # Convert character to integer gmat <- t(apply(xmat, 1, function(x) as.integer(factor(x, unique(x))))) } else { gmat <- xmat } # Insert the first & last rows nc.xmat <- ncol(xmat) gmat <- rbind(rep(1L, nc.xmat), gmat, seq(1L, nc.xmat)) #Remove line in charge of duplicates #gmat <- gmat[!duplicated(gmat), , drop = FALSE] # Remove possible duplicated return(structure(gmat, class = "gmatrix")) }
Then the groups are generated as expected
$G1 [1] "G1/CO" "G1/RE" "G1/WA" "G1/FL" "G1/IC" $G2 [1] "G2/CO0993" "G2/CO0994" "G2/RE0995" "G2/RE0996" "G2/WA0997" "G2/WA0998" "G2/WA0999" [8] "G2/FL0983" "G2/IC0973" "G2/IC0972" $G3 [1] "G3/CO0993W01" "G3/CO0994W02" "G3/RE0995W01" "G3/RE0995W02" "G3/RE0996W03" "G3/WA0997W01" [7] "G3/WA0998W01" "G3/WA0999W03" "G3/FL0983W01" "G3/FL0983W02" "G3/IC0973W01" "G3/IC0972W01" $G4 [1] "G4/CO0993W010100" "G4/CO0993W011100" "G4/CO0994W022100" "G4/CO0994W023100" [5] "G4/RE0995W014100" "G4/RE0995W025100" "G4/RE0996W031100" "G4/WA0997W012100" [9] "G4/WA0998W013100" "G4/WA0999W034100" "G4/FL0983W015100" "G4/FL0983W021100" [13] "G4/FL0983W022100" "G4/IC0973W013100" "G4/IC0972W014100" "G4/IC0972W015100" $G5 [1] "G5/113" "G5/114" $G6 [1] "G6/11388888" "G6/11388889" "G6/11488898" "G6/11488878" $G7 [1] "G7/11388888NA0001" "G7/11388889NA0002" "G7/11388889NA0003" "G7/11488898NA0004" [5] "G7/11488878NA0005" "G7/11488878NA0006" $G8 [1] "G8/11388888NA0001TF001001XXXXXXX" "G8/11388888NA0001TF001002XXXXXXX" [3] "G8/11388888NA0001TF001003XXXXXXX" "G8/11388889NA0002TF001004XXXXXXX" [5] "G8/11388889NA0002TF001005XXXXXXX" "G8/11388889NA0003TF001006XXXXXXX" [7] "G8/11388889NA0003TF001007XXXXXXX" "G8/11388889NA0003TF001008XXXXXXX" [9] "G8/11488898NA0004TF001009XXXXXXX" "G8/11488898NA0004TF001010XXXXXXX" [11] "G8/11488898NA0004TF001011XXXXXXX" "G8/11488878NA0005TF001012XXXXXXX" [13] "G8/11488878NA0005TF001013XXXXXXX" "G8/11488878NA0005TF001014XXXXXXX" [15] "G8/11488878NA0006TF001015XXXXXXX" "G8/11488878NA0006TF001016XXXXXXX" $G9 [1] "G9/11388888NA0001TF001001XXXXXXXPR0011" "G9/11388888NA0001TF001002XXXXXXXPR0012" [3] "G9/11388888NA0001TF001003XXXXXXXPR0013" "G9/11388889NA0002TF001004XXXXXXXPR0014" [5] "G9/11388889NA0002TF001005XXXXXXXPR0015" "G9/11388889NA0003TF001006XXXXXXXPR0016" [7] "G9/11388889NA0003TF001007XXXXXXXPR0017" "G9/11388889NA0003TF001008XXXXXXXPR0018" [9] "G9/11488898NA0004TF001009XXXXXXXPR0019" "G9/11488898NA0004TF001010XXXXXXXPR0010" [11] "G9/11488898NA0004TF001011XXXXXXXPR0011" "G9/11488878NA0005TF001012XXXXXXXPR0011" [13] "G9/11488878NA0005TF001013XXXXXXXPR0013" "G9/11488878NA0005TF001014XXXXXXXPR0011" [15] "G9/11488878NA0006TF001015XXXXXXXPR0011" "G9/11488878NA0006TF001016XXXXXXXPR0011" $G10 [1] "G10/CO113" "G10/RE113" "G10/WA113" "G10/WA114" "G10/FL114" "G10/IC114" $G11 [1] "G11/CO11388888" "G11/CO11388889" "G11/RE11388889" "G11/WA11388889" "G11/WA11488898" [6] "G11/FL11488898" "G11/FL11488878" "G11/IC11488878" $G12 [1] "G12/CO11388888NA0001" "G12/CO11388889NA0002" "G12/RE11388889NA0002" [4] "G12/RE11388889NA0003" "G12/WA11388889NA0003" "G12/WA11488898NA0004" [7] "G12/FL11488898NA0004" "G12/FL11488878NA0005" "G12/IC11488878NA0005" [10] "G12/IC11488878NA0006" $G13 [1] "G13/CO11388888NA0001TF001001XXXXXXX" "G13/CO11388888NA0001TF001002XXXXXXX" [3] "G13/CO11388888NA0001TF001003XXXXXXX" "G13/CO11388889NA0002TF001004XXXXXXX" [5] "G13/RE11388889NA0002TF001005XXXXXXX" "G13/RE11388889NA0003TF001006XXXXXXX" [7] "G13/RE11388889NA0003TF001007XXXXXXX" "G13/WA11388889NA0003TF001008XXXXXXX" [9] "G13/WA11488898NA0004TF001009XXXXXXX" "G13/WA11488898NA0004TF001010XXXXXXX" [11] "G13/FL11488898NA0004TF001011XXXXXXX" "G13/FL11488878NA0005TF001012XXXXXXX" [13] "G13/FL11488878NA0005TF001013XXXXXXX" "G13/IC11488878NA0005TF001014XXXXXXX" [15] "G13/IC11488878NA0006TF001015XXXXXXX" "G13/IC11488878NA0006TF001016XXXXXXX" $G14 [1] "G14/CO11388888NA0001TF001001XXXXXXXPR0011" "G14/CO11388888NA0001TF001002XXXXXXXPR0012" [3] "G14/CO11388888NA0001TF001003XXXXXXXPR0013" "G14/CO11388889NA0002TF001004XXXXXXXPR0014" [5] "G14/RE11388889NA0002TF001005XXXXXXXPR0015" "G14/RE11388889NA0003TF001006XXXXXXXPR0016" [7] "G14/RE11388889NA0003TF001007XXXXXXXPR0017" "G14/WA11388889NA0003TF001008XXXXXXXPR0018" [9] "G14/WA11488898NA0004TF001009XXXXXXXPR0019" "G14/WA11488898NA0004TF001010XXXXXXXPR0010" [11] "G14/FL11488898NA0004TF001011XXXXXXXPR0011" "G14/FL11488878NA0005TF001012XXXXXXXPR0011" [13] "G14/FL11488878NA0005TF001013XXXXXXXPR0013" "G14/IC11488878NA0005TF001014XXXXXXXPR0011" [15] "G14/IC11488878NA0006TF001015XXXXXXXPR0011" "G14/IC11488878NA0006TF001016XXXXXXXPR0011" $G15 [1] "G15/CO0993113" "G15/CO0994113" "G15/RE0995113" "G15/RE0996113" "G15/WA0997113" [6] "G15/WA0998114" "G15/WA0999114" "G15/FL0983114" "G15/IC0973114" "G15/IC0972114" $G16 [1] "G16/CO099311388888" "G16/CO099411388888" "G16/CO099411388889" "G16/RE099511388889" [5] "G16/RE099611388889" "G16/WA099711388889" "G16/WA099811488898" "G16/WA099911488898" [9] "G16/FL098311488898" "G16/FL098311488878" "G16/IC097311488878" "G16/IC097211488878" $G17 [1] "G17/CO099311388888NA0001" "G17/CO099411388888NA0001" "G17/CO099411388889NA0002" [4] "G17/RE099511388889NA0002" "G17/RE099511388889NA0003" "G17/RE099611388889NA0003" [7] "G17/WA099711388889NA0003" "G17/WA099811488898NA0004" "G17/WA099911488898NA0004" [10] "G17/FL098311488898NA0004" "G17/FL098311488878NA0005" "G17/IC097311488878NA0005" [13] "G17/IC097211488878NA0006" $G18 [1] "G18/CO099311388888NA0001TF001001XXXXXXX" "G18/CO099311388888NA0001TF001002XXXXXXX" [3] "G18/CO099411388888NA0001TF001003XXXXXXX" "G18/CO099411388889NA0002TF001004XXXXXXX" [5] "G18/RE099511388889NA0002TF001005XXXXXXX" "G18/RE099511388889NA0003TF001006XXXXXXX" [7] "G18/RE099611388889NA0003TF001007XXXXXXX" "G18/WA099711388889NA0003TF001008XXXXXXX" [9] "G18/WA099811488898NA0004TF001009XXXXXXX" "G18/WA099911488898NA0004TF001010XXXXXXX" [11] "G18/FL098311488898NA0004TF001011XXXXXXX" "G18/FL098311488878NA0005TF001012XXXXXXX" [13] "G18/FL098311488878NA0005TF001013XXXXXXX" "G18/IC097311488878NA0005TF001014XXXXXXX" [15] "G18/IC097211488878NA0006TF001015XXXXXXX" "G18/IC097211488878NA0006TF001016XXXXXXX" $G19 [1] "G19/CO099311388888NA0001TF001001XXXXXXXPR0011" [2] "G19/CO099311388888NA0001TF001002XXXXXXXPR0012" [3] "G19/CO099411388888NA0001TF001003XXXXXXXPR0013" [4] "G19/CO099411388889NA0002TF001004XXXXXXXPR0014" [5] "G19/RE099511388889NA0002TF001005XXXXXXXPR0015" [6] "G19/RE099511388889NA0003TF001006XXXXXXXPR0016" [7] "G19/RE099611388889NA0003TF001007XXXXXXXPR0017" [8] "G19/WA099711388889NA0003TF001008XXXXXXXPR0018" [9] "G19/WA099811488898NA0004TF001009XXXXXXXPR0019" [10] "G19/WA099911488898NA0004TF001010XXXXXXXPR0010" [11] "G19/FL098311488898NA0004TF001011XXXXXXXPR0011" [12] "G19/FL098311488878NA0005TF001012XXXXXXXPR0011" [13] "G19/FL098311488878NA0005TF001013XXXXXXXPR0013" [14] "G19/IC097311488878NA0005TF001014XXXXXXXPR0011" [15] "G19/IC097211488878NA0006TF001015XXXXXXXPR0011" [16] "G19/IC097211488878NA0006TF001016XXXXXXXPR0011" $G20 [1] "G20/CO0993W01113" "G20/CO0994W02113" "G20/RE0995W01113" "G20/RE0995W02113" [5] "G20/RE0996W03113" "G20/WA0997W01113" "G20/WA0998W01114" "G20/WA0999W03114" [9] "G20/FL0983W01114" "G20/FL0983W02114" "G20/IC0973W01114" "G20/IC0972W01114" $G21 [1] "G21/CO0993W0111388888" "G21/CO0994W0211388888" "G21/CO0994W0211388889" [4] "G21/RE0995W0111388889" "G21/RE0995W0211388889" "G21/RE0996W0311388889" [7] "G21/WA0997W0111388889" "G21/WA0998W0111488898" "G21/WA0999W0311488898" [10] "G21/FL0983W0111488898" "G21/FL0983W0211488878" "G21/IC0973W0111488878" [13] "G21/IC0972W0111488878" $G22 [1] "G22/CO0993W0111388888NA0001" "G22/CO0994W0211388888NA0001" "G22/CO0994W0211388889NA0002" [4] "G22/RE0995W0111388889NA0002" "G22/RE0995W0211388889NA0003" "G22/RE0996W0311388889NA0003" [7] "G22/WA0997W0111388889NA0003" "G22/WA0998W0111488898NA0004" "G22/WA0999W0311488898NA0004" [10] "G22/FL0983W0111488898NA0004" "G22/FL0983W0211488878NA0005" "G22/IC0973W0111488878NA0005" [13] "G22/IC0972W0111488878NA0006" $G23 [1] "G23/CO0993W0111388888NA0001TF001001XXXXXXX" "G23/CO0993W0111388888NA0001TF001002XXXXXXX" [3] "G23/CO0994W0211388888NA0001TF001003XXXXXXX" "G23/CO0994W0211388889NA0002TF001004XXXXXXX" [5] "G23/RE0995W0111388889NA0002TF001005XXXXXXX" "G23/RE0995W0211388889NA0003TF001006XXXXXXX" [7] "G23/RE0996W0311388889NA0003TF001007XXXXXXX" "G23/WA0997W0111388889NA0003TF001008XXXXXXX" [9] "G23/WA0998W0111488898NA0004TF001009XXXXXXX" "G23/WA0999W0311488898NA0004TF001010XXXXXXX" [11] "G23/FL0983W0111488898NA0004TF001011XXXXXXX" "G23/FL0983W0211488878NA0005TF001012XXXXXXX" [13] "G23/FL0983W0211488878NA0005TF001013XXXXXXX" "G23/IC0973W0111488878NA0005TF001014XXXXXXX" [15] "G23/IC0972W0111488878NA0006TF001015XXXXXXX" "G23/IC0972W0111488878NA0006TF001016XXXXXXX" $G24 [1] "G24/CO0993W0111388888NA0001TF001001XXXXXXXPR0011" [2] "G24/CO0993W0111388888NA0001TF001002XXXXXXXPR0012" [3] "G24/CO0994W0211388888NA0001TF001003XXXXXXXPR0013" [4] "G24/CO0994W0211388889NA0002TF001004XXXXXXXPR0014" [5] "G24/RE0995W0111388889NA0002TF001005XXXXXXXPR0015" [6] "G24/RE0995W0211388889NA0003TF001006XXXXXXXPR0016" [7] "G24/RE0996W0311388889NA0003TF001007XXXXXXXPR0017" [8] "G24/WA0997W0111388889NA0003TF001008XXXXXXXPR0018" [9] "G24/WA0998W0111488898NA0004TF001009XXXXXXXPR0019" [10] "G24/WA0999W0311488898NA0004TF001010XXXXXXXPR0010" [11] "G24/FL0983W0111488898NA0004TF001011XXXXXXXPR0011" [12] "G24/FL0983W0211488878NA0005TF001012XXXXXXXPR0011" [13] "G24/FL0983W0211488878NA0005TF001013XXXXXXXPR0013" [14] "G24/IC0973W0111488878NA0005TF001014XXXXXXXPR0011" [15] "G24/IC0972W0111488878NA0006TF001015XXXXXXXPR0011" [16] "G24/IC0972W0111488878NA0006TF001016XXXXXXXPR0011" $G25 [1] "G25/CO0993W010100113" "G25/CO0993W011100113" "G25/CO0994W022100113" [4] "G25/CO0994W023100113" "G25/RE0995W014100113" "G25/RE0995W025100113" [7] "G25/RE0996W031100113" "G25/WA0997W012100113" "G25/WA0998W013100114" [10] "G25/WA0999W034100114" "G25/FL0983W015100114" "G25/FL0983W021100114" [13] "G25/FL0983W022100114" "G25/IC0973W013100114" "G25/IC0972W014100114" [16] "G25/IC0972W015100114" $G26 [1] "G26/CO0993W01010011388888" "G26/CO0993W01110011388888" "G26/CO0994W02210011388888" [4] "G26/CO0994W02310011388889" "G26/RE0995W01410011388889" "G26/RE0995W02510011388889" [7] "G26/RE0996W03110011388889" "G26/WA0997W01210011388889" "G26/WA0998W01310011488898" [10] "G26/WA0999W03410011488898" "G26/FL0983W01510011488898" "G26/FL0983W02110011488878" [13] "G26/FL0983W02210011488878" "G26/IC0973W01310011488878" "G26/IC0972W01410011488878" [16] "G26/IC0972W01510011488878" $G27 [1] "G27/CO0993W01010011388888NA0001" "G27/CO0993W01110011388888NA0001" [3] "G27/CO0994W02210011388888NA0001" "G27/CO0994W02310011388889NA0002" [5] "G27/RE0995W01410011388889NA0002" "G27/RE0995W02510011388889NA0003" [7] "G27/RE0996W03110011388889NA0003" "G27/WA0997W01210011388889NA0003" [9] "G27/WA0998W01310011488898NA0004" "G27/WA0999W03410011488898NA0004" [11] "G27/FL0983W01510011488898NA0004" "G27/FL0983W02110011488878NA0005" [13] "G27/FL0983W02210011488878NA0005" "G27/IC0973W01310011488878NA0005" [15] "G27/IC0972W01410011488878NA0006" "G27/IC0972W01510011488878NA0006" $G28 [1] "G28/CO0993W01010011388888NA0001TF001001XXXXXXX" [2] "G28/CO0993W01110011388888NA0001TF001002XXXXXXX" [3] "G28/CO0994W02210011388888NA0001TF001003XXXXXXX" [4] "G28/CO0994W02310011388889NA0002TF001004XXXXXXX" [5] "G28/RE0995W01410011388889NA0002TF001005XXXXXXX" [6] "G28/RE0995W02510011388889NA0003TF001006XXXXXXX" [7] "G28/RE0996W03110011388889NA0003TF001007XXXXXXX" [8] "G28/WA0997W01210011388889NA0003TF001008XXXXXXX" [9] "G28/WA0998W01310011488898NA0004TF001009XXXXXXX" [10] "G28/WA0999W03410011488898NA0004TF001010XXXXXXX" [11] "G28/FL0983W01510011488898NA0004TF001011XXXXXXX" [12] "G28/FL0983W02110011488878NA0005TF001012XXXXXXX" [13] "G28/FL0983W02210011488878NA0005TF001013XXXXXXX" [14] "G28/IC0973W01310011488878NA0005TF001014XXXXXXX" [15] "G28/IC0972W01410011488878NA0006TF001015XXXXXXX" [16] "G28/IC0972W01510011488878NA0006TF001016XXXXXXX"
Ps: Sorry for the large example.
Nevermind, this is not a bug, just a bad naming scheme.
I have a similar error. But it is not because of naming. It might be due to missing combinations at different levels. Please refer the SO question.
http://stackoverflow.com/questions/40729669/r-gts-hts-converting-multiple-one-level-hierarchy-to-gts-object
When calling gts over a large colname the grouping fails to mapply since duplicates are dropped.
Lets begin with the following data.frame
This will generate the following warning:
And the following groups with NA assignments
if the line in charge of duplicates in GmatrixG is removed
Then the groups are generated as expected
Ps: Sorry for the large example.