[ [ ( NormalTok , "canMakeNoRecursion <-" )
, ( StringTok , " " )
, ( ControlFlowTok , "function" )
, ( NormalTok , "(x) {" )
]
, [ ( NormalTok , " x <-" )
, ( StringTok , " " )
, ( KeywordTok , "toupper" )
, ( NormalTok , "(x)" )
]
, [ ( NormalTok , " charList <-" )
, ( StringTok , " " )
, ( KeywordTok , "strsplit" )
, ( NormalTok , "(x, " )
, ( KeywordTok , "character" )
, ( NormalTok , "(" )
, ( DecValTok , "0" )
, ( NormalTok , "))" )
]
, [ ( NormalTok , " getCombos <-" )
, ( StringTok , " " )
, ( ControlFlowTok , "function" )
, ( NormalTok , "(chars) {" )
]
, [ ( NormalTok , " charBlocks <-" )
, ( StringTok , " " )
, ( KeywordTok , "data.matrix" )
, ( NormalTok , "(" )
, ( KeywordTok , "expand.grid" )
, ( NormalTok , "(" )
, ( KeywordTok , "lapply" )
, ( NormalTok , "(chars, " )
, ( ControlFlowTok , "function" )
, ( NormalTok , "(char) " )
, ( KeywordTok , "which" )
, ( NormalTok , "(blocks " )
, ( OperatorTok , "==" )
, ( StringTok , " " )
, ( NormalTok , "char, " )
, ( DataTypeTok , "arr.ind=" )
, ( OtherTok , "TRUE" )
, ( NormalTok , ")[, 1L])))" )
]
, [ ( NormalTok , " charBlocks <-" )
, ( StringTok , " " )
, ( NormalTok , "charBlocks[" )
, ( OperatorTok , "!" )
, ( KeywordTok , "apply" )
, ( NormalTok , "(charBlocks, " )
, ( DecValTok , "1" )
, ( NormalTok , ", " )
, ( ControlFlowTok , "function" )
, ( NormalTok , "(row) " )
, ( KeywordTok , "any" )
, ( NormalTok , "(" )
, ( KeywordTok , "duplicated" )
, ( NormalTok , "(row))), , drop=" )
, ( OtherTok , "FALSE" )
, ( NormalTok , "]" )
]
, [ ( NormalTok , " " )
, ( ControlFlowTok , "if" )
, ( NormalTok , " (" )
, ( KeywordTok , "dim" )
, ( NormalTok , "(charBlocks)[1L] " )
, ( OperatorTok , ">" )
, ( StringTok , " " )
, ( NormalTok , "0L) {" )
]
, [ ( NormalTok , " " )
, ( KeywordTok , "t" )
, ( NormalTok , "(" )
, ( KeywordTok , "apply" )
, ( NormalTok , "(charBlocks, " )
, ( DecValTok , "1" )
, ( NormalTok , ", " )
, ( ControlFlowTok , "function" )
, ( NormalTok , "(row) " )
, ( KeywordTok , "apply" )
, ( NormalTok , "(blocks[row, , " )
, ( DataTypeTok , "drop=" )
, ( OtherTok , "FALSE" )
, ( NormalTok , "], " )
, ( DecValTok , "1" )
, ( NormalTok , ", paste, " )
, ( DataTypeTok , "collapse=" )
, ( StringTok , "\"\"" )
, ( NormalTok , ")))" )
]
, [ ( NormalTok , " } " )
, ( ControlFlowTok , "else" )
, ( NormalTok , " {" )
]
, [ ( NormalTok , " " )
, ( KeywordTok , "character" )
, ( NormalTok , "(" )
, ( DecValTok , "0" )
, ( NormalTok , ")" )
]
, [ ( NormalTok , " }" ) ]
, [ ( NormalTok , " }" ) ]
, [ ( NormalTok , " " )
, ( KeywordTok , "setNames" )
, ( NormalTok , "(" )
, ( KeywordTok , "lapply" )
, ( NormalTok , "(charList, getCombos), x)" )
]
, [ ( NormalTok , "}" ) ]
, [ ( KeywordTok , "canMakeNoRecursion" )
, ( NormalTok , "(" )
, ( KeywordTok , "c" )
, ( NormalTok , "(" )
, ( StringTok , "\"A\"" )
, ( NormalTok , "," )
]
, [ ( NormalTok , " " )
, ( StringTok , "\"BARK\"" )
, ( NormalTok , "," )
]
, [ ( NormalTok , " " )
, ( StringTok , "\"BOOK\"" )
, ( NormalTok , "," )
]
, [ ( NormalTok , " " )
, ( StringTok , "\"TREAT\"" )
, ( NormalTok , "," )
]
, [ ( NormalTok , " " )
, ( StringTok , "\"COMMON\"" )
, ( NormalTok , "," )
]
, [ ( NormalTok , " " )
, ( StringTok , "\"SQUAD\"" )
, ( NormalTok , "," )
]
, [ ( NormalTok , " " )
, ( StringTok , "\"CONFUSE\"" )
, ( NormalTok , "))" )
]
]