R : Copyright 2005, The R Foundation for Statistical Computing Version 2.1.1 (2005-06-20), ISBN 3-900051-07-0 R is free software and comes with ABSOLUTELY NO WARRANTY. You are welcome to redistribute it under certain conditions. Type 'license()' or 'licence()' for distribution details. R is a collaborative project with many contributors. Type 'contributors()' for more information and 'citation()' on how to cite R or R packages in publications. Type 'demo()' for some demos, 'help()' for on-line help, or 'help.start()' for a HTML browser interface to help. Type 'q()' to quit R. > ### *
> ### > attach(NULL, name = "CheckExEnv") > assign(".CheckExEnv", as.environment(2), pos = length(search())) # base > ## add some hooks to label plot pages for base and grid graphics > setHook("plot.new", ".newplot.hook") > setHook("persp", ".newplot.hook") > setHook("grid.newpage", ".gridplot.hook") > > assign("cleanEx", + function(env = .GlobalEnv) { + rm(list = ls(envir = env, all.names = TRUE), envir = env) + RNGkind("default", "default") + set.seed(1) + options(warn = 1) + delayedAssign("T", stop("T used instead of TRUE"), + assign.env = .CheckExEnv) + delayedAssign("F", stop("F used instead of FALSE"), + assign.env = .CheckExEnv) + sch <- search() + newitems <- sch[! sch %in% .oldSearch] + for(item in rev(newitems)) + eval(substitute(detach(item), list(item=item))) + missitems <- .oldSearch[! .oldSearch %in% sch] + if(length(missitems)) + warning("items ", paste(missitems, collapse=", "), + " have been removed from the search path") + }, + env = .CheckExEnv) > assign("..nameEx", "__{must remake R-ex/*.R}__", env = .CheckExEnv) # for now > assign("ptime", proc.time(), env = .CheckExEnv) > grDevices::postscript("combinat-Examples.ps") > assign("par.postscript", graphics::par(no.readonly = TRUE), env = .CheckExEnv) > options(contrasts = c(unordered = "contr.treatment", ordered = "contr.poly")) > options(warn = 1) > library('combinat') > > assign(".oldSearch", search(), env = .CheckExEnv) > assign(".oldNS", loadedNamespaces(), env = .CheckExEnv) > cleanEx(); ..nameEx <- "combn" > > ### * combn > > flush(stderr()); flush(stdout()) > > ### Name: combn > ### Title: Generate all combinations of the elements of x taken m at a > ### time. > ### Aliases: combn combn2 nCm > ### Keywords: models > > ### ** Examples > > combn(letters[1:4], 2) [,1] [,2] [,3] [,4] [,5] [,6] [1,] "a" "a" "a" "b" "b" "c" [2,] "b" "c" "d" "c" "d" "d" > combn(10, 5, min) # minimum value in each combination [1] 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 [38] 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 [75] 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 [112] 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 [149] 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 [186] 2 2 2 2 2 2 2 2 2 2 2 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 [223] 3 3 3 3 3 3 3 3 3 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 5 5 5 5 5 6 > # Different way of encoding points: > combn(c(1,1,1,1,2,2,2,3,3,4), 3, tabulate, nbins = 4) [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [,10] [,11] [,12] [,13] [,14] [1,] 3 3 2 2 2 2 2 2 3 2 2 2 2 2 [2,] 0 0 1 1 1 0 0 0 0 1 1 1 0 0 [3,] 0 0 0 0 0 1 1 0 0 0 0 0 1 1 [4,] 0 0 0 0 0 0 0 1 0 0 0 0 0 0 [,15] [,16] [,17] [,18] [,19] [,20] [,21] [,22] [,23] [,24] [,25] [,26] [1,] 2 2 2 2 2 2 2 1 1 1 1 1 [2,] 0 1 1 1 0 0 0 2 2 1 1 1 [3,] 0 0 0 0 1 1 0 0 0 1 1 0 [4,] 1 0 0 0 0 0 1 0 0 0 0 1 [,27] [,28] [,29] [,30] [,31] [,32] [,33] [,34] [,35] [,36] [,37] [,38] [1,] 1 1 1 1 1 1 1 1 1 1 3 2 [2,] 2 1 1 1 1 1 1 0 0 0 0 1 [3,] 0 1 1 0 1 1 0 2 1 1 0 0 [4,] 0 0 0 1 0 0 1 0 1 1 0 0 [,39] [,40] [,41] [,42] [,43] [,44] [,45] [,46] [,47] [,48] [,49] [,50] [1,] 2 2 2 2 2 2 2 2 2 2 2 1 [2,] 1 1 0 0 0 1 1 1 0 0 0 2 [3,] 0 0 1 1 0 0 0 0 1 1 0 0 [4,] 0 0 0 0 1 0 0 0 0 0 1 0 [,51] [,52] [,53] [,54] [,55] [,56] [,57] [,58] [,59] [,60] [,61] [,62] [1,] 1 1 1 1 1 1 1 1 1 1 1 1 [2,] 2 1 1 1 2 1 1 1 1 1 1 0 [3,] 0 1 1 0 0 1 1 0 1 1 0 2 [4,] 0 0 0 1 0 0 0 1 0 0 1 0 [,63] [,64] [,65] [,66] [,67] [,68] [,69] [,70] [,71] [,72] [,73] [,74] [1,] 1 1 2 2 2 2 2 2 1 1 1 1 [2,] 0 0 1 1 1 0 0 0 2 2 1 1 [3,] 1 1 0 0 0 1 1 0 0 0 1 1 [4,] 1 1 0 0 0 0 0 1 0 0 0 0 [,75] [,76] [,77] [,78] [,79] [,80] [,81] [,82] [,83] [,84] [,85] [,86] [1,] 1 1 1 1 1 1 1 1 1 1 1 1 [2,] 1 2 1 1 1 1 1 1 0 0 0 2 [3,] 0 0 1 1 0 1 1 0 2 1 1 0 [4,] 1 0 0 0 1 0 0 1 0 1 1 0 [,87] [,88] [,89] [,90] [,91] [,92] [,93] [,94] [,95] [,96] [,97] [,98] [1,] 1 1 1 1 1 1 1 1 1 1 1 1 [2,] 2 1 1 1 2 1 1 1 1 1 1 0 [3,] 0 1 1 0 0 1 1 0 1 1 0 2 [4,] 0 0 0 1 0 0 0 1 0 0 1 0 [,99] [,100] [,101] [,102] [,103] [,104] [,105] [,106] [,107] [,108] [1,] 1 1 0 0 0 0 0 0 0 0 [2,] 0 0 3 2 2 2 2 2 2 1 [3,] 1 1 0 1 1 0 1 1 0 2 [4,] 1 1 0 0 0 1 0 0 1 0 [,109] [,110] [,111] [,112] [,113] [,114] [,115] [,116] [,117] [,118] [1,] 0 0 0 0 0 0 0 0 0 0 [2,] 1 1 2 2 2 1 1 1 1 1 [3,] 1 1 1 1 0 2 1 1 2 1 [4,] 1 1 0 0 1 0 1 1 0 1 [,119] [,120] [1,] 0 0 [2,] 1 0 [3,] 1 2 [4,] 1 1 > #Compute support points and (scaled) probabilities for a > #Multivariate-Hypergeometric(n = 3, N = c(4,3,2,1)) p.f.: > # table.mat(t(combn(c(1,1,1,1,2,2,2,3,3,4), 3, tabulate,nbins=4))) > > > > cleanEx(); ..nameEx <- "dmnom" > > ### * dmnom > > flush(stderr()); flush(stdout()) > > ### Name: dmnom > ### Title: density of multinomial, and support functions > ### Aliases: dmnom fact logfact > ### Keywords: models > > ### ** Examples > > dmnom(c(1,1,4,4),10,c(.2,.2,.3,.3)) [1] 0.01653372 > > > > cleanEx(); ..nameEx <- "hcube" > > ### * hcube > > flush(stderr()); flush(stdout()) > > ### Name: hcube > ### Title: Generate all points on a hypercuboid lattice. > ### Aliases: hcube > ### Keywords: models > > ### ** Examples > > > > > cleanEx(); ..nameEx <- "nsimplex" > > ### * nsimplex > > flush(stderr()); flush(stdout()) > > ### Name: nsimplex > ### Title: Computes the number of points on a (p, n)-simplex lattice > ### Aliases: nsimplex > ### Keywords: models > > ### ** Examples > > nsimplex(3,5) [1] 21 > > > > cleanEx(); ..nameEx <- "permn" > > ### * permn > > flush(stderr()); flush(stdout()) > > ### Name: permn > ### Title: Generates all permutations of the elements of x > ### Aliases: permn > ### Keywords: models > > ### ** Examples > > # Convert output to a matrix of dim c(6, 720) > t(array(unlist(permn(6)), dim = c(6, gamma(7)))) [,1] [,2] [,3] [,4] [,5] [,6] [1,] 1 2 3 4 5 6 [2,] 1 2 3 4 6 5 [3,] 1 2 3 6 4 5 [4,] 1 2 6 3 4 5 [5,] 1 6 2 3 4 5 [6,] 6 1 2 3 4 5 [7,] 6 1 2 3 5 4 [8,] 1 6 2 3 5 4 [9,] 1 2 6 3 5 4 [10,] 1 2 3 6 5 4 [11,] 1 2 3 5 6 4 [12,] 1 2 3 5 4 6 [13,] 1 2 5 3 4 6 [14,] 1 2 5 3 6 4 [15,] 1 2 5 6 3 4 [16,] 1 2 6 5 3 4 [17,] 1 6 2 5 3 4 [18,] 6 1 2 5 3 4 [19,] 6 1 5 2 3 4 [20,] 1 6 5 2 3 4 [21,] 1 5 6 2 3 4 [22,] 1 5 2 6 3 4 [23,] 1 5 2 3 6 4 [24,] 1 5 2 3 4 6 [25,] 5 1 2 3 4 6 [26,] 5 1 2 3 6 4 [27,] 5 1 2 6 3 4 [28,] 5 1 6 2 3 4 [29,] 5 6 1 2 3 4 [30,] 6 5 1 2 3 4 [31,] 6 5 1 2 4 3 [32,] 5 6 1 2 4 3 [33,] 5 1 6 2 4 3 [34,] 5 1 2 6 4 3 [35,] 5 1 2 4 6 3 [36,] 5 1 2 4 3 6 [37,] 1 5 2 4 3 6 [38,] 1 5 2 4 6 3 [39,] 1 5 2 6 4 3 [40,] 1 5 6 2 4 3 [41,] 1 6 5 2 4 3 [42,] 6 1 5 2 4 3 [43,] 6 1 2 5 4 3 [44,] 1 6 2 5 4 3 [45,] 1 2 6 5 4 3 [46,] 1 2 5 6 4 3 [47,] 1 2 5 4 6 3 [48,] 1 2 5 4 3 6 [49,] 1 2 4 5 3 6 [50,] 1 2 4 5 6 3 [51,] 1 2 4 6 5 3 [52,] 1 2 6 4 5 3 [53,] 1 6 2 4 5 3 [54,] 6 1 2 4 5 3 [55,] 6 1 2 4 3 5 [56,] 1 6 2 4 3 5 [57,] 1 2 6 4 3 5 [58,] 1 2 4 6 3 5 [59,] 1 2 4 3 6 5 [60,] 1 2 4 3 5 6 [61,] 1 4 2 3 5 6 [62,] 1 4 2 3 6 5 [63,] 1 4 2 6 3 5 [64,] 1 4 6 2 3 5 [65,] 1 6 4 2 3 5 [66,] 6 1 4 2 3 5 [67,] 6 1 4 2 5 3 [68,] 1 6 4 2 5 3 [69,] 1 4 6 2 5 3 [70,] 1 4 2 6 5 3 [71,] 1 4 2 5 6 3 [72,] 1 4 2 5 3 6 [73,] 1 4 5 2 3 6 [74,] 1 4 5 2 6 3 [75,] 1 4 5 6 2 3 [76,] 1 4 6 5 2 3 [77,] 1 6 4 5 2 3 [78,] 6 1 4 5 2 3 [79,] 6 1 5 4 2 3 [80,] 1 6 5 4 2 3 [81,] 1 5 6 4 2 3 [82,] 1 5 4 6 2 3 [83,] 1 5 4 2 6 3 [84,] 1 5 4 2 3 6 [85,] 5 1 4 2 3 6 [86,] 5 1 4 2 6 3 [87,] 5 1 4 6 2 3 [88,] 5 1 6 4 2 3 [89,] 5 6 1 4 2 3 [90,] 6 5 1 4 2 3 [91,] 6 5 4 1 2 3 [92,] 5 6 4 1 2 3 [93,] 5 4 6 1 2 3 [94,] 5 4 1 6 2 3 [95,] 5 4 1 2 6 3 [96,] 5 4 1 2 3 6 [97,] 4 5 1 2 3 6 [98,] 4 5 1 2 6 3 [99,] 4 5 1 6 2 3 [100,] 4 5 6 1 2 3 [101,] 4 6 5 1 2 3 [102,] 6 4 5 1 2 3 [103,] 6 4 1 5 2 3 [104,] 4 6 1 5 2 3 [105,] 4 1 6 5 2 3 [106,] 4 1 5 6 2 3 [107,] 4 1 5 2 6 3 [108,] 4 1 5 2 3 6 [109,] 4 1 2 5 3 6 [110,] 4 1 2 5 6 3 [111,] 4 1 2 6 5 3 [112,] 4 1 6 2 5 3 [113,] 4 6 1 2 5 3 [114,] 6 4 1 2 5 3 [115,] 6 4 1 2 3 5 [116,] 4 6 1 2 3 5 [117,] 4 1 6 2 3 5 [118,] 4 1 2 6 3 5 [119,] 4 1 2 3 6 5 [120,] 4 1 2 3 5 6 [121,] 4 1 3 2 5 6 [122,] 4 1 3 2 6 5 [123,] 4 1 3 6 2 5 [124,] 4 1 6 3 2 5 [125,] 4 6 1 3 2 5 [126,] 6 4 1 3 2 5 [127,] 6 4 1 3 5 2 [128,] 4 6 1 3 5 2 [129,] 4 1 6 3 5 2 [130,] 4 1 3 6 5 2 [131,] 4 1 3 5 6 2 [132,] 4 1 3 5 2 6 [133,] 4 1 5 3 2 6 [134,] 4 1 5 3 6 2 [135,] 4 1 5 6 3 2 [136,] 4 1 6 5 3 2 [137,] 4 6 1 5 3 2 [138,] 6 4 1 5 3 2 [139,] 6 4 5 1 3 2 [140,] 4 6 5 1 3 2 [141,] 4 5 6 1 3 2 [142,] 4 5 1 6 3 2 [143,] 4 5 1 3 6 2 [144,] 4 5 1 3 2 6 [145,] 5 4 1 3 2 6 [146,] 5 4 1 3 6 2 [147,] 5 4 1 6 3 2 [148,] 5 4 6 1 3 2 [149,] 5 6 4 1 3 2 [150,] 6 5 4 1 3 2 [151,] 6 5 1 4 3 2 [152,] 5 6 1 4 3 2 [153,] 5 1 6 4 3 2 [154,] 5 1 4 6 3 2 [155,] 5 1 4 3 6 2 [156,] 5 1 4 3 2 6 [157,] 1 5 4 3 2 6 [158,] 1 5 4 3 6 2 [159,] 1 5 4 6 3 2 [160,] 1 5 6 4 3 2 [161,] 1 6 5 4 3 2 [162,] 6 1 5 4 3 2 [163,] 6 1 4 5 3 2 [164,] 1 6 4 5 3 2 [165,] 1 4 6 5 3 2 [166,] 1 4 5 6 3 2 [167,] 1 4 5 3 6 2 [168,] 1 4 5 3 2 6 [169,] 1 4 3 5 2 6 [170,] 1 4 3 5 6 2 [171,] 1 4 3 6 5 2 [172,] 1 4 6 3 5 2 [173,] 1 6 4 3 5 2 [174,] 6 1 4 3 5 2 [175,] 6 1 4 3 2 5 [176,] 1 6 4 3 2 5 [177,] 1 4 6 3 2 5 [178,] 1 4 3 6 2 5 [179,] 1 4 3 2 6 5 [180,] 1 4 3 2 5 6 [181,] 1 3 4 2 5 6 [182,] 1 3 4 2 6 5 [183,] 1 3 4 6 2 5 [184,] 1 3 6 4 2 5 [185,] 1 6 3 4 2 5 [186,] 6 1 3 4 2 5 [187,] 6 1 3 4 5 2 [188,] 1 6 3 4 5 2 [189,] 1 3 6 4 5 2 [190,] 1 3 4 6 5 2 [191,] 1 3 4 5 6 2 [192,] 1 3 4 5 2 6 [193,] 1 3 5 4 2 6 [194,] 1 3 5 4 6 2 [195,] 1 3 5 6 4 2 [196,] 1 3 6 5 4 2 [197,] 1 6 3 5 4 2 [198,] 6 1 3 5 4 2 [199,] 6 1 5 3 4 2 [200,] 1 6 5 3 4 2 [201,] 1 5 6 3 4 2 [202,] 1 5 3 6 4 2 [203,] 1 5 3 4 6 2 [204,] 1 5 3 4 2 6 [205,] 5 1 3 4 2 6 [206,] 5 1 3 4 6 2 [207,] 5 1 3 6 4 2 [208,] 5 1 6 3 4 2 [209,] 5 6 1 3 4 2 [210,] 6 5 1 3 4 2 [211,] 6 5 1 3 2 4 [212,] 5 6 1 3 2 4 [213,] 5 1 6 3 2 4 [214,] 5 1 3 6 2 4 [215,] 5 1 3 2 6 4 [216,] 5 1 3 2 4 6 [217,] 1 5 3 2 4 6 [218,] 1 5 3 2 6 4 [219,] 1 5 3 6 2 4 [220,] 1 5 6 3 2 4 [221,] 1 6 5 3 2 4 [222,] 6 1 5 3 2 4 [223,] 6 1 3 5 2 4 [224,] 1 6 3 5 2 4 [225,] 1 3 6 5 2 4 [226,] 1 3 5 6 2 4 [227,] 1 3 5 2 6 4 [228,] 1 3 5 2 4 6 [229,] 1 3 2 5 4 6 [230,] 1 3 2 5 6 4 [231,] 1 3 2 6 5 4 [232,] 1 3 6 2 5 4 [233,] 1 6 3 2 5 4 [234,] 6 1 3 2 5 4 [235,] 6 1 3 2 4 5 [236,] 1 6 3 2 4 5 [237,] 1 3 6 2 4 5 [238,] 1 3 2 6 4 5 [239,] 1 3 2 4 6 5 [240,] 1 3 2 4 5 6 [241,] 3 1 2 4 5 6 [242,] 3 1 2 4 6 5 [243,] 3 1 2 6 4 5 [244,] 3 1 6 2 4 5 [245,] 3 6 1 2 4 5 [246,] 6 3 1 2 4 5 [247,] 6 3 1 2 5 4 [248,] 3 6 1 2 5 4 [249,] 3 1 6 2 5 4 [250,] 3 1 2 6 5 4 [251,] 3 1 2 5 6 4 [252,] 3 1 2 5 4 6 [253,] 3 1 5 2 4 6 [254,] 3 1 5 2 6 4 [255,] 3 1 5 6 2 4 [256,] 3 1 6 5 2 4 [257,] 3 6 1 5 2 4 [258,] 6 3 1 5 2 4 [259,] 6 3 5 1 2 4 [260,] 3 6 5 1 2 4 [261,] 3 5 6 1 2 4 [262,] 3 5 1 6 2 4 [263,] 3 5 1 2 6 4 [264,] 3 5 1 2 4 6 [265,] 5 3 1 2 4 6 [266,] 5 3 1 2 6 4 [267,] 5 3 1 6 2 4 [268,] 5 3 6 1 2 4 [269,] 5 6 3 1 2 4 [270,] 6 5 3 1 2 4 [271,] 6 5 3 1 4 2 [272,] 5 6 3 1 4 2 [273,] 5 3 6 1 4 2 [274,] 5 3 1 6 4 2 [275,] 5 3 1 4 6 2 [276,] 5 3 1 4 2 6 [277,] 3 5 1 4 2 6 [278,] 3 5 1 4 6 2 [279,] 3 5 1 6 4 2 [280,] 3 5 6 1 4 2 [281,] 3 6 5 1 4 2 [282,] 6 3 5 1 4 2 [283,] 6 3 1 5 4 2 [284,] 3 6 1 5 4 2 [285,] 3 1 6 5 4 2 [286,] 3 1 5 6 4 2 [287,] 3 1 5 4 6 2 [288,] 3 1 5 4 2 6 [289,] 3 1 4 5 2 6 [290,] 3 1 4 5 6 2 [291,] 3 1 4 6 5 2 [292,] 3 1 6 4 5 2 [293,] 3 6 1 4 5 2 [294,] 6 3 1 4 5 2 [295,] 6 3 1 4 2 5 [296,] 3 6 1 4 2 5 [297,] 3 1 6 4 2 5 [298,] 3 1 4 6 2 5 [299,] 3 1 4 2 6 5 [300,] 3 1 4 2 5 6 [301,] 3 4 1 2 5 6 [302,] 3 4 1 2 6 5 [303,] 3 4 1 6 2 5 [304,] 3 4 6 1 2 5 [305,] 3 6 4 1 2 5 [306,] 6 3 4 1 2 5 [307,] 6 3 4 1 5 2 [308,] 3 6 4 1 5 2 [309,] 3 4 6 1 5 2 [310,] 3 4 1 6 5 2 [311,] 3 4 1 5 6 2 [312,] 3 4 1 5 2 6 [313,] 3 4 5 1 2 6 [314,] 3 4 5 1 6 2 [315,] 3 4 5 6 1 2 [316,] 3 4 6 5 1 2 [317,] 3 6 4 5 1 2 [318,] 6 3 4 5 1 2 [319,] 6 3 5 4 1 2 [320,] 3 6 5 4 1 2 [321,] 3 5 6 4 1 2 [322,] 3 5 4 6 1 2 [323,] 3 5 4 1 6 2 [324,] 3 5 4 1 2 6 [325,] 5 3 4 1 2 6 [326,] 5 3 4 1 6 2 [327,] 5 3 4 6 1 2 [328,] 5 3 6 4 1 2 [329,] 5 6 3 4 1 2 [330,] 6 5 3 4 1 2 [331,] 6 5 4 3 1 2 [332,] 5 6 4 3 1 2 [333,] 5 4 6 3 1 2 [334,] 5 4 3 6 1 2 [335,] 5 4 3 1 6 2 [336,] 5 4 3 1 2 6 [337,] 4 5 3 1 2 6 [338,] 4 5 3 1 6 2 [339,] 4 5 3 6 1 2 [340,] 4 5 6 3 1 2 [341,] 4 6 5 3 1 2 [342,] 6 4 5 3 1 2 [343,] 6 4 3 5 1 2 [344,] 4 6 3 5 1 2 [345,] 4 3 6 5 1 2 [346,] 4 3 5 6 1 2 [347,] 4 3 5 1 6 2 [348,] 4 3 5 1 2 6 [349,] 4 3 1 5 2 6 [350,] 4 3 1 5 6 2 [351,] 4 3 1 6 5 2 [352,] 4 3 6 1 5 2 [353,] 4 6 3 1 5 2 [354,] 6 4 3 1 5 2 [355,] 6 4 3 1 2 5 [356,] 4 6 3 1 2 5 [357,] 4 3 6 1 2 5 [358,] 4 3 1 6 2 5 [359,] 4 3 1 2 6 5 [360,] 4 3 1 2 5 6 [361,] 4 3 2 1 5 6 [362,] 4 3 2 1 6 5 [363,] 4 3 2 6 1 5 [364,] 4 3 6 2 1 5 [365,] 4 6 3 2 1 5 [366,] 6 4 3 2 1 5 [367,] 6 4 3 2 5 1 [368,] 4 6 3 2 5 1 [369,] 4 3 6 2 5 1 [370,] 4 3 2 6 5 1 [371,] 4 3 2 5 6 1 [372,] 4 3 2 5 1 6 [373,] 4 3 5 2 1 6 [374,] 4 3 5 2 6 1 [375,] 4 3 5 6 2 1 [376,] 4 3 6 5 2 1 [377,] 4 6 3 5 2 1 [378,] 6 4 3 5 2 1 [379,] 6 4 5 3 2 1 [380,] 4 6 5 3 2 1 [381,] 4 5 6 3 2 1 [382,] 4 5 3 6 2 1 [383,] 4 5 3 2 6 1 [384,] 4 5 3 2 1 6 [385,] 5 4 3 2 1 6 [386,] 5 4 3 2 6 1 [387,] 5 4 3 6 2 1 [388,] 5 4 6 3 2 1 [389,] 5 6 4 3 2 1 [390,] 6 5 4 3 2 1 [391,] 6 5 3 4 2 1 [392,] 5 6 3 4 2 1 [393,] 5 3 6 4 2 1 [394,] 5 3 4 6 2 1 [395,] 5 3 4 2 6 1 [396,] 5 3 4 2 1 6 [397,] 3 5 4 2 1 6 [398,] 3 5 4 2 6 1 [399,] 3 5 4 6 2 1 [400,] 3 5 6 4 2 1 [401,] 3 6 5 4 2 1 [402,] 6 3 5 4 2 1 [403,] 6 3 4 5 2 1 [404,] 3 6 4 5 2 1 [405,] 3 4 6 5 2 1 [406,] 3 4 5 6 2 1 [407,] 3 4 5 2 6 1 [408,] 3 4 5 2 1 6 [409,] 3 4 2 5 1 6 [410,] 3 4 2 5 6 1 [411,] 3 4 2 6 5 1 [412,] 3 4 6 2 5 1 [413,] 3 6 4 2 5 1 [414,] 6 3 4 2 5 1 [415,] 6 3 4 2 1 5 [416,] 3 6 4 2 1 5 [417,] 3 4 6 2 1 5 [418,] 3 4 2 6 1 5 [419,] 3 4 2 1 6 5 [420,] 3 4 2 1 5 6 [421,] 3 2 4 1 5 6 [422,] 3 2 4 1 6 5 [423,] 3 2 4 6 1 5 [424,] 3 2 6 4 1 5 [425,] 3 6 2 4 1 5 [426,] 6 3 2 4 1 5 [427,] 6 3 2 4 5 1 [428,] 3 6 2 4 5 1 [429,] 3 2 6 4 5 1 [430,] 3 2 4 6 5 1 [431,] 3 2 4 5 6 1 [432,] 3 2 4 5 1 6 [433,] 3 2 5 4 1 6 [434,] 3 2 5 4 6 1 [435,] 3 2 5 6 4 1 [436,] 3 2 6 5 4 1 [437,] 3 6 2 5 4 1 [438,] 6 3 2 5 4 1 [439,] 6 3 5 2 4 1 [440,] 3 6 5 2 4 1 [441,] 3 5 6 2 4 1 [442,] 3 5 2 6 4 1 [443,] 3 5 2 4 6 1 [444,] 3 5 2 4 1 6 [445,] 5 3 2 4 1 6 [446,] 5 3 2 4 6 1 [447,] 5 3 2 6 4 1 [448,] 5 3 6 2 4 1 [449,] 5 6 3 2 4 1 [450,] 6 5 3 2 4 1 [451,] 6 5 3 2 1 4 [452,] 5 6 3 2 1 4 [453,] 5 3 6 2 1 4 [454,] 5 3 2 6 1 4 [455,] 5 3 2 1 6 4 [456,] 5 3 2 1 4 6 [457,] 3 5 2 1 4 6 [458,] 3 5 2 1 6 4 [459,] 3 5 2 6 1 4 [460,] 3 5 6 2 1 4 [461,] 3 6 5 2 1 4 [462,] 6 3 5 2 1 4 [463,] 6 3 2 5 1 4 [464,] 3 6 2 5 1 4 [465,] 3 2 6 5 1 4 [466,] 3 2 5 6 1 4 [467,] 3 2 5 1 6 4 [468,] 3 2 5 1 4 6 [469,] 3 2 1 5 4 6 [470,] 3 2 1 5 6 4 [471,] 3 2 1 6 5 4 [472,] 3 2 6 1 5 4 [473,] 3 6 2 1 5 4 [474,] 6 3 2 1 5 4 [475,] 6 3 2 1 4 5 [476,] 3 6 2 1 4 5 [477,] 3 2 6 1 4 5 [478,] 3 2 1 6 4 5 [479,] 3 2 1 4 6 5 [480,] 3 2 1 4 5 6 [481,] 2 3 1 4 5 6 [482,] 2 3 1 4 6 5 [483,] 2 3 1 6 4 5 [484,] 2 3 6 1 4 5 [485,] 2 6 3 1 4 5 [486,] 6 2 3 1 4 5 [487,] 6 2 3 1 5 4 [488,] 2 6 3 1 5 4 [489,] 2 3 6 1 5 4 [490,] 2 3 1 6 5 4 [491,] 2 3 1 5 6 4 [492,] 2 3 1 5 4 6 [493,] 2 3 5 1 4 6 [494,] 2 3 5 1 6 4 [495,] 2 3 5 6 1 4 [496,] 2 3 6 5 1 4 [497,] 2 6 3 5 1 4 [498,] 6 2 3 5 1 4 [499,] 6 2 5 3 1 4 [500,] 2 6 5 3 1 4 [501,] 2 5 6 3 1 4 [502,] 2 5 3 6 1 4 [503,] 2 5 3 1 6 4 [504,] 2 5 3 1 4 6 [505,] 5 2 3 1 4 6 [506,] 5 2 3 1 6 4 [507,] 5 2 3 6 1 4 [508,] 5 2 6 3 1 4 [509,] 5 6 2 3 1 4 [510,] 6 5 2 3 1 4 [511,] 6 5 2 3 4 1 [512,] 5 6 2 3 4 1 [513,] 5 2 6 3 4 1 [514,] 5 2 3 6 4 1 [515,] 5 2 3 4 6 1 [516,] 5 2 3 4 1 6 [517,] 2 5 3 4 1 6 [518,] 2 5 3 4 6 1 [519,] 2 5 3 6 4 1 [520,] 2 5 6 3 4 1 [521,] 2 6 5 3 4 1 [522,] 6 2 5 3 4 1 [523,] 6 2 3 5 4 1 [524,] 2 6 3 5 4 1 [525,] 2 3 6 5 4 1 [526,] 2 3 5 6 4 1 [527,] 2 3 5 4 6 1 [528,] 2 3 5 4 1 6 [529,] 2 3 4 5 1 6 [530,] 2 3 4 5 6 1 [531,] 2 3 4 6 5 1 [532,] 2 3 6 4 5 1 [533,] 2 6 3 4 5 1 [534,] 6 2 3 4 5 1 [535,] 6 2 3 4 1 5 [536,] 2 6 3 4 1 5 [537,] 2 3 6 4 1 5 [538,] 2 3 4 6 1 5 [539,] 2 3 4 1 6 5 [540,] 2 3 4 1 5 6 [541,] 2 4 3 1 5 6 [542,] 2 4 3 1 6 5 [543,] 2 4 3 6 1 5 [544,] 2 4 6 3 1 5 [545,] 2 6 4 3 1 5 [546,] 6 2 4 3 1 5 [547,] 6 2 4 3 5 1 [548,] 2 6 4 3 5 1 [549,] 2 4 6 3 5 1 [550,] 2 4 3 6 5 1 [551,] 2 4 3 5 6 1 [552,] 2 4 3 5 1 6 [553,] 2 4 5 3 1 6 [554,] 2 4 5 3 6 1 [555,] 2 4 5 6 3 1 [556,] 2 4 6 5 3 1 [557,] 2 6 4 5 3 1 [558,] 6 2 4 5 3 1 [559,] 6 2 5 4 3 1 [560,] 2 6 5 4 3 1 [561,] 2 5 6 4 3 1 [562,] 2 5 4 6 3 1 [563,] 2 5 4 3 6 1 [564,] 2 5 4 3 1 6 [565,] 5 2 4 3 1 6 [566,] 5 2 4 3 6 1 [567,] 5 2 4 6 3 1 [568,] 5 2 6 4 3 1 [569,] 5 6 2 4 3 1 [570,] 6 5 2 4 3 1 [571,] 6 5 4 2 3 1 [572,] 5 6 4 2 3 1 [573,] 5 4 6 2 3 1 [574,] 5 4 2 6 3 1 [575,] 5 4 2 3 6 1 [576,] 5 4 2 3 1 6 [577,] 4 5 2 3 1 6 [578,] 4 5 2 3 6 1 [579,] 4 5 2 6 3 1 [580,] 4 5 6 2 3 1 [581,] 4 6 5 2 3 1 [582,] 6 4 5 2 3 1 [583,] 6 4 2 5 3 1 [584,] 4 6 2 5 3 1 [585,] 4 2 6 5 3 1 [586,] 4 2 5 6 3 1 [587,] 4 2 5 3 6 1 [588,] 4 2 5 3 1 6 [589,] 4 2 3 5 1 6 [590,] 4 2 3 5 6 1 [591,] 4 2 3 6 5 1 [592,] 4 2 6 3 5 1 [593,] 4 6 2 3 5 1 [594,] 6 4 2 3 5 1 [595,] 6 4 2 3 1 5 [596,] 4 6 2 3 1 5 [597,] 4 2 6 3 1 5 [598,] 4 2 3 6 1 5 [599,] 4 2 3 1 6 5 [600,] 4 2 3 1 5 6 [601,] 4 2 1 3 5 6 [602,] 4 2 1 3 6 5 [603,] 4 2 1 6 3 5 [604,] 4 2 6 1 3 5 [605,] 4 6 2 1 3 5 [606,] 6 4 2 1 3 5 [607,] 6 4 2 1 5 3 [608,] 4 6 2 1 5 3 [609,] 4 2 6 1 5 3 [610,] 4 2 1 6 5 3 [611,] 4 2 1 5 6 3 [612,] 4 2 1 5 3 6 [613,] 4 2 5 1 3 6 [614,] 4 2 5 1 6 3 [615,] 4 2 5 6 1 3 [616,] 4 2 6 5 1 3 [617,] 4 6 2 5 1 3 [618,] 6 4 2 5 1 3 [619,] 6 4 5 2 1 3 [620,] 4 6 5 2 1 3 [621,] 4 5 6 2 1 3 [622,] 4 5 2 6 1 3 [623,] 4 5 2 1 6 3 [624,] 4 5 2 1 3 6 [625,] 5 4 2 1 3 6 [626,] 5 4 2 1 6 3 [627,] 5 4 2 6 1 3 [628,] 5 4 6 2 1 3 [629,] 5 6 4 2 1 3 [630,] 6 5 4 2 1 3 [631,] 6 5 2 4 1 3 [632,] 5 6 2 4 1 3 [633,] 5 2 6 4 1 3 [634,] 5 2 4 6 1 3 [635,] 5 2 4 1 6 3 [636,] 5 2 4 1 3 6 [637,] 2 5 4 1 3 6 [638,] 2 5 4 1 6 3 [639,] 2 5 4 6 1 3 [640,] 2 5 6 4 1 3 [641,] 2 6 5 4 1 3 [642,] 6 2 5 4 1 3 [643,] 6 2 4 5 1 3 [644,] 2 6 4 5 1 3 [645,] 2 4 6 5 1 3 [646,] 2 4 5 6 1 3 [647,] 2 4 5 1 6 3 [648,] 2 4 5 1 3 6 [649,] 2 4 1 5 3 6 [650,] 2 4 1 5 6 3 [651,] 2 4 1 6 5 3 [652,] 2 4 6 1 5 3 [653,] 2 6 4 1 5 3 [654,] 6 2 4 1 5 3 [655,] 6 2 4 1 3 5 [656,] 2 6 4 1 3 5 [657,] 2 4 6 1 3 5 [658,] 2 4 1 6 3 5 [659,] 2 4 1 3 6 5 [660,] 2 4 1 3 5 6 [661,] 2 1 4 3 5 6 [662,] 2 1 4 3 6 5 [663,] 2 1 4 6 3 5 [664,] 2 1 6 4 3 5 [665,] 2 6 1 4 3 5 [666,] 6 2 1 4 3 5 [667,] 6 2 1 4 5 3 [668,] 2 6 1 4 5 3 [669,] 2 1 6 4 5 3 [670,] 2 1 4 6 5 3 [671,] 2 1 4 5 6 3 [672,] 2 1 4 5 3 6 [673,] 2 1 5 4 3 6 [674,] 2 1 5 4 6 3 [675,] 2 1 5 6 4 3 [676,] 2 1 6 5 4 3 [677,] 2 6 1 5 4 3 [678,] 6 2 1 5 4 3 [679,] 6 2 5 1 4 3 [680,] 2 6 5 1 4 3 [681,] 2 5 6 1 4 3 [682,] 2 5 1 6 4 3 [683,] 2 5 1 4 6 3 [684,] 2 5 1 4 3 6 [685,] 5 2 1 4 3 6 [686,] 5 2 1 4 6 3 [687,] 5 2 1 6 4 3 [688,] 5 2 6 1 4 3 [689,] 5 6 2 1 4 3 [690,] 6 5 2 1 4 3 [691,] 6 5 2 1 3 4 [692,] 5 6 2 1 3 4 [693,] 5 2 6 1 3 4 [694,] 5 2 1 6 3 4 [695,] 5 2 1 3 6 4 [696,] 5 2 1 3 4 6 [697,] 2 5 1 3 4 6 [698,] 2 5 1 3 6 4 [699,] 2 5 1 6 3 4 [700,] 2 5 6 1 3 4 [701,] 2 6 5 1 3 4 [702,] 6 2 5 1 3 4 [703,] 6 2 1 5 3 4 [704,] 2 6 1 5 3 4 [705,] 2 1 6 5 3 4 [706,] 2 1 5 6 3 4 [707,] 2 1 5 3 6 4 [708,] 2 1 5 3 4 6 [709,] 2 1 3 5 4 6 [710,] 2 1 3 5 6 4 [711,] 2 1 3 6 5 4 [712,] 2 1 6 3 5 4 [713,] 2 6 1 3 5 4 [714,] 6 2 1 3 5 4 [715,] 6 2 1 3 4 5 [716,] 2 6 1 3 4 5 [717,] 2 1 6 3 4 5 [718,] 2 1 3 6 4 5 [719,] 2 1 3 4 6 5 [720,] 2 1 3 4 5 6 > # A check that every element occurs the same number of times in each > # position > apply(t(array(unlist(permn(6)), dim = c(6, gamma(7)))), 2, tabulate, + nbins = 6) [,1] [,2] [,3] [,4] [,5] [,6] [1,] 120 120 120 120 120 120 [2,] 120 120 120 120 120 120 [3,] 120 120 120 120 120 120 [4,] 120 120 120 120 120 120 [5,] 120 120 120 120 120 120 [6,] 120 120 120 120 120 120 > > # Apply, on the fly, the diff function to every permutation > t(array(unlist(permn(6, diff)), dim = c(5, gamma(7)))) [,1] [,2] [,3] [,4] [,5] [1,] 1 1 1 1 1 [2,] 1 1 1 2 -1 [3,] 1 1 3 -2 1 [4,] 1 4 -3 1 1 [5,] 5 -4 1 1 1 [6,] -5 1 1 1 1 [7,] -5 1 1 2 -1 [8,] 5 -4 1 2 -1 [9,] 1 4 -3 2 -1 [10,] 1 1 3 -1 -1 [11,] 1 1 2 1 -2 [12,] 1 1 2 -1 2 [13,] 1 3 -2 1 2 [14,] 1 3 -2 3 -2 [15,] 1 3 1 -3 1 [16,] 1 4 -1 -2 1 [17,] 5 -4 3 -2 1 [18,] -5 1 3 -2 1 [19,] -5 4 -3 1 1 [20,] 5 -1 -3 1 1 [21,] 4 1 -4 1 1 [22,] 4 -3 4 -3 1 [23,] 4 -3 1 3 -2 [24,] 4 -3 1 1 2 [25,] -4 1 1 1 2 [26,] -4 1 1 3 -2 [27,] -4 1 4 -3 1 [28,] -4 5 -4 1 1 [29,] 1 -5 1 1 1 [30,] -1 -4 1 1 1 [31,] -1 -4 1 2 -1 [32,] 1 -5 1 2 -1 [33,] -4 5 -4 2 -1 [34,] -4 1 4 -2 -1 [35,] -4 1 2 2 -3 [36,] -4 1 2 -1 3 [37,] 4 -3 2 -1 3 [38,] 4 -3 2 2 -3 [39,] 4 -3 4 -2 -1 [40,] 4 1 -4 2 -1 [41,] 5 -1 -3 2 -1 [42,] -5 4 -3 2 -1 [43,] -5 1 3 -1 -1 [44,] 5 -4 3 -1 -1 [45,] 1 4 -1 -1 -1 [46,] 1 3 1 -2 -1 [47,] 1 3 -1 2 -3 [48,] 1 3 -1 -1 3 [49,] 1 2 1 -2 3 [50,] 1 2 1 1 -3 [51,] 1 2 2 -1 -2 [52,] 1 4 -2 1 -2 [53,] 5 -4 2 1 -2 [54,] -5 1 2 1 -2 [55,] -5 1 2 -1 2 [56,] 5 -4 2 -1 2 [57,] 1 4 -2 -1 2 [58,] 1 2 2 -3 2 [59,] 1 2 -1 3 -1 [60,] 1 2 -1 2 1 [61,] 3 -2 1 2 1 [62,] 3 -2 1 3 -1 [63,] 3 -2 4 -3 2 [64,] 3 2 -4 1 2 [65,] 5 -2 -2 1 2 [66,] -5 3 -2 1 2 [67,] -5 3 -2 3 -2 [68,] 5 -2 -2 3 -2 [69,] 3 2 -4 3 -2 [70,] 3 -2 4 -1 -2 [71,] 3 -2 3 1 -3 [72,] 3 -2 3 -2 3 [73,] 3 1 -3 1 3 [74,] 3 1 -3 4 -3 [75,] 3 1 1 -4 1 [76,] 3 2 -1 -3 1 [77,] 5 -2 1 -3 1 [78,] -5 3 1 -3 1 [79,] -5 4 -1 -2 1 [80,] 5 -1 -1 -2 1 [81,] 4 1 -2 -2 1 [82,] 4 -1 2 -4 1 [83,] 4 -1 -2 4 -3 [84,] 4 -1 -2 1 3 [85,] -4 3 -2 1 3 [86,] -4 3 -2 4 -3 [87,] -4 3 2 -4 1 [88,] -4 5 -2 -2 1 [89,] 1 -5 3 -2 1 [90,] -1 -4 3 -2 1 [91,] -1 -1 -3 1 1 [92,] 1 -2 -3 1 1 [93,] -1 2 -5 1 1 [94,] -1 -3 5 -4 1 [95,] -1 -3 1 4 -3 [96,] -1 -3 1 1 3 [97,] 1 -4 1 1 3 [98,] 1 -4 1 4 -3 [99,] 1 -4 5 -4 1 [100,] 1 1 -5 1 1 [101,] 2 -1 -4 1 1 [102,] -2 1 -4 1 1 [103,] -2 -3 4 -3 1 [104,] 2 -5 4 -3 1 [105,] -3 5 -1 -3 1 [106,] -3 4 1 -4 1 [107,] -3 4 -3 4 -3 [108,] -3 4 -3 1 3 [109,] -3 1 3 -2 3 [110,] -3 1 3 1 -3 [111,] -3 1 4 -1 -2 [112,] -3 5 -4 3 -2 [113,] 2 -5 1 3 -2 [114,] -2 -3 1 3 -2 [115,] -2 -3 1 1 2 [116,] 2 -5 1 1 2 [117,] -3 5 -4 1 2 [118,] -3 1 4 -3 2 [119,] -3 1 1 3 -1 [120,] -3 1 1 2 1 [121,] -3 2 -1 3 1 [122,] -3 2 -1 4 -1 [123,] -3 2 3 -4 3 [124,] -3 5 -3 -1 3 [125,] 2 -5 2 -1 3 [126,] -2 -3 2 -1 3 [127,] -2 -3 2 2 -3 [128,] 2 -5 2 2 -3 [129,] -3 5 -3 2 -3 [130,] -3 2 3 -1 -3 [131,] -3 2 2 1 -4 [132,] -3 2 2 -3 4 [133,] -3 4 -2 -1 4 [134,] -3 4 -2 3 -4 [135,] -3 4 1 -3 -1 [136,] -3 5 -1 -2 -1 [137,] 2 -5 4 -2 -1 [138,] -2 -3 4 -2 -1 [139,] -2 1 -4 2 -1 [140,] 2 -1 -4 2 -1 [141,] 1 1 -5 2 -1 [142,] 1 -4 5 -3 -1 [143,] 1 -4 2 3 -4 [144,] 1 -4 2 -1 4 [145,] -1 -3 2 -1 4 [146,] -1 -3 2 3 -4 [147,] -1 -3 5 -3 -1 [148,] -1 2 -5 2 -1 [149,] 1 -2 -3 2 -1 [150,] -1 -1 -3 2 -1 [151,] -1 -4 3 -1 -1 [152,] 1 -5 3 -1 -1 [153,] -4 5 -2 -1 -1 [154,] -4 3 2 -3 -1 [155,] -4 3 -1 3 -4 [156,] -4 3 -1 -1 4 [157,] 4 -1 -1 -1 4 [158,] 4 -1 -1 3 -4 [159,] 4 -1 2 -3 -1 [160,] 4 1 -2 -1 -1 [161,] 5 -1 -1 -1 -1 [162,] -5 4 -1 -1 -1 [163,] -5 3 1 -2 -1 [164,] 5 -2 1 -2 -1 [165,] 3 2 -1 -2 -1 [166,] 3 1 1 -3 -1 [167,] 3 1 -2 3 -4 [168,] 3 1 -2 -1 4 [169,] 3 -1 2 -3 4 [170,] 3 -1 2 1 -4 [171,] 3 -1 3 -1 -3 [172,] 3 2 -3 2 -3 [173,] 5 -2 -1 2 -3 [174,] -5 3 -1 2 -3 [175,] -5 3 -1 -1 3 [176,] 5 -2 -1 -1 3 [177,] 3 2 -3 -1 3 [178,] 3 -1 3 -4 3 [179,] 3 -1 -1 4 -1 [180,] 3 -1 -1 3 1 [181,] 2 1 -2 3 1 [182,] 2 1 -2 4 -1 [183,] 2 1 2 -4 3 [184,] 2 3 -2 -2 3 [185,] 5 -3 1 -2 3 [186,] -5 2 1 -2 3 [187,] -5 2 1 1 -3 [188,] 5 -3 1 1 -3 [189,] 2 3 -2 1 -3 [190,] 2 1 2 -1 -3 [191,] 2 1 1 1 -4 [192,] 2 1 1 -3 4 [193,] 2 2 -1 -2 4 [194,] 2 2 -1 2 -4 [195,] 2 2 1 -2 -2 [196,] 2 3 -1 -1 -2 [197,] 5 -3 2 -1 -2 [198,] -5 2 2 -1 -2 [199,] -5 4 -2 1 -2 [200,] 5 -1 -2 1 -2 [201,] 4 1 -3 1 -2 [202,] 4 -2 3 -2 -2 [203,] 4 -2 1 2 -4 [204,] 4 -2 1 -2 4 [205,] -4 2 1 -2 4 [206,] -4 2 1 2 -4 [207,] -4 2 3 -2 -2 [208,] -4 5 -3 1 -2 [209,] 1 -5 2 1 -2 [210,] -1 -4 2 1 -2 [211,] -1 -4 2 -1 2 [212,] 1 -5 2 -1 2 [213,] -4 5 -3 -1 2 [214,] -4 2 3 -4 2 [215,] -4 2 -1 4 -2 [216,] -4 2 -1 2 2 [217,] 4 -2 -1 2 2 [218,] 4 -2 -1 4 -2 [219,] 4 -2 3 -4 2 [220,] 4 1 -3 -1 2 [221,] 5 -1 -2 -1 2 [222,] -5 4 -2 -1 2 [223,] -5 2 2 -3 2 [224,] 5 -3 2 -3 2 [225,] 2 3 -1 -3 2 [226,] 2 2 1 -4 2 [227,] 2 2 -3 4 -2 [228,] 2 2 -3 2 2 [229,] 2 -1 3 -1 2 [230,] 2 -1 3 1 -2 [231,] 2 -1 4 -1 -1 [232,] 2 3 -4 3 -1 [233,] 5 -3 -1 3 -1 [234,] -5 2 -1 3 -1 [235,] -5 2 -1 2 1 [236,] 5 -3 -1 2 1 [237,] 2 3 -4 2 1 [238,] 2 -1 4 -2 1 [239,] 2 -1 2 2 -1 [240,] 2 -1 2 1 1 [241,] -2 1 2 1 1 [242,] -2 1 2 2 -1 [243,] -2 1 4 -2 1 [244,] -2 5 -4 2 1 [245,] 3 -5 1 2 1 [246,] -3 -2 1 2 1 [247,] -3 -2 1 3 -1 [248,] 3 -5 1 3 -1 [249,] -2 5 -4 3 -1 [250,] -2 1 4 -1 -1 [251,] -2 1 3 1 -2 [252,] -2 1 3 -1 2 [253,] -2 4 -3 2 2 [254,] -2 4 -3 4 -2 [255,] -2 4 1 -4 2 [256,] -2 5 -1 -3 2 [257,] 3 -5 4 -3 2 [258,] -3 -2 4 -3 2 [259,] -3 2 -4 1 2 [260,] 3 -1 -4 1 2 [261,] 2 1 -5 1 2 [262,] 2 -4 5 -4 2 [263,] 2 -4 1 4 -2 [264,] 2 -4 1 2 2 [265,] -2 -2 1 2 2 [266,] -2 -2 1 4 -2 [267,] -2 -2 5 -4 2 [268,] -2 3 -5 1 2 [269,] 1 -3 -2 1 2 [270,] -1 -2 -2 1 2 [271,] -1 -2 -2 3 -2 [272,] 1 -3 -2 3 -2 [273,] -2 3 -5 3 -2 [274,] -2 -2 5 -2 -2 [275,] -2 -2 3 2 -4 [276,] -2 -2 3 -2 4 [277,] 2 -4 3 -2 4 [278,] 2 -4 3 2 -4 [279,] 2 -4 5 -2 -2 [280,] 2 1 -5 3 -2 [281,] 3 -1 -4 3 -2 [282,] -3 2 -4 3 -2 [283,] -3 -2 4 -1 -2 [284,] 3 -5 4 -1 -2 [285,] -2 5 -1 -1 -2 [286,] -2 4 1 -2 -2 [287,] -2 4 -1 2 -4 [288,] -2 4 -1 -2 4 [289,] -2 3 1 -3 4 [290,] -2 3 1 1 -4 [291,] -2 3 2 -1 -3 [292,] -2 5 -2 1 -3 [293,] 3 -5 3 1 -3 [294,] -3 -2 3 1 -3 [295,] -3 -2 3 -2 3 [296,] 3 -5 3 -2 3 [297,] -2 5 -2 -2 3 [298,] -2 3 2 -4 3 [299,] -2 3 -2 4 -1 [300,] -2 3 -2 3 1 [301,] 1 -3 1 3 1 [302,] 1 -3 1 4 -1 [303,] 1 -3 5 -4 3 [304,] 1 2 -5 1 3 [305,] 3 -2 -3 1 3 [306,] -3 1 -3 1 3 [307,] -3 1 -3 4 -3 [308,] 3 -2 -3 4 -3 [309,] 1 2 -5 4 -3 [310,] 1 -3 5 -1 -3 [311,] 1 -3 4 1 -4 [312,] 1 -3 4 -3 4 [313,] 1 1 -4 1 4 [314,] 1 1 -4 5 -4 [315,] 1 1 1 -5 1 [316,] 1 2 -1 -4 1 [317,] 3 -2 1 -4 1 [318,] -3 1 1 -4 1 [319,] -3 2 -1 -3 1 [320,] 3 -1 -1 -3 1 [321,] 2 1 -2 -3 1 [322,] 2 -1 2 -5 1 [323,] 2 -1 -3 5 -4 [324,] 2 -1 -3 1 4 [325,] -2 1 -3 1 4 [326,] -2 1 -3 5 -4 [327,] -2 1 2 -5 1 [328,] -2 3 -2 -3 1 [329,] 1 -3 1 -3 1 [330,] -1 -2 1 -3 1 [331,] -1 -1 -1 -2 1 [332,] 1 -2 -1 -2 1 [333,] -1 2 -3 -2 1 [334,] -1 -1 3 -5 1 [335,] -1 -1 -2 5 -4 [336,] -1 -1 -2 1 4 [337,] 1 -2 -2 1 4 [338,] 1 -2 -2 5 -4 [339,] 1 -2 3 -5 1 [340,] 1 1 -3 -2 1 [341,] 2 -1 -2 -2 1 [342,] -2 1 -2 -2 1 [343,] -2 -1 2 -4 1 [344,] 2 -3 2 -4 1 [345,] -1 3 -1 -4 1 [346,] -1 2 1 -5 1 [347,] -1 2 -4 5 -4 [348,] -1 2 -4 1 4 [349,] -1 -2 4 -3 4 [350,] -1 -2 4 1 -4 [351,] -1 -2 5 -1 -3 [352,] -1 3 -5 4 -3 [353,] 2 -3 -2 4 -3 [354,] -2 -1 -2 4 -3 [355,] -2 -1 -2 1 3 [356,] 2 -3 -2 1 3 [357,] -1 3 -5 1 3 [358,] -1 -2 5 -4 3 [359,] -1 -2 1 4 -1 [360,] -1 -2 1 3 1 [361,] -1 -1 -1 4 1 [362,] -1 -1 -1 5 -1 [363,] -1 -1 4 -5 4 [364,] -1 3 -4 -1 4 [365,] 2 -3 -1 -1 4 [366,] -2 -1 -1 -1 4 [367,] -2 -1 -1 3 -4 [368,] 2 -3 -1 3 -4 [369,] -1 3 -4 3 -4 [370,] -1 -1 4 -1 -4 [371,] -1 -1 3 1 -5 [372,] -1 -1 3 -4 5 [373,] -1 2 -3 -1 5 [374,] -1 2 -3 4 -5 [375,] -1 2 1 -4 -1 [376,] -1 3 -1 -3 -1 [377,] 2 -3 2 -3 -1 [378,] -2 -1 2 -3 -1 [379,] -2 1 -2 -1 -1 [380,] 2 -1 -2 -1 -1 [381,] 1 1 -3 -1 -1 [382,] 1 -2 3 -4 -1 [383,] 1 -2 -1 4 -5 [384,] 1 -2 -1 -1 5 [385,] -1 -1 -1 -1 5 [386,] -1 -1 -1 4 -5 [387,] -1 -1 3 -4 -1 [388,] -1 2 -3 -1 -1 [389,] 1 -2 -1 -1 -1 [390,] -1 -1 -1 -1 -1 [391,] -1 -2 1 -2 -1 [392,] 1 -3 1 -2 -1 [393,] -2 3 -2 -2 -1 [394,] -2 1 2 -4 -1 [395,] -2 1 -2 4 -5 [396,] -2 1 -2 -1 5 [397,] 2 -1 -2 -1 5 [398,] 2 -1 -2 4 -5 [399,] 2 -1 2 -4 -1 [400,] 2 1 -2 -2 -1 [401,] 3 -1 -1 -2 -1 [402,] -3 2 -1 -2 -1 [403,] -3 1 1 -3 -1 [404,] 3 -2 1 -3 -1 [405,] 1 2 -1 -3 -1 [406,] 1 1 1 -4 -1 [407,] 1 1 -3 4 -5 [408,] 1 1 -3 -1 5 [409,] 1 -2 3 -4 5 [410,] 1 -2 3 1 -5 [411,] 1 -2 4 -1 -4 [412,] 1 2 -4 3 -4 [413,] 3 -2 -2 3 -4 [414,] -3 1 -2 3 -4 [415,] -3 1 -2 -1 4 [416,] 3 -2 -2 -1 4 [417,] 1 2 -4 -1 4 [418,] 1 -2 4 -5 4 [419,] 1 -2 -1 5 -1 [420,] 1 -2 -1 4 1 [421,] -1 2 -3 4 1 [422,] -1 2 -3 5 -1 [423,] -1 2 2 -5 4 [424,] -1 4 -2 -3 4 [425,] 3 -4 2 -3 4 [426,] -3 -1 2 -3 4 [427,] -3 -1 2 1 -4 [428,] 3 -4 2 1 -4 [429,] -1 4 -2 1 -4 [430,] -1 2 2 -1 -4 [431,] -1 2 1 1 -5 [432,] -1 2 1 -4 5 [433,] -1 3 -1 -3 5 [434,] -1 3 -1 2 -5 [435,] -1 3 1 -2 -3 [436,] -1 4 -1 -1 -3 [437,] 3 -4 3 -1 -3 [438,] -3 -1 3 -1 -3 [439,] -3 2 -3 2 -3 [440,] 3 -1 -3 2 -3 [441,] 2 1 -4 2 -3 [442,] 2 -3 4 -2 -3 [443,] 2 -3 2 2 -5 [444,] 2 -3 2 -3 5 [445,] -2 -1 2 -3 5 [446,] -2 -1 2 2 -5 [447,] -2 -1 4 -2 -3 [448,] -2 3 -4 2 -3 [449,] 1 -3 -1 2 -3 [450,] -1 -2 -1 2 -3 [451,] -1 -2 -1 -1 3 [452,] 1 -3 -1 -1 3 [453,] -2 3 -4 -1 3 [454,] -2 -1 4 -5 3 [455,] -2 -1 -1 5 -2 [456,] -2 -1 -1 3 2 [457,] 2 -3 -1 3 2 [458,] 2 -3 -1 5 -2 [459,] 2 -3 4 -5 3 [460,] 2 1 -4 -1 3 [461,] 3 -1 -3 -1 3 [462,] -3 2 -3 -1 3 [463,] -3 -1 3 -4 3 [464,] 3 -4 3 -4 3 [465,] -1 4 -1 -4 3 [466,] -1 3 1 -5 3 [467,] -1 3 -4 5 -2 [468,] -1 3 -4 3 2 [469,] -1 -1 4 -1 2 [470,] -1 -1 4 1 -2 [471,] -1 -1 5 -1 -1 [472,] -1 4 -5 4 -1 [473,] 3 -4 -1 4 -1 [474,] -3 -1 -1 4 -1 [475,] -3 -1 -1 3 1 [476,] 3 -4 -1 3 1 [477,] -1 4 -5 3 1 [478,] -1 -1 5 -2 1 [479,] -1 -1 3 2 -1 [480,] -1 -1 3 1 1 [481,] 1 -2 3 1 1 [482,] 1 -2 3 2 -1 [483,] 1 -2 5 -2 1 [484,] 1 3 -5 3 1 [485,] 4 -3 -2 3 1 [486,] -4 1 -2 3 1 [487,] -4 1 -2 4 -1 [488,] 4 -3 -2 4 -1 [489,] 1 3 -5 4 -1 [490,] 1 -2 5 -1 -1 [491,] 1 -2 4 1 -2 [492,] 1 -2 4 -1 2 [493,] 1 2 -4 3 2 [494,] 1 2 -4 5 -2 [495,] 1 2 1 -5 3 [496,] 1 3 -1 -4 3 [497,] 4 -3 2 -4 3 [498,] -4 1 2 -4 3 [499,] -4 3 -2 -2 3 [500,] 4 -1 -2 -2 3 [501,] 3 1 -3 -2 3 [502,] 3 -2 3 -5 3 [503,] 3 -2 -2 5 -2 [504,] 3 -2 -2 3 2 [505,] -3 1 -2 3 2 [506,] -3 1 -2 5 -2 [507,] -3 1 3 -5 3 [508,] -3 4 -3 -2 3 [509,] 1 -4 1 -2 3 [510,] -1 -3 1 -2 3 [511,] -1 -3 1 1 -3 [512,] 1 -4 1 1 -3 [513,] -3 4 -3 1 -3 [514,] -3 1 3 -2 -3 [515,] -3 1 1 2 -5 [516,] -3 1 1 -3 5 [517,] 3 -2 1 -3 5 [518,] 3 -2 1 2 -5 [519,] 3 -2 3 -2 -3 [520,] 3 1 -3 1 -3 [521,] 4 -1 -2 1 -3 [522,] -4 3 -2 1 -3 [523,] -4 1 2 -1 -3 [524,] 4 -3 2 -1 -3 [525,] 1 3 -1 -1 -3 [526,] 1 2 1 -2 -3 [527,] 1 2 -1 2 -5 [528,] 1 2 -1 -3 5 [529,] 1 1 1 -4 5 [530,] 1 1 1 1 -5 [531,] 1 1 2 -1 -4 [532,] 1 3 -2 1 -4 [533,] 4 -3 1 1 -4 [534,] -4 1 1 1 -4 [535,] -4 1 1 -3 4 [536,] 4 -3 1 -3 4 [537,] 1 3 -2 -3 4 [538,] 1 1 2 -5 4 [539,] 1 1 -3 5 -1 [540,] 1 1 -3 4 1 [541,] 2 -1 -2 4 1 [542,] 2 -1 -2 5 -1 [543,] 2 -1 3 -5 4 [544,] 2 2 -3 -2 4 [545,] 4 -2 -1 -2 4 [546,] -4 2 -1 -2 4 [547,] -4 2 -1 2 -4 [548,] 4 -2 -1 2 -4 [549,] 2 2 -3 2 -4 [550,] 2 -1 3 -1 -4 [551,] 2 -1 2 1 -5 [552,] 2 -1 2 -4 5 [553,] 2 1 -2 -2 5 [554,] 2 1 -2 3 -5 [555,] 2 1 1 -3 -2 [556,] 2 2 -1 -2 -2 [557,] 4 -2 1 -2 -2 [558,] -4 2 1 -2 -2 [559,] -4 3 -1 -1 -2 [560,] 4 -1 -1 -1 -2 [561,] 3 1 -2 -1 -2 [562,] 3 -1 2 -3 -2 [563,] 3 -1 -1 3 -5 [564,] 3 -1 -1 -2 5 [565,] -3 2 -1 -2 5 [566,] -3 2 -1 3 -5 [567,] -3 2 2 -3 -2 [568,] -3 4 -2 -1 -2 [569,] 1 -4 2 -1 -2 [570,] -1 -3 2 -1 -2 [571,] -1 -1 -2 1 -2 [572,] 1 -2 -2 1 -2 [573,] -1 2 -4 1 -2 [574,] -1 -2 4 -3 -2 [575,] -1 -2 1 3 -5 [576,] -1 -2 1 -2 5 [577,] 1 -3 1 -2 5 [578,] 1 -3 1 3 -5 [579,] 1 -3 4 -3 -2 [580,] 1 1 -4 1 -2 [581,] 2 -1 -3 1 -2 [582,] -2 1 -3 1 -2 [583,] -2 -2 3 -2 -2 [584,] 2 -4 3 -2 -2 [585,] -2 4 -1 -2 -2 [586,] -2 3 1 -3 -2 [587,] -2 3 -2 3 -5 [588,] -2 3 -2 -2 5 [589,] -2 1 2 -4 5 [590,] -2 1 2 1 -5 [591,] -2 1 3 -1 -4 [592,] -2 4 -3 2 -4 [593,] 2 -4 1 2 -4 [594,] -2 -2 1 2 -4 [595,] -2 -2 1 -2 4 [596,] 2 -4 1 -2 4 [597,] -2 4 -3 -2 4 [598,] -2 1 3 -5 4 [599,] -2 1 -2 5 -1 [600,] -2 1 -2 4 1 [601,] -2 -1 2 2 1 [602,] -2 -1 2 3 -1 [603,] -2 -1 5 -3 2 [604,] -2 4 -5 2 2 [605,] 2 -4 -1 2 2 [606,] -2 -2 -1 2 2 [607,] -2 -2 -1 4 -2 [608,] 2 -4 -1 4 -2 [609,] -2 4 -5 4 -2 [610,] -2 -1 5 -1 -2 [611,] -2 -1 4 1 -3 [612,] -2 -1 4 -2 3 [613,] -2 3 -4 2 3 [614,] -2 3 -4 5 -3 [615,] -2 3 1 -5 2 [616,] -2 4 -1 -4 2 [617,] 2 -4 3 -4 2 [618,] -2 -2 3 -4 2 [619,] -2 1 -3 -1 2 [620,] 2 -1 -3 -1 2 [621,] 1 1 -4 -1 2 [622,] 1 -3 4 -5 2 [623,] 1 -3 -1 5 -3 [624,] 1 -3 -1 2 3 [625,] -1 -2 -1 2 3 [626,] -1 -2 -1 5 -3 [627,] -1 -2 4 -5 2 [628,] -1 2 -4 -1 2 [629,] 1 -2 -2 -1 2 [630,] -1 -1 -2 -1 2 [631,] -1 -3 2 -3 2 [632,] 1 -4 2 -3 2 [633,] -3 4 -2 -3 2 [634,] -3 2 2 -5 2 [635,] -3 2 -3 5 -3 [636,] -3 2 -3 2 3 [637,] 3 -1 -3 2 3 [638,] 3 -1 -3 5 -3 [639,] 3 -1 2 -5 2 [640,] 3 1 -2 -3 2 [641,] 4 -1 -1 -3 2 [642,] -4 3 -1 -3 2 [643,] -4 2 1 -4 2 [644,] 4 -2 1 -4 2 [645,] 2 2 -1 -4 2 [646,] 2 1 1 -5 2 [647,] 2 1 -4 5 -3 [648,] 2 1 -4 2 3 [649,] 2 -3 4 -2 3 [650,] 2 -3 4 1 -3 [651,] 2 -3 5 -1 -2 [652,] 2 2 -5 4 -2 [653,] 4 -2 -3 4 -2 [654,] -4 2 -3 4 -2 [655,] -4 2 -3 2 2 [656,] 4 -2 -3 2 2 [657,] 2 2 -5 2 2 [658,] 2 -3 5 -3 2 [659,] 2 -3 2 3 -1 [660,] 2 -3 2 2 1 [661,] -1 3 -1 2 1 [662,] -1 3 -1 3 -1 [663,] -1 3 2 -3 2 [664,] -1 5 -2 -1 2 [665,] 4 -5 3 -1 2 [666,] -4 -1 3 -1 2 [667,] -4 -1 3 1 -2 [668,] 4 -5 3 1 -2 [669,] -1 5 -2 1 -2 [670,] -1 3 2 -1 -2 [671,] -1 3 1 1 -3 [672,] -1 3 1 -2 3 [673,] -1 4 -1 -1 3 [674,] -1 4 -1 2 -3 [675,] -1 4 1 -2 -1 [676,] -1 5 -1 -1 -1 [677,] 4 -5 4 -1 -1 [678,] -4 -1 4 -1 -1 [679,] -4 3 -4 3 -1 [680,] 4 -1 -4 3 -1 [681,] 3 1 -5 3 -1 [682,] 3 -4 5 -2 -1 [683,] 3 -4 3 2 -3 [684,] 3 -4 3 -1 3 [685,] -3 -1 3 -1 3 [686,] -3 -1 3 2 -3 [687,] -3 -1 5 -2 -1 [688,] -3 4 -5 3 -1 [689,] 1 -4 -1 3 -1 [690,] -1 -3 -1 3 -1 [691,] -1 -3 -1 2 1 [692,] 1 -4 -1 2 1 [693,] -3 4 -5 2 1 [694,] -3 -1 5 -3 1 [695,] -3 -1 2 3 -2 [696,] -3 -1 2 1 2 [697,] 3 -4 2 1 2 [698,] 3 -4 2 3 -2 [699,] 3 -4 5 -3 1 [700,] 3 1 -5 2 1 [701,] 4 -1 -4 2 1 [702,] -4 3 -4 2 1 [703,] -4 -1 4 -2 1 [704,] 4 -5 4 -2 1 [705,] -1 5 -1 -2 1 [706,] -1 4 1 -3 1 [707,] -1 4 -2 3 -2 [708,] -1 4 -2 1 2 [709,] -1 2 2 -1 2 [710,] -1 2 2 1 -2 [711,] -1 2 3 -1 -1 [712,] -1 5 -3 2 -1 [713,] 4 -5 2 2 -1 [714,] -4 -1 2 2 -1 [715,] -4 -1 2 1 1 [716,] 4 -5 2 1 1 [717,] -1 5 -3 1 1 [718,] -1 2 3 -2 1 [719,] -1 2 1 2 -1 [720,] -1 2 1 1 1 > > > > cleanEx(); ..nameEx <- "rmultinomial" > > ### * rmultinomial > > flush(stderr()); flush(stdout()) > > ### Name: rmultinomial > ### Title: Generate random samples from multinomial distributions > ### Aliases: rmultinomial rmultz2 > ### Keywords: models > > ### ** Examples > > n <- c(100,20,10) > p <- matrix(c(.3,.1,.5,.1,.1,.2,.6,.8,.3),3) > rmultinomial(n,p) [,1] [,2] [,3] [1,] 37 6 57 [2,] 3 0 17 [3,] 6 1 3 > > > > cleanEx(); ..nameEx <- "x2u" > > ### * x2u > > flush(stderr()); flush(stdout()) > > ### Name: x2u > ### Title: Convert an x-encoded simplex-lattice point to a u-encoded > ### simplex-lattice point > ### Aliases: x2u > ### Keywords: models > > ### ** Examples > > > > > cleanEx(); ..nameEx <- "xsimplex" > > ### * xsimplex > > flush(stderr()); flush(stdout()) > > ### Name: xsimplex > ### Title: Generates all points on a (p,n) simplex lattice (i.e. a p-part > ### composition of n). > ### Aliases: xsimplex > ### Keywords: models > > ### ** Examples > > #Compute Multinomial(n = 4, pi = rep(1/3, 3)) p.f.: > xsimplex(3, 4, dmnom, prob=1/3) [1] 0.01234568 0.04938272 0.04938272 0.07407407 0.14814815 0.07407407 [7] 0.04938272 0.14814815 0.14814815 0.04938272 0.01234568 0.04938272 [13] 0.07407407 0.04938272 0.01234568 > > > > ### *