CRAN Package Check Results for Package Crossover

Last updated on 2019-12-22 11:47:14 CET.

Flavor Version Tinstall Tcheck Ttotal Status Flags
r-devel-linux-x86_64-debian-clang 0.1-18 41.88 171.34 213.22 ERROR
r-devel-linux-x86_64-debian-gcc 0.1-18 30.68 143.43 174.11 OK
r-devel-linux-x86_64-fedora-clang 0.1-18 282.26 OK
r-devel-linux-x86_64-fedora-gcc 0.1-18 278.06 OK
r-devel-windows-ix86+x86_64 0.1-18 89.00 8.00 97.00 ERROR
r-devel-windows-ix86+x86_64-gcc8 0.1-18 91.00 8.00 99.00 ERROR
r-patched-linux-x86_64 0.1-18 OK
r-patched-solaris-x86 0.1-18 300.40 ERROR
r-release-linux-x86_64 0.1-18 31.85 168.92 200.77 OK
r-release-windows-ix86+x86_64 0.1-18 84.00 0.00 84.00 FAIL
r-release-osx-x86_64 0.1-18 OK
r-oldrel-windows-ix86+x86_64 0.1-18 58.00 369.00 427.00 OK
r-oldrel-osx-x86_64 0.1-18 OK

Check Details

Version: 0.1-18
Check: examples
Result: ERROR
    Running examples in 'Crossover-Ex.R' failed
    The error most likely occurred in:
    
    > base::assign(".ptime", proc.time(), pos = "CheckExEnv")
    > ### Name: CrossoverSearchResult-class
    > ### Title: Class CrossoverSearchResult
    > ### Aliases: CrossoverSearchResult-class CrossoverSearchResult
    > ### show,CrossoverSearchResult-method print,CrossoverSearchResult-method
    >
    > ### ** Examples
    >
    >
    > # n=c(100,10) is very small, but it's just an example and should not take much time
    > x <- searchCrossOverDesign(s=9, p=5, v=4, model=4, n=c(100,10))
    > print(x)
    Crossover Search Result
    
    Design:
    Found by search algorithm (s=9, p=5, v=4)
     [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9]
    [1,] 4 2 2 3 3 1 4 1 4
    [2,] 3 3 1 4 4 1 1 2 2
    [3,] 1 2 3 1 4 2 3 4 1
    [4,] 2 1 1 4 1 2 2 3 3
    [5,] 4 4 4 2 1 3 2 3 3
    
    Av.eff.trt.pair.adj:
     ----------- FAILURE REPORT --------------
     --- failure: the condition has length > 1 ---
     --- srcref ---
    :
     --- package (from environment) ---
    Crossover
     --- call from context ---
    general.carryover(object@design, model = object@model)
     --- call from argument ---
    if (class(design) == "CrossoverSearchResult") {
     if (missing(model)) {
     model <- design@model
     }
     else {
     if (model != design@model)
     warning("Model from object does not equal specified model")
     }
     design <- design@design
    }
     --- R stacktrace ---
    where 1: general.carryover(object@design, model = object@model)
    where 2: print(general.carryover(object@design, model = object@model))
    where 3: (new("standardGeneric", .Data = function (object)
    standardGeneric("show"), generic = "show", package = "methods",
     group = list(), valueClass = character(0), signature = "object",
     default = new("derivedDefaultMethod", .Data = function (object)
     showDefault(object), target = new("signature", .Data = "ANY",
     names = "object", package = "methods"), defined = new("signature",
     .Data = "ANY", names = "object", package = "methods"),
     generic = "show"), skeleton = (new("derivedDefaultMethod",
     .Data = function (object)
     showDefault(object), target = new("signature", .Data = "ANY",
     names = "object", package = "methods"), defined = new("signature",
     .Data = "ANY", names = "object", package = "methods"),
     generic = "show"))(object)))(new("CrossoverDesign", design = c(4,
    3, 1, 2, 4, 2, 3, 2, 1, 4, 2, 1, 3, 1, 4, 3, 4, 1, 4, 2, 3, 4,
    4, 1, 1, 1, 1, 2, 2, 3, 4, 1, 3, 2, 2, 1, 2, 4, 3, 3, 4, 2, 1,
    3, 3), s = 9L, p = 5L, v = 4, model = 4, description = "Found by search algorithm",
     attr = list(), misc = list()))
    where 4: (new("standardGeneric", .Data = function (object)
    standardGeneric("show"), generic = "show", package = "methods",
     group = list(), valueClass = character(0), signature = "object",
     default = new("derivedDefaultMethod", .Data = function (object)
     showDefault(object), target = new("signature", .Data = "ANY",
     names = "object", package = "methods"), defined = new("signature",
     .Data = "ANY", names = "object", package = "methods"),
     generic = "show"), skeleton = (new("derivedDefaultMethod",
     .Data = function (object)
     showDefault(object), target = new("signature", .Data = "ANY",
     names = "object", package = "methods"), defined = new("signature",
     .Data = "ANY", names = "object", package = "methods"),
     generic = "show"))(object)))(new("CrossoverDesign", design = c(4,
    3, 1, 2, 4, 2, 3, 2, 1, 4, 2, 1, 3, 1, 4, 3, 4, 1, 4, 2, 3, 4,
    4, 1, 1, 1, 1, 2, 2, 3, 4, 1, 3, 2, 2, 1, 2, 4, 3, 3, 4, 2, 1,
    3, 3), s = 9L, p = 5L, v = 4, model = 4, description = "Found by search algorithm",
     attr = list(), misc = list()))
    where 5: print.default(x, ...)
    where 6: .nextMethod(x, ...)
    where 7: eval(call, callEnv)
    where 8: eval(call, callEnv)
    where 9: callNextMethod(x, ...)
    where 10: print(object@design)
    where 11: print(object@design)
    where 12: (new("standardGeneric", .Data = function (object)
    standardGeneric("show"), generic = "show", package = "methods",
     group = list(), valueClass = character(0), signature = "object",
     default = new("derivedDefaultMethod", .Data = function (object)
     showDefault(object), target = new("signature", .Data = "ANY",
     names = "object", package = "methods"), defined = new("signature",
     .Data = "ANY", names = "object", package = "methods"),
     generic = "show"), skeleton = (new("derivedDefaultMethod",
     .Data = function (object)
     showDefault(object), target = new("signature", .Data = "ANY",
     names = "object", package = "methods"), defined = new("signature",
     .Data = "ANY", names = "object", package = "methods"),
     generic = "show"))(object)))(new("CrossoverSearchResult",
     design = new("CrossoverDesign", design = c(4, 3, 1, 2, 4,
     2, 3, 2, 1, 4, 2, 1, 3, 1, 4, 3, 4, 1, 4, 2, 3, 4, 4, 1,
     1, 1, 1, 2, 2, 3, 4, 1, 3, 2, 2, 1, 2, 4, 3, 3, 4, 2, 1,
     3, 3), s = 9L, p = 5L, v = 4, model = 4, description = "Found by search algorithm",
     attr = list(), misc = list()), startDesigns = list(c(1L,
     4L, 1L, 3L, 2L, 2L, 2L, 3L, 2L, 4L, 1L, 1L, 1L, 2L, 4L, 1L,
     4L, 3L, 4L, 3L, 3L, 1L, 4L, 1L, 3L, 4L, 1L, 1L, 4L, 2L, 4L,
     4L, 2L, 3L, 2L, 3L, 4L, 3L, 2L, 2L, 1L, 2L, 3L, 1L, 3L),
     c(4L, 1L, 3L, 3L, 2L, 1L, 2L, 2L, 4L, 1L, 4L, 2L, 4L,
     1L, 1L, 1L, 2L, 1L, 2L, 4L, 3L, 2L, 3L, 4L, 2L, 3L, 3L,
     1L, 4L, 4L, 2L, 1L, 3L, 3L, 1L, 2L, 1L, 1L, 2L, 4L, 3L,
     3L, 3L, 4L, 4L), c(4L, 3L, 4L, 3L, 3L, 1L, 1L, 3L, 2L,
     4L, 3L, 1L, 4L, 2L, 3L, 2L, 1L, 4L, 2L, 4L, 1L, 1L, 3L,
     2L, 1L, 2L, 1L, 1L, 3L, 2L, 3L, 4L, 4L, 1L, 2L, 3L, 2L,
     3L, 1L, 1L, 4L, 2L, 4L, 2L, 4L), c(1L, 2L, 3L, 2L, 2L,
     4L, 1L, 1L, 2L, 3L, 3L, 4L, 4L, 2L, 4L, 1L, 1L, 3L, 2L,
     3L, 4L, 3L, 4L, 1L, 1L, 2L, 1L, 2L, 1L, 2L, 3L, 4L, 4L,
     1L, 1L, 1L, 3L, 4L, 3L, 2L, 4L, 4L, 3L, 3L, 2L), c(3L,
     4L, 3L, 1L, 4L, 3L, 2L, 1L, 2L, 3L, 2L, 2L, 3L, 3L, 4L,
     1L, 4L, 2L, 1L, 3L, 4L, 4L, 1L, 3L, 1L, 4L, 4L, 2L, 1L,
     2L, 1L, 2L, 1L, 3L, 1L, 1L, 2L, 3L, 1L, 2L, 4L, 4L, 4L,
     2L, 3L), c(3L, 3L, 4L, 3L, 4L, 4L, 2L, 3L, 1L, 4L, 2L,
     4L, 1L, 4L, 2L, 3L, 1L, 1L, 3L, 2L, 4L, 1L, 2L, 2L, 1L,
     3L, 2L, 4L, 2L, 4L, 3L, 4L, 3L, 1L, 2L, 4L, 1L, 1L, 1L,
     3L, 2L, 3L, 2L, 1L, 1L), c(4L, 3L, 1L, 1L, 1L, 4L, 2L,
     3L, 1L, 4L, 2L, 2L, 1L, 3L, 2L, 3L, 2L, 3L, 2L, 1L, 2L,
     3L, 1L, 1L, 2L, 3L, 4L, 3L, 4L, 1L, 2L, 1L, 3L, 3L, 4L,
     2L, 4L, 3L, 1L, 4L, 4L, 1L, 4L, 2L, 4L), c(4L, 3L, 1L,
     3L, 4L, 2L, 3L, 1L, 3L, 4L, 1L, 2L, 3L, 1L, 1L, 2L, 4L,
     1L, 2L, 4L, 2L, 3L, 3L, 2L, 1L, 1L, 1L, 3L, 2L, 3L, 4L,
     1L, 4L, 4L, 2L, 1L, 2L, 4L, 3L, 3L, 4L, 2L, 1L, 4L, 2L
     ), c(3L, 3L, 4L, 3L, 3L, 2L, 4L, 3L, 1L, 2L, 4L, 2L,
     3L, 2L, 1L, 4L, 3L, 3L, 2L, 3L, 3L, 2L, 1L, 1L, 4L, 1L,
     4L, 4L, 3L, 1L, 1L, 2L, 4L, 2L, 4L, 1L, 1L, 4L, 1L, 2L,
     4L, 2L, 2L, 1L, 1L), c(2L, 2L, 3L, 1L, 1L, 1L, 3L, 4L,
     3L, 2L, 4L, 1L, 4L, 4L, 4L, 1L, 2L, 4L, 1L, 2L, 2L, 2L,
     4L, 3L, 3L, 4L, 4L, 3L, 1L, 3L, 1L, 3L, 3L, 1L, 3L, 4L,
     2L, 1L, 4L, 1L, 1L, 2L, 2L, 3L, 2L)), model = 4, eff = list(
     c(0.637964304141143, NA, NA, 0.660635633012685, 0.669678399109568,
     NA, NA, NA, 0.673610899186687, NA, NA, NA, NA, NA, NA,
     NA, NA, 0.715486285925919, 0.723102659924618, NA, 0.742161574192688,
     NA, NA, 0.771020167488905, NA, NA, 0.779502270334408,
     NA, NA, NA, 0.799005340342353, NA, 0.804397634348305,
     0.812710138725528, NA, NA, NA, NA, NA, NA, NA, NA, NA,
     0.815983849571131, NA, NA, NA, NA, NA, NA, NA, 0.81938649997033,
     NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 0.826657335225618,
     NA, 0.835239346365139, 0.842614192704045, NA, NA, NA,
     NA, NA, NA, NA, NA, 0.859361075299705, NA, NA, NA, NA,
     NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
     NA, NA, NA, NA, NA, NA), c(0.606300975911634, 0.619860532491684,
     NA, NA, 0.67511961795512, NA, 0.70193964292641, NA, 0.706729537424138,
     NA, NA, NA, NA, 0.729573820485202, NA, 0.734671707711715,
     NA, NA, NA, NA, 0.761949074827988, NA, NA, NA, 0.779443402653546,
     NA, NA, 0.79315272798287, NA, NA, NA, NA, NA, NA, NA,
     NA, NA, NA, 0.801225464560309, NA, NA, NA, NA, 0.805592704602365,
     NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 0.819615155782882,
     NA, 0.828953140758137, NA, NA, NA, NA, NA, NA, NA, NA,
     0.832518180160419, NA, NA, NA, NA, NA, 0.832854032583896,
     NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
     NA, NA, NA, 0.837171755006264, NA, NA, NA, NA, NA, NA,
     NA, 0.844855801064287, NA, NA), c(0.540544667424177,
     NA, NA, NA, NA, NA, 0.597246229139869, NA, 0.639370120068189,
     NA, NA, NA, NA, NA, NA, NA, NA, 0.643000069651316, 0.671006510729243,
     0.686839099872499, NA, NA, NA, 0.697188838833615, NA,
     NA, NA, NA, NA, NA, NA, NA, NA, NA, 0.757705064536388,
     NA, 0.779729877896966, NA, 0.787448292072523, NA, 0.790252721141113,
     NA, NA, 0.802567280723559, NA, NA, NA, NA, NA, NA, NA,
     NA, NA, NA, NA, 0.806628584605751, NA, NA, NA, NA, NA,
     NA, NA, NA, NA, NA, NA, NA, 0.825830993620804, NA, 0.826418917833876,
     NA, 0.841201068246976, NA, NA, NA, NA, 0.84387179923184,
     0.857614237669557, NA, NA, NA, NA, NA, NA, NA, NA, NA,
     NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA), c(0.476640887220334,
     NA, 0.546470684056955, NA, 0.60295225760103, NA, NA,
     NA, NA, NA, NA, NA, 0.634657597421934, NA, 0.67683331312007,
     NA, 0.707180112142248, NA, NA, NA, NA, NA, NA, NA, 0.725424018054169,
     NA, NA, NA, NA, NA, 0.73591846744616, 0.743840635188044,
     NA, NA, 0.767662168743457, NA, NA, NA, NA, NA, NA, NA,
     NA, 0.777963465342466, NA, 0.784219547540513, NA, NA,
     NA, NA, NA, NA, NA, NA, 0.804876771354321, NA, NA, NA,
     NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
     0.819262641455846, NA, NA, NA, NA, NA, NA, NA, NA, NA,
     NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 0.823045036136124,
     NA, NA, NA, NA, NA), c(0.500537635365731, NA, 0.535850341505799,
     NA, NA, NA, 0.605314173674306, NA, 0.64788952491278,
     NA, NA, NA, 0.683665067413962, NA, NA, NA, NA, 0.684610936567089,
     NA, NA, NA, NA, NA, NA, 0.696793966073255, NA, NA, NA,
     NA, NA, 0.697604761785406, NA, 0.762719962212372, NA,
     0.772616398507881, NA, NA, NA, NA, NA, NA, NA, NA, NA,
     0.777687403479506, 0.78627274917567, NA, 0.810360282031576,
     NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
     NA, 0.812691350321697, NA, 0.825508881133355, NA, NA,
     NA, NA, NA, NA, NA, NA, 0.839172595968909, NA, NA, NA,
     NA, NA, NA, NA, NA, NA, 0.841553430638484, NA, NA, NA,
     NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA), c(0.64206382495612,
     NA, NA, NA, 0.654189191637459, NA, NA, NA, NA, 0.658943326033152,
     0.680238970017268, NA, NA, NA, NA, NA, NA, NA, NA, 0.684448556437844,
     NA, 0.686083784324383, NA, 0.687102177611055, NA, NA,
     0.689182306402837, 0.69488855127681, 0.732846882139593,
     NA, NA, 0.736204746439888, NA, 0.737085659172046, 0.785334277974024,
     NA, NA, NA, NA, NA, NA, NA, NA, 0.796485559729499, NA,
     0.804258782837227, NA, 0.812713742105537, 0.82749047997166,
     0.83770181085422, NA, NA, NA, NA, NA, NA, NA, NA, NA,
     NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
     NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
     NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA),
     c(0.560019257513758, NA, 0.59002248728111, 0.591737023439956,
     NA, NA, 0.612493886227937, NA, 0.628808548205091, NA,
     NA, NA, 0.64036605130092, NA, 0.671333347078539, 0.702532185017751,
     NA, 0.722656578618891, 0.734704394981768, 0.739539171026051,
     0.748558339260159, NA, NA, NA, NA, NA, NA, 0.761606167378135,
     NA, NA, 0.780317686728819, NA, NA, NA, 0.794342376784399,
     0.799802787394848, NA, NA, NA, NA, NA, 0.80744932612716,
     NA, NA, 0.809721279521529, NA, NA, NA, NA, NA, NA, NA,
     NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
     NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 0.820189999897601,
     NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 0.821692459253902,
     0.828578698448422, NA, NA, NA, NA, NA, NA, NA, NA, 0.834520578339367,
     NA), c(0.643315763553789, NA, NA, 0.647910994632837,
     0.649390347889097, NA, NA, 0.655870884053047, 0.678849573236897,
     NA, NA, NA, NA, NA, 0.702893612318084, NA, NA, NA, NA,
     NA, 0.714080922513508, 0.719022828361366, NA, 0.742682134481133,
     NA, NA, NA, NA, NA, 0.744599241242644, NA, NA, NA, NA,
     NA, 0.756954660857737, 0.760384176664876, NA, NA, NA,
     NA, NA, NA, NA, NA, NA, NA, 0.7910400533543, NA, NA,
     NA, NA, 0.81568011273231, NA, NA, NA, NA, NA, NA, NA,
     NA, 0.828884232571578, NA, NA, NA, NA, NA, NA, NA, NA,
     NA, NA, 0.857746731060882, NA, NA, NA, NA, NA, NA, NA,
     NA, 0.880789221702651, NA, NA, NA, NA, NA, NA, NA, NA,
     NA, NA, NA, NA, NA, NA, NA, NA, NA, NA), c(0.624819520371986,
     NA, 0.648638057932525, NA, NA, NA, 0.674758910701905,
     NA, 0.684815071131943, NA, NA, NA, 0.709105937672733,
     NA, NA, 0.720378350122078, NA, NA, NA, NA, 0.730387028818458,
     NA, NA, NA, 0.754754732653994, 0.758324219238764, NA,
     NA, NA, NA, NA, 0.772942673498325, NA, 0.78618539626392,
     NA, 0.809813545735391, NA, NA, NA, 0.823906126482674,
     NA, NA, NA, NA, NA, 0.830978296195516, NA, NA, NA, NA,
     NA, NA, 0.837002186878194, NA, 0.84355925736234, NA,
     NA, 0.850154035273961, NA, NA, NA, NA, NA, NA, NA, NA,
     NA, NA, NA, NA, NA, 0.856521982041404, NA, NA, NA, NA,
     NA, NA, 0.873897991247284, NA, NA, NA, NA, NA, NA, NA,
     NA, NA, NA, 0.874061088625315, NA, NA, NA, NA, NA, NA,
     NA, NA, NA, NA), c(0.579044995241179, NA, NA, 0.594246232015653,
     0.633139689470443, NA, NA, 0.650721257902673, 0.664723893559122,
     NA, NA, NA, NA, NA, NA, 0.675114374185087, NA, NA, 0.703800022126619,
     NA, NA, NA, NA, NA, 0.730152127754334, NA, NA, 0.746427158984179,
     0.749792327820789, NA, NA, NA, NA, NA, 0.782518907438576,
     NA, NA, NA, 0.790284816177575, 0.790977126019723, NA,
     NA, NA, NA, NA, NA, NA, NA, 0.79721206357445, NA, NA,
     NA, NA, NA, NA, 0.797483305231604, NA, 0.839711170660833,
     NA, NA, NA, 0.854511843203157, NA, NA, NA, NA, NA, NA,
     NA, 0.855176354989167, NA, NA, NA, NA, 0.878823676770073,
     NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
     NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA)), search = list(
     n = c(100, 10), jumps = c(5, 50)), time = c(user.self = 0.143,
     sys.self = 0, elapsed = 0.162, user.child = 0, sys.child = 0
     ), misc = list(designs = list(list(step0 = c(1, 4, 1, 3,
     2, 2, 2, 3, 2, 4, 1, 1, 1, 2, 4, 1, 4, 3, 4, 3, 3, 1, 4,
     1, 3, 4, 1, 1, 4, 2, 4, 4, 2, 3, 2, 3, 4, 3, 2, 2, 1, 2,
     3, 1, 3), step3 = c(1, 4, 1, 3, 2, 2, 3, 3, 2, 4, 1, 1, 1,
     2, 4, 1, 4, 3, 4, 3, 3, 1, 4, 1, 3, 4, 1, 1, 4, 2, 4, 4,
     2, 3, 2, 3, 4, 3, 2, 2, 1, 2, 3, 1, 3), step4 = c(1, 1, 4,
     3, 2, 2, 3, 3, 2, 4, 1, 1, 1, 2, 4, 1, 4, 3, 4, 3, 3, 1,
     4, 1, 3, 4, 1, 1, 4, 2, 4, 4, 2, 3, 2, 3, 4, 3, 2, 2, 1,
     2, 3, 1, 3), step8 = c(1, 1, 4, 3, 2, 2, 3, 3, 2, 4, 1, 1,
     1, 2, 4, 1, 4, 3, 4, 3, 3, 1, 4, 1, 3, 4, 1, 1, 4, 2, 3,
     4, 2, 3, 2, 3, 4, 4, 2, 2, 1, 2, 3, 1, 3), step17 = c(1,
     1, 4, 3, 2, 2, 3, 3, 2, 4, 1, 1, 1, 2, 4, 1, 4, 3, 4, 3,
     3, 1, 4, 1, 3, 4, 1, 1, 4, 2, 3, 4, 2, 3, 1, 3, 4, 4, 2,
     2, 1, 2, 3, 1, 3), step18 = c(1, 1, 3, 3, 2, 2, 3, 3, 2,
     4, 1, 1, 1, 2, 4, 1, 4, 3, 4, 3, 3, 1, 4, 1, 3, 4, 1, 1,
     4, 2, 4, 4, 2, 3, 1, 3, 4, 4, 2, 2, 1, 2, 3, 1, 3), step20 = c(1,
     1, 4, 3, 2, 2, 3, 3, 2, 4, 1, 1, 1, 2, 4, 1, 3, 3, 4, 3,
     3, 1, 4, 1, 3, 4, 1, 1, 4, 2, 4, 4, 2, 3, 1, 3, 4, 4, 2,
     2, 1, 2, 3, 1, 3), step23 = c(1, 1, 4, 3, 2, 2, 3, 3, 2,
     4, 1, 1, 1, 2, 4, 1, 3, 3, 4, 3, 2, 1, 4, 1, 3, 4, 1, 1,
     4, 2, 4, 4, 2, 3, 1, 3, 4, 4, 2, 2, 1, 2, 3, 1, 3), step26 = c(1,
     1, 4, 3, 2, 3, 3, 3, 2, 4, 1, 1, 1, 2, 4, 1, 3, 2, 4, 3,
     2, 1, 4, 1, 3, 4, 1, 1, 4, 2, 4, 4, 2, 3, 1, 3, 4, 4, 2,
     2, 1, 2, 3, 1, 3), step30 = c(1, 1, 4, 3, 2, 3, 3, 3, 2,
     4, 1, 1, 1, 2, 4, 1, 3, 2, 4, 3, 2, 1, 4, 1, 3, 3, 1, 1,
     4, 2, 4, 4, 2, 3, 1, 3, 4, 4, 2, 2, 1, 2, 3, 1, 4), step32 = c(1,
     1, 4, 3, 2, 3, 3, 3, 2, 4, 2, 1, 1, 2, 4, 1, 3, 2, 4, 3,
     2, 1, 4, 1, 3, 3, 1, 1, 4, 1, 4, 4, 2, 3, 1, 3, 4, 4, 2,
     2, 1, 2, 3, 1, 4), step33 = c(1, 1, 4, 3, 2, 3, 3, 4, 2,
     4, 2, 1, 1, 2, 4, 1, 3, 2, 4, 3, 2, 1, 4, 1, 3, 3, 1, 1,
     4, 1, 4, 4, 2, 3, 1, 3, 4, 4, 2, 2, 1, 2, 3, 1, 4), step43 = c(1,
     1, 4, 3, 2, 3, 3, 4, 2, 4, 2, 1, 1, 2, 4, 1, 3, 2, 4, 3,
     2, 1, 4, 1, 3, 3, 1, 2, 4, 1, 4, 4, 2, 3, 1, 3, 4, 4, 2,
     2, 1, 2, 3, 1, 4), step51 = c(1, 1, 4, 3, 2, 3, 3, 4, 1,
     4, 2, 1, 1, 2, 4, 1, 3, 2, 4, 3, 2, 1, 4, 1, 3, 3, 1, 2,
     4, 1, 4, 4, 2, 3, 1, 3, 4, 4, 2, 2, 1, 2, 3, 1, 4), step63 = c(1,
     1, 4, 3, 2, 3, 3, 4, 1, 4, 2, 1, 1, 4, 4, 1, 3, 2, 4, 3,
     2, 1, 4, 1, 3, 3, 1, 2, 4, 1, 4, 4, 2, 3, 1, 3, 4, 4, 2,
     2, 1, 2, 3, 1, 4), step65 = c(1, 1, 4, 3, 2, 3, 3, 1, 1,
     4, 2, 1, 1, 4, 4, 1, 3, 2, 4, 3, 2, 1, 4, 1, 3, 3, 1, 2,
     4, 1, 4, 4, 2, 3, 1, 3, 4, 4, 2, 2, 1, 2, 3, 1, 4), step66 = c(1,
     1, 4, 3, 2, 3, 3, 1, 2, 4, 2, 1, 1, 4, 4, 1, 3, 2, 4, 3,
     2, 1, 4, 1, 3, 3, 1, 2, 4, 1, 4, 4, 2, 3, 1, 3, 4, 4, 1,
     2, 1, 2, 3, 1, 4), step75 = c(1, 1, 4, 3, 2, 3, 3, 1, 2,
     4, 2, 1, 1, 3, 4, 1, 3, 2, 4, 3, 2, 1, 4, 1, 3, 3, 1, 2,
     4, 1, 4, 4, 2, 3, 1, 3, 4, 4, 1, 2, 1, 2, 3, 1, 4)), list(
     step0 = c(4, 1, 3, 3, 2, 1, 2, 2, 4, 1, 4, 2, 4, 1, 1,
     1, 2, 1, 2, 4, 3, 2, 3, 4, 2, 3, 3, 1, 4, 4, 2, 1, 3,
     3, 1, 2, 1, 1, 2, 4, 3, 3, 3, 4, 4), step1 = c(4, 1,
     3, 3, 2, 1, 2, 2, 4, 1, 4, 2, 4, 1, 1, 1, 2, 1, 2, 4,
     3, 2, 3, 4, 2, 3, 3, 1, 4, 4, 2, 1, 3, 3, 1, 2, 1, 1,
     2, 4, 3, 3, 4, 4, 4), step4 = c(4, 1, 3, 3, 2, 1, 2,
     2, 4, 3, 4, 2, 4, 1, 1, 1, 2, 1, 2, 4, 3, 2, 3, 4, 2,
     1, 3, 1, 4, 4, 2, 1, 3, 3, 1, 2, 1, 1, 2, 4, 3, 3, 4,
     4, 4), step6 = c(4, 1, 3, 3, 2, 1, 2, 2, 4, 3, 4, 2,
     4, 1, 1, 1, 2, 1, 2, 4, 3, 2, 3, 4, 2, 1, 3, 1, 4, 4,
     2, 1, 3, 3, 1, 2, 4, 1, 2, 4, 3, 3, 4, 1, 4), step8 = c(4,
     1, 3, 3, 2, 1, 2, 2, 4, 3, 4, 2, 4, 1, 1, 1, 2, 1, 2,
     4, 3, 2, 3, 4, 2, 1, 3, 1, 4, 4, 2, 1, 3, 3, 2, 2, 4,
     1, 1, 4, 3, 3, 4, 1, 4), step13 = c(4, 1, 3, 3, 2, 1,
     2, 2, 4, 3, 4, 2, 4, 1, 1, 1, 2, 2, 2, 4, 3, 2, 3, 4,
     2, 1, 3, 1, 4, 4, 2, 1, 3, 3, 2, 2, 4, 1, 1, 4, 3, 3,
     4, 1, 4), step15 = c(4, 1, 3, 3, 2, 1, 2, 2, 4, 3, 4,
     2, 4, 1, 1, 1, 2, 2, 2, 4, 3, 2, 3, 4, 2, 1, 3, 1, 4,
     4, 2, 1, 3, 3, 2, 2, 4, 1, 1, 1, 3, 3, 4, 1, 4), step20 = c(4,
     1, 3, 3, 2, 1, 2, 2, 4, 3, 2, 2, 4, 1, 1, 1, 4, 2, 2,
     4, 3, 2, 3, 4, 2, 1, 3, 1, 4, 4, 2, 1, 3, 3, 2, 2, 4,
     1, 1, 1, 3, 3, 4, 1, 4), step24 = c(4, 1, 3, 3, 2, 1,
     2, 2, 4, 3, 2, 2, 4, 1, 1, 3, 4, 2, 2, 4, 3, 2, 1, 4,
     2, 1, 3, 1, 4, 4, 2, 1, 3, 3, 2, 2, 4, 1, 1, 1, 3, 3,
     4, 1, 4), step27 = c(4, 1, 3, 3, 2, 1, 2, 2, 4, 3, 2,
     2, 4, 1, 1, 3, 4, 2, 2, 4, 3, 2, 1, 4, 2, 1, 3, 1, 4,
     4, 2, 1, 4, 3, 2, 2, 4, 1, 1, 1, 3, 3, 4, 1, 4), step38 = c(4,
     1, 3, 3, 2, 1, 2, 2, 4, 3, 2, 2, 4, 1, 1, 3, 4, 2, 2,
     4, 3, 2, 1, 4, 2, 1, 3, 1, 4, 2, 2, 1, 4, 3, 2, 4, 4,
     1, 1, 1, 3, 3, 4, 1, 4), step43 = c(4, 1, 3, 3, 2, 1,
     2, 2, 4, 3, 2, 2, 4, 1, 1, 3, 4, 2, 2, 4, 3, 2, 1, 4,
     2, 1, 3, 1, 2, 2, 2, 1, 4, 3, 2, 4, 4, 1, 1, 1, 3, 3,
     4, 1, 4), step54 = c(4, 1, 3, 3, 2, 1, 2, 2, 4, 3, 2,
     2, 4, 1, 1, 3, 4, 2, 2, 4, 1, 2, 1, 4, 2, 1, 3, 1, 2,
     2, 2, 1, 4, 3, 2, 4, 4, 3, 1, 1, 3, 3, 4, 1, 4), step56 = c(4,
     1, 3, 3, 2, 1, 2, 2, 4, 3, 2, 2, 4, 1, 1, 3, 4, 2, 2,
     4, 1, 3, 1, 4, 2, 1, 3, 1, 2, 2, 2, 1, 4, 3, 2, 4, 4,
     3, 1, 1, 2, 3, 4, 1, 4), step65 = c(4, 1, 3, 3, 2, 1,
     2, 2, 4, 3, 2, 2, 4, 1, 1, 3, 4, 2, 2, 4, 1, 3, 1, 4,
     2, 1, 3, 4, 2, 2, 2, 1, 4, 3, 2, 4, 4, 3, 1, 1, 2, 3,
     4, 1, 4), step71 = c(4, 1, 3, 3, 2, 1, 2, 2, 4, 3, 2,
     2, 4, 1, 1, 3, 4, 2, 2, 4, 1, 3, 1, 4, 2, 1, 3, 4, 2,
     2, 2, 1, 4, 3, 4, 4, 4, 3, 1, 1, 2, 3, 4, 1, 4), step89 = c(4,
     1, 3, 3, 2, 1, 2, 2, 4, 3, 2, 2, 4, 1, 1, 3, 4, 2, 2,
     4, 1, 3, 1, 4, 2, 1, 3, 3, 2, 2, 2, 1, 4, 3, 4, 4, 4,
     3, 1, 1, 2, 3, 4, 1, 4), step97 = c(4, 1, 3, 3, 2, 1,
     2, 2, 4, 3, 2, 3, 4, 1, 1, 3, 4, 2, 2, 4, 1, 3, 1, 4,
     2, 1, 3, 3, 2, 2, 2, 1, 4, 3, 4, 4, 4, 3, 1, 1, 2, 3,
     4, 1, 4)), list(step0 = c(4, 3, 4, 3, 3, 1, 1, 3, 2,
     4, 3, 1, 4, 2, 3, 2, 1, 4, 2, 4, 1, 1, 3, 2, 1, 2, 1, 1,
     3, 2, 3, 4, 4, 1, 2, 3, 2, 3, 1, 1, 4, 2, 4, 2, 4), step6 = c(4,
     3, 4, 3, 3, 1, 1, 3, 2, 4, 3, 1, 4, 2, 3, 2, 1, 4, 2, 4,
     1, 1, 3, 2, 1, 2, 1, 1, 3, 4, 3, 4, 4, 1, 2, 3, 2, 3, 1,
     1, 2, 2, 4, 2, 4), step8 = c(4, 3, 4, 3, 3, 1, 1, 3, 2, 4,
     3, 1, 4, 2, 3, 2, 1, 4, 4, 4, 1, 1, 3, 2, 1, 2, 1, 1, 3,
     4, 3, 4, 2, 1, 2, 3, 2, 3, 1, 1, 2, 2, 4, 2, 4), step17 = c(4,
     3, 4, 3, 3, 1, 1, 3, 2, 4, 3, 1, 4, 2, 3, 2, 1, 4, 4, 4,
     1, 1, 3, 2, 1, 2, 1, 1, 4, 4, 3, 4, 2, 1, 2, 3, 2, 3, 1,
     1, 2, 2, 4, 2, 4), step18 = c(4, 3, 4, 3, 3, 1, 1, 3, 2,
     4, 3, 1, 4, 2, 3, 2, 1, 4, 4, 4, 4, 1, 3, 2, 1, 2, 1, 1,
     4, 1, 3, 4, 2, 1, 2, 3, 2, 3, 1, 1, 2, 2, 4, 2, 4), step19 = c(4,
     3, 4, 3, 3, 1, 1, 3, 2, 4, 3, 1, 4, 2, 3, 2, 1, 4, 4, 4,
     4, 1, 3, 2, 1, 2, 1, 1, 4, 3, 3, 4, 2, 1, 2, 3, 2, 3, 1,
     1, 2, 2, 4, 2, 4), step23 = c(4, 3, 4, 3, 3, 1, 1, 3, 2,
     4, 3, 1, 4, 2, 3, 2, 1, 4, 4, 4, 4, 1, 3, 2, 1, 2, 1, 1,
     4, 3, 3, 4, 2, 1, 2, 4, 2, 3, 1, 1, 2, 2, 4, 2, 4), step34 = c(4,
     3, 4, 3, 3, 1, 1, 3, 2, 4, 3, 1, 4, 2, 3, 2, 2, 4, 4, 4,
     4, 1, 3, 2, 1, 2, 1, 1, 4, 3, 3, 4, 2, 1, 2, 4, 2, 3, 1,
     1, 2, 2, 4, 1, 4), step36 = c(4, 3, 1, 3, 3, 1, 1, 3, 2,
     4, 3, 1, 4, 2, 3, 2, 2, 4, 4, 4, 4, 1, 3, 2, 1, 2, 1, 1,
     4, 3, 3, 4, 2, 1, 2, 4, 2, 3, 4, 1, 2, 2, 4, 1, 4), step38 = c(4,
     3, 1, 3, 3, 1, 1, 3, 2, 4, 3, 1, 4, 2, 3, 2, 2, 4, 4, 1,
     4, 1, 3, 2, 1, 2, 1, 4, 4, 3, 3, 4, 2, 1, 2, 4, 2, 3, 4,
     1, 2, 2, 4, 1, 4), step40 = c(4, 3, 1, 3, 3, 1, 1, 3, 2,
     4, 3, 1, 4, 2, 3, 2, 2, 4, 4, 1, 4, 3, 3, 2, 1, 2, 1, 4,
     4, 1, 3, 4, 2, 1, 2, 4, 2, 3, 4, 1, 2, 2, 4, 1, 4), step43 = c(4,
     3, 1, 3, 3, 1, 1, 3, 2, 4, 3, 1, 4, 2, 3, 2, 2, 4, 4, 1,
     4, 3, 3, 2, 1, 2, 1, 4, 4, 1, 3, 4, 2, 1, 2, 4, 2, 3, 4,
     1, 2, 2, 1, 1, 4), step55 = c(4, 2, 1, 3, 3, 1, 1, 3, 2,
     4, 3, 1, 4, 2, 3, 2, 2, 4, 4, 1, 4, 3, 3, 2, 1, 2, 1, 4,
     4, 1, 3, 4, 2, 1, 2, 4, 2, 3, 4, 1, 2, 2, 1, 1, 4), step68 = c(4,
     2, 1, 3, 3, 1, 1, 3, 2, 4, 3, 1, 4, 2, 3, 2, 2, 4, 4, 1,
     4, 3, 2, 2, 1, 2, 1, 4, 4, 1, 3, 4, 2, 1, 2, 4, 2, 3, 4,
     1, 3, 2, 1, 1, 4), step70 = c(4, 2, 1, 3, 3, 1, 1, 3, 2,
     4, 3, 1, 4, 2, 3, 2, 2, 4, 4, 1, 4, 3, 2, 2, 1, 2, 1, 4,
     3, 1, 3, 4, 2, 1, 2, 4, 2, 3, 4, 1, 4, 2, 1, 1, 4), step72 = c(4,
     2, 1, 3, 3, 1, 1, 3, 2, 4, 3, 1, 4, 2, 4, 2, 2, 4, 4, 1,
     4, 3, 2, 2, 1, 2, 1, 4, 3, 1, 3, 4, 2, 1, 2, 4, 2, 3, 4,
     1, 3, 2, 1, 1, 4), step77 = c(4, 1, 1, 3, 3, 1, 1, 3, 2,
     4, 3, 1, 4, 2, 4, 2, 2, 4, 4, 1, 4, 3, 2, 2, 1, 2, 1, 4,
     3, 1, 3, 4, 2, 1, 2, 4, 2, 3, 4, 1, 3, 2, 1, 1, 4), step78 = c(4,
     4, 1, 3, 3, 1, 1, 3, 2, 4, 3, 1, 4, 2, 4, 2, 2, 4, 4, 1,
     4, 3, 2, 2, 1, 2, 1, 4, 3, 1, 3, 4, 2, 1, 2, 4, 2, 3, 1,
     1, 3, 2, 1, 1, 4)), list(step0 = c(1, 2, 3, 2, 2, 4, 1, 1,
     2, 3, 3, 4, 4, 2, 4, 1, 1, 3, 2, 3, 4, 3, 4, 1, 1, 2, 1,
     2, 1, 2, 3, 4, 4, 1, 1, 1, 3, 4, 3, 2, 4, 4, 3, 3, 2), step2 = c(1,
     2, 2, 2, 2, 4, 1, 1, 3, 3, 3, 4, 4, 2, 4, 1, 1, 3, 2, 3,
     4, 3, 4, 1, 1, 2, 1, 2, 1, 2, 3, 4, 4, 1, 1, 1, 3, 4, 3,
     2, 4, 4, 3, 3, 2), step4 = c(1, 2, 2, 2, 1, 4, 1, 1, 3, 3,
     3, 4, 4, 2, 4, 1, 1, 3, 2, 3, 4, 3, 4, 1, 1, 2, 1, 2, 1,
     2, 3, 4, 4, 2, 1, 1, 3, 4, 3, 2, 4, 4, 3, 3, 2), step12 = c(1,
     2, 2, 2, 1, 4, 1, 1, 3, 3, 3, 4, 4, 2, 4, 4, 1, 3, 2, 3,
     4, 3, 1, 1, 1, 2, 1, 2, 1, 2, 3, 4, 4, 2, 1, 1, 3, 4, 3,
     2, 4, 4, 3, 3, 2), step14 = c(1, 2, 2, 2, 1, 4, 1, 1, 3,
     3, 3, 4, 4, 2, 4, 4, 1, 3, 2, 3, 4, 3, 1, 1, 1, 2, 1, 2,
     1, 4, 3, 4, 4, 2, 1, 1, 3, 2, 3, 2, 4, 4, 3, 3, 2), step16 = c(1,
     2, 2, 2, 1, 4, 1, 1, 3, 3, 3, 4, 4, 2, 4, 4, 1, 1, 2, 3,
     4, 3, 3, 1, 1, 2, 1, 2, 1, 4, 3, 4, 4, 2, 1, 1, 3, 2, 3,
     2, 4, 4, 3, 3, 2), step24 = c(1, 2, 2, 2, 1, 4, 1, 1, 3,
     3, 3, 4, 4, 2, 4, 4, 1, 1, 2, 2, 4, 3, 3, 1, 1, 2, 1, 2,
     1, 4, 3, 4, 4, 2, 1, 1, 3, 2, 3, 3, 4, 4, 3, 3, 2), step30 = c(1,
     2, 2, 2, 3, 4, 1, 1, 3, 1, 3, 4, 4, 2, 4, 4, 1, 1, 2, 2,
     4, 3, 3, 1, 1, 2, 1, 2, 1, 4, 3, 4, 4, 2, 1, 1, 3, 2, 3,
     3, 4, 4, 3, 3, 2), step31 = c(1, 2, 2, 2, 3, 4, 1, 1, 3,
     1, 3, 4, 4, 2, 4, 4, 1, 1, 2, 2, 4, 3, 3, 1, 1, 2, 2, 2,
     1, 4, 3, 4, 4, 2, 1, 1, 3, 2, 3, 3, 4, 4, 3, 3, 2), step34 = c(1,
     2, 2, 3, 3, 4, 1, 1, 3, 1, 3, 4, 4, 2, 4, 4, 1, 1, 2, 2,
     4, 3, 3, 1, 1, 2, 2, 2, 1, 4, 3, 4, 4, 2, 1, 1, 3, 2, 2,
     3, 4, 4, 3, 3, 2), step43 = c(1, 2, 2, 3, 3, 4, 1, 1, 3,
     4, 3, 4, 4, 2, 4, 4, 1, 1, 2, 2, 4, 3, 3, 1, 1, 2, 2, 2,
     1, 4, 3, 4, 4, 2, 1, 1, 3, 2, 2, 3, 4, 4, 3, 3, 2), step45 = c(1,
     2, 2, 3, 3, 4, 1, 1, 3, 4, 3, 4, 4, 2, 4, 4, 1, 1, 2, 2,
     4, 3, 3, 1, 2, 2, 2, 2, 1, 4, 3, 4, 4, 2, 1, 1, 3, 2, 2,
     3, 4, 4, 3, 3, 2), step54 = c(1, 2, 2, 3, 3, 4, 1, 1, 3,
     4, 3, 4, 4, 2, 3, 4, 1, 1, 2, 2, 4, 3, 3, 1, 2, 2, 2, 2,
     1, 4, 3, 4, 4, 2, 1, 1, 3, 2, 2, 4, 4, 4, 3, 3, 2), step72 = c(1,
     2, 2, 3, 3, 4, 1, 1, 3, 4, 3, 4, 4, 2, 1, 4, 3, 1, 2, 2,
     4, 3, 3, 1, 2, 2, 2, 2, 1, 4, 3, 4, 4, 2, 1, 1, 3, 2, 2,
     4, 4, 4, 3, 3, 2), step94 = c(1, 4, 2, 3, 3, 4, 1, 1, 3,
     4, 3, 4, 4, 2, 1, 4, 3, 1, 2, 2, 4, 3, 3, 1, 2, 2, 2, 2,
     1, 4, 3, 4, 4, 2, 1, 1, 3, 2, 2, 4, 2, 4, 3, 3, 2)), list(
     step0 = c(3, 4, 3, 1, 4, 3, 2, 1, 2, 3, 2, 2, 3, 3, 4,
     1, 4, 2, 1, 3, 4, 4, 1, 3, 1, 4, 4, 2, 1, 2, 1, 2, 1,
     3, 1, 1, 2, 3, 1, 2, 4, 4, 4, 2, 3), step2 = c(3, 4,
     3, 1, 4, 3, 2, 1, 2, 2, 2, 3, 3, 3, 4, 1, 4, 2, 1, 3,
     4, 4, 1, 3, 1, 4, 4, 2, 1, 2, 1, 2, 1, 3, 1, 1, 2, 3,
     1, 2, 4, 4, 4, 2, 3), step6 = c(3, 4, 3, 1, 4, 3, 2,
     1, 2, 2, 2, 3, 3, 3, 4, 1, 4, 2, 1, 3, 4, 4, 1, 3, 1,
     4, 4, 2, 1, 2, 1, 1, 2, 3, 1, 1, 2, 3, 1, 2, 4, 4, 4,
     2, 3), step8 = c(3, 4, 3, 1, 4, 3, 2, 1, 2, 2, 2, 3,
     3, 3, 4, 1, 4, 2, 1, 3, 4, 4, 1, 3, 1, 3, 4, 2, 1, 2,
     1, 1, 2, 3, 1, 1, 2, 4, 1, 2, 4, 4, 4, 2, 3), step12 = c(3,
     4, 3, 1, 4, 3, 2, 1, 2, 2, 2, 3, 3, 4, 4, 1, 3, 2, 1,
     3, 4, 4, 1, 3, 1, 3, 4, 2, 1, 2, 1, 1, 2, 3, 1, 1, 2,
     4, 1, 2, 4, 4, 4, 2, 3), step17 = c(3, 4, 2, 1, 4, 3,
     2, 1, 2, 2, 2, 3, 3, 4, 4, 1, 3, 2, 1, 3, 4, 4, 1, 3,
     1, 3, 4, 2, 1, 2, 1, 1, 2, 3, 1, 1, 2, 4, 1, 2, 4, 4,
     4, 2, 3), step24 = c(3, 4, 2, 1, 4, 3, 2, 1, 2, 2, 2,
     3, 3, 4, 4, 1, 3, 2, 1, 3, 4, 4, 1, 3, 1, 3, 4, 2, 1,
     2, 1, 4, 2, 3, 1, 1, 2, 4, 1, 2, 1, 4, 4, 2, 3), step30 = c(3,
     4, 2, 1, 4, 3, 2, 1, 2, 2, 2, 3, 3, 4, 1, 1, 3, 2, 1,
     3, 4, 4, 1, 3, 1, 3, 4, 2, 1, 2, 1, 4, 2, 3, 4, 1, 2,
     4, 1, 2, 1, 4, 4, 2, 3), step32 = c(3, 1, 2, 1, 4, 3,
     2, 1, 2, 2, 2, 3, 3, 4, 1, 4, 3, 2, 1, 3, 4, 4, 1, 3,
     1, 3, 4, 2, 1, 2, 1, 4, 2, 3, 4, 1, 2, 4, 1, 2, 1, 4,
     4, 2, 3), step34 = c(1, 1, 2, 1, 4, 3, 2, 1, 2, 2, 2,
     3, 3, 4, 1, 4, 3, 2, 1, 3, 4, 4, 1, 3, 1, 3, 4, 2, 1,
     2, 1, 4, 2, 3, 4, 1, 2, 4, 3, 2, 1, 4, 4, 2, 3), step44 = c(1,
     1, 2, 4, 1, 3, 2, 1, 2, 2, 2, 3, 3, 4, 1, 4, 3, 2, 1,
     3, 4, 4, 1, 3, 1, 3, 4, 2, 1, 2, 1, 4, 2, 3, 4, 1, 2,
     4, 3, 2, 1, 4, 4, 2, 3), step45 = c(1, 1, 2, 4, 1, 3,
     3, 1, 2, 2, 2, 3, 3, 4, 1, 4, 3, 2, 1, 3, 4, 4, 1, 3,
     1, 3, 4, 2, 1, 2, 1, 4, 2, 3, 4, 1, 2, 4, 3, 2, 1, 4,
     4, 2, 3), step47 = c(1, 1, 2, 4, 1, 3, 3, 1, 2, 2, 2,
     3, 3, 4, 1, 4, 3, 2, 1, 3, 4, 2, 1, 3, 1, 3, 4, 2, 1,
     2, 1, 4, 2, 3, 4, 1, 2, 4, 3, 2, 1, 4, 4, 2, 3), step63 = c(1,
     1, 2, 4, 1, 3, 3, 1, 2, 2, 2, 3, 3, 4, 1, 4, 3, 2, 1,
     3, 4, 2, 1, 3, 2, 3, 4, 2, 1, 2, 1, 4, 2, 3, 4, 1, 2,
     4, 3, 2, 1, 4, 4, 2, 3), step65 = c(1, 1, 2, 4, 1, 3,
     3, 1, 2, 2, 2, 3, 3, 4, 1, 4, 3, 2, 1, 3, 4, 2, 1, 3,
     2, 3, 4, 1, 1, 2, 1, 4, 2, 3, 4, 1, 2, 4, 3, 2, 1, 4,
     4, 2, 3), step74 = c(1, 1, 2, 4, 1, 3, 3, 1, 2, 2, 2,
     3, 3, 4, 1, 4, 3, 2, 1, 3, 4, 2, 1, 3, 2, 3, 1, 1, 4,
     2, 1, 4, 2, 3, 4, 1, 2, 4, 3, 2, 1, 4, 4, 2, 3), step84 = c(3,
     1, 2, 4, 1, 3, 3, 1, 2, 2, 2, 3, 3, 4, 1, 4, 3, 2, 1,
     3, 4, 2, 1, 3, 2, 3, 1, 1, 4, 2, 1, 4, 2, 3, 4, 1, 2,
     4, 3, 2, 1, 4, 4, 2, 1)), list(step0 = c(3, 3, 4, 3,
     4, 4, 2, 3, 1, 4, 2, 4, 1, 4, 2, 3, 1, 1, 3, 2, 4, 1, 2,
     2, 1, 3, 2, 4, 2, 4, 3, 4, 3, 1, 2, 4, 1, 1, 1, 3, 2, 3,
     2, 1, 1), step4 = c(3, 3, 4, 4, 4, 4, 2, 3, 1, 4, 2, 4, 1,
     4, 2, 3, 1, 1, 3, 2, 4, 1, 2, 2, 1, 3, 2, 3, 2, 4, 3, 4,
     3, 1, 2, 4, 1, 1, 1, 3, 2, 3, 2, 1, 1), step9 = c(3, 3, 4,
     4, 4, 4, 2, 3, 1, 4, 2, 4, 1, 4, 2, 3, 1, 1, 3, 2, 4, 1,
     2, 2, 1, 3, 2, 3, 2, 4, 3, 4, 3, 1, 2, 4, 1, 1, 1, 3, 1,
     3, 2, 1, 1), step10 = c(3, 3, 4, 2, 4, 4, 2, 3, 1, 4, 2,
     4, 1, 4, 2, 3, 1, 1, 3, 4, 4, 1, 2, 2, 1, 3, 2, 3, 2, 4,
     3, 4, 3, 1, 2, 4, 1, 1, 1, 3, 1, 3, 2, 1, 1), step19 = c(3,
     3, 4, 2, 4, 4, 2, 3, 1, 4, 2, 4, 1, 4, 2, 3, 1, 1, 3, 4,
     4, 1, 2, 2, 1, 3, 2, 3, 2, 4, 3, 4, 3, 1, 2, 4, 1, 1, 1,
     3, 1, 3, 2, 1, 4), step21 = c(3, 3, 4, 2, 4, 4, 2, 3, 1,
     4, 2, 4, 1, 4, 1, 3, 1, 1, 3, 4, 4, 1, 2, 2, 1, 3, 2, 3,
     2, 4, 3, 4, 3, 1, 2, 4, 1, 1, 1, 3, 1, 3, 2, 1, 4), step23 = c(3,
     3, 4, 2, 4, 4, 2, 3, 1, 4, 2, 1, 1, 4, 1, 3, 1, 1, 3, 4,
     4, 1, 2, 2, 1, 3, 2, 3, 2, 4, 3, 4, 3, 1, 2, 4, 1, 1, 1,
     3, 1, 3, 2, 1, 4), step26 = c(3, 3, 4, 2, 4, 4, 2, 3, 1,
     4, 2, 1, 1, 4, 1, 3, 1, 1, 3, 4, 4, 1, 2, 2, 1, 3, 2, 3,
     2, 4, 3, 4, 3, 1, 2, 1, 4, 1, 1, 3, 1, 3, 2, 1, 4), step27 = c(3,
     3, 4, 2, 4, 4, 2, 3, 1, 4, 2, 1, 3, 4, 1, 3, 1, 1, 3, 4,
     4, 1, 2, 2, 1, 3, 2, 3, 2, 4, 3, 4, 3, 1, 2, 1, 4, 1, 1,
     3, 1, 3, 2, 1, 4), step28 = c(3, 3, 4, 2, 4, 4, 2, 3, 1,
     4, 2, 1, 3, 4, 1, 2, 1, 1, 3, 4, 4, 1, 2, 3, 1, 3, 2, 3,
     2, 4, 3, 4, 3, 1, 2, 1, 4, 1, 1, 3, 1, 3, 2, 1, 4), step31 = c(3,
     3, 4, 2, 4, 4, 2, 3, 1, 4, 2, 1, 3, 4, 1, 2, 1, 1, 3, 2,
     4, 1, 2, 3, 1, 3, 2, 3, 2, 4, 3, 4, 3, 1, 2, 1, 4, 1, 1,
     3, 1, 3, 2, 1, 4), step33 = c(3, 3, 4, 2, 4, 4, 2, 3, 1,
     4, 2, 1, 3, 4, 1, 2, 1, 1, 3, 2, 4, 1, 2, 3, 1, 3, 2, 3,
     2, 4, 3, 4, 3, 1, 2, 1, 4, 2, 1, 3, 1, 3, 2, 1, 4), step34 = c(3,
     3, 4, 2, 4, 4, 2, 3, 1, 4, 2, 1, 3, 4, 1, 2, 1, 1, 3, 2,
     4, 1, 2, 3, 1, 1, 2, 3, 2, 4, 3, 4, 3, 1, 2, 1, 4, 2, 1,
     3, 3, 3, 2, 1, 4), step43 = c(3, 3, 4, 2, 4, 2, 2, 3, 1,
     4, 2, 1, 3, 4, 1, 2, 1, 1, 3, 2, 4, 1, 2, 3, 1, 1, 2, 3,
     2, 4, 3, 4, 3, 1, 2, 1, 4, 2, 1, 3, 3, 3, 2, 1, 4), step45 = c(3,
     3, 4, 2, 4, 2, 2, 3, 1, 4, 2, 1, 3, 4, 1, 2, 1, 1, 3, 2,
     4, 1, 2, 3, 1, 1, 2, 3, 2, 4, 3, 4, 3, 1, 2, 1, 4, 2, 1,
     3, 4, 3, 2, 1, 4), step47 = c(3, 3, 4, 2, 4, 2, 2, 3, 1,
     4, 2, 1, 4, 4, 1, 2, 1, 1, 3, 2, 4, 1, 2, 3, 1, 1, 2, 3,
     2, 4, 3, 4, 3, 1, 2, 1, 4, 2, 1, 3, 4, 3, 2, 1, 4), step48 = c(3,
     3, 4, 2, 4, 2, 2, 3, 1, 1, 2, 1, 4, 4, 1, 2, 1, 1, 3, 2,
     4, 1, 2, 3, 1, 1, 2, 3, 2, 4, 3, 4, 3, 1, 2, 4, 4, 2, 1,
     3, 4, 3, 2, 1, 4), step49 = c(3, 3, 4, 2, 4, 2, 2, 3, 1,
     1, 2, 1, 4, 4, 3, 2, 1, 1, 3, 2, 4, 1, 2, 3, 1, 1, 2, 3,
     2, 4, 3, 4, 3, 1, 2, 4, 4, 2, 1, 3, 4, 3, 2, 1, 4)), list(
     step0 = c(4, 3, 1, 1, 1, 4, 2, 3, 1, 4, 2, 2, 1, 3, 2,
     3, 2, 3, 2, 1, 2, 3, 1, 1, 2, 3, 4, 3, 4, 1, 2, 1, 3,
     3, 4, 2, 4, 3, 1, 4, 4, 1, 4, 2, 4), step2 = c(4, 3,
     2, 1, 1, 4, 2, 3, 1, 4, 2, 2, 1, 3, 1, 3, 2, 3, 2, 1,
     2, 3, 1, 1, 2, 3, 4, 3, 4, 1, 2, 1, 3, 3, 4, 2, 4, 3,
     1, 4, 4, 1, 4, 2, 4), step3 = c(4, 3, 2, 1, 1, 4, 2,
     3, 1, 4, 2, 2, 1, 3, 1, 3, 2, 3, 2, 1, 2, 3, 1, 1, 2,
     3, 4, 3, 4, 2, 2, 1, 3, 3, 4, 2, 4, 3, 1, 4, 4, 1, 4,
     2, 4), step6 = c(4, 3, 2, 1, 1, 4, 2, 3, 1, 4, 2, 2,
     1, 3, 1, 3, 2, 3, 2, 1, 2, 3, 1, 1, 2, 3, 2, 3, 4, 2,
     2, 1, 3, 3, 4, 4, 4, 3, 1, 4, 4, 1, 4, 2, 4), step8 = c(4,
     3, 2, 1, 1, 4, 2, 3, 1, 4, 2, 2, 1, 3, 1, 4, 2, 3, 2,
     1, 2, 3, 1, 1, 2, 3, 2, 3, 4, 2, 2, 1, 3, 3, 4, 3, 4,
     3, 1, 4, 4, 1, 4, 2, 4), step12 = c(4, 3, 2, 1, 1, 4,
     4, 3, 1, 4, 2, 2, 1, 3, 1, 4, 2, 3, 2, 1, 2, 3, 1, 1,
     2, 3, 2, 3, 4, 2, 2, 1, 3, 3, 4, 3, 4, 3, 1, 4, 2, 1,
     4, 2, 4), step14 = c(1, 3, 2, 4, 1, 4, 4, 3, 1, 4, 2,
     2, 1, 3, 1, 4, 2, 3, 2, 1, 2, 3, 1, 1, 2, 3, 2, 3, 4,
     2, 2, 1, 3, 3, 4, 3, 4, 3, 1, 4, 2, 1, 4, 2, 4), step15 = c(1,
     3, 2, 4, 1, 4, 4, 3, 1, 4, 2, 2, 1, 3, 1, 4, 2, 3, 2,
     1, 2, 3, 1, 1, 2, 3, 2, 3, 4, 2, 2, 1, 3, 3, 4, 3, 4,
     1, 1, 4, 2, 1, 4, 2, 4), step17 = c(1, 3, 2, 4, 1, 4,
     4, 3, 1, 4, 2, 2, 1, 3, 1, 4, 2, 3, 2, 1, 2, 3, 1, 1,
     2, 3, 2, 3, 4, 2, 2, 1, 3, 3, 4, 3, 4, 1, 1, 4, 2, 1,
     4, 3, 4), step18 = c(1, 3, 2, 4, 1, 4, 4, 3, 1, 4, 2,
     2, 4, 3, 1, 4, 2, 3, 2, 1, 2, 3, 1, 1, 2, 3, 2, 3, 4,
     2, 2, 1, 3, 3, 4, 3, 1, 1, 1, 4, 2, 1, 4, 3, 4), step19 = c(1,
     3, 2, 4, 1, 4, 4, 3, 1, 4, 2, 2, 4, 3, 1, 4, 2, 2, 2,
     1, 2, 3, 1, 1, 2, 3, 2, 3, 4, 2, 2, 1, 3, 3, 4, 3, 1,
     1, 1, 4, 2, 1, 4, 3, 4), step20 = c(1, 3, 2, 4, 1, 4,
     4, 1, 1, 4, 2, 2, 4, 3, 1, 4, 2, 2, 2, 1, 2, 3, 1, 1,
     2, 3, 2, 3, 4, 2, 2, 1, 3, 3, 4, 3, 3, 1, 1, 4, 2, 1,
     4, 3, 4), step27 = c(1, 3, 2, 4, 1, 4, 4, 1, 1, 4, 2,
     2, 4, 3, 1, 4, 2, 2, 2, 1, 2, 3, 1, 1, 2, 3, 2, 3, 4,
     2, 2, 1, 3, 3, 4, 3, 3, 1, 4, 4, 2, 1, 4, 3, 4), step30 = c(1,
     3, 2, 4, 1, 3, 4, 1, 1, 4, 2, 2, 4, 3, 1, 4, 2, 2, 2,
     1, 2, 3, 1, 1, 2, 3, 2, 4, 4, 2, 2, 1, 3, 3, 4, 3, 3,
     1, 4, 4, 2, 1, 4, 3, 4), step34 = c(1, 3, 2, 4, 1, 3,
     4, 1, 1, 4, 2, 2, 4, 3, 1, 4, 4, 2, 2, 1, 2, 3, 1, 1,
     2, 3, 2, 4, 4, 2, 2, 1, 3, 3, 2, 3, 3, 1, 4, 4, 2, 1,
     4, 3, 4), step35 = c(1, 3, 2, 4, 1, 3, 4, 1, 1, 4, 1,
     2, 4, 3, 1, 4, 4, 2, 2, 1, 2, 3, 1, 1, 2, 3, 2, 4, 4,
     2, 2, 1, 3, 3, 2, 3, 3, 1, 4, 4, 2, 1, 4, 3, 4), step41 = c(1,
     3, 2, 4, 1, 3, 4, 1, 1, 4, 1, 2, 4, 3, 1, 4, 4, 2, 2,
     1, 2, 3, 1, 1, 2, 3, 2, 4, 4, 2, 2, 1, 3, 3, 4, 3, 3,
     1, 4, 4, 2, 1, 4, 3, 4), step44 = c(1, 3, 2, 2, 1, 3,
     4, 1, 1, 4, 1, 2, 4, 3, 1, 4, 4, 2, 2, 1, 2, 3, 1, 1,
     2, 3, 2, 4, 4, 2, 4, 1, 3, 3, 4, 3, 3, 1, 4, 4, 2, 1,
     4, 3, 4), step77 = c(1, 3, 2, 2, 1, 3, 4, 1, 1, 4, 1,
     2, 4, 3, 1, 4, 4, 2, 2, 1, 2, 3, 1, 1, 2, 3, 2, 4, 4,
     2, 4, 1, 3, 3, 4, 2, 3, 1, 4, 4, 2, 1, 4, 3, 4), step88 = c(1,
     3, 2, 2, 1, 3, 4, 1, 1, 4, 1, 2, 4, 3, 1, 4, 4, 2, 2,
     1, 2, 3, 1, 1, 2, 3, 2, 4, 4, 2, 4, 1, 3, 3, 4, 2, 3,
     1, 4, 4, 2, 1, 3, 4, 4), step89 = c(1, 3, 2, 2, 1, 3,
     4, 1, 1, 4, 1, 2, 4, 3, 1, 4, 4, 2, 2, 1, 2, 3, 1, 1,
     2, 3, 2, 4, 4, 3, 4, 1, 3, 3, 4, 2, 3, 1, 4, 4, 2, 1,
     3, 4, 4), step98 = c(1, 3, 2, 2, 1, 3, 4, 1, 1, 4, 1,
     2, 4, 3, 1, 4, 4, 2, 2, 3, 2, 3, 1, 1, 2, 3, 2, 4, 4,
     1, 4, 1, 3, 3, 4, 2, 3, 1, 4, 4, 2, 1, 3, 4, 4)), list(
     step0 = c(4, 3, 1, 3, 4, 2, 3, 1, 3, 4, 1, 2, 3, 1, 1,
     2, 4, 1, 2, 4, 2, 3, 3, 2, 1, 1, 1, 3, 2, 3, 4, 1, 4,
     4, 2, 1, 2, 4, 3, 3, 4, 2, 1, 4, 2), step3 = c(4, 3,
     1, 3, 4, 2, 3, 1, 3, 4, 1, 2, 3, 1, 1, 2, 4, 1, 2, 4,
     1, 3, 3, 2, 1, 1, 1, 3, 2, 3, 4, 1, 4, 4, 2, 1, 2, 4,
     3, 3, 4, 2, 1, 4, 2), step4 = c(4, 3, 1, 3, 4, 2, 3,
     1, 3, 4, 1, 2, 3, 1, 1, 2, 4, 1, 2, 2, 1, 3, 3, 4, 1,
     1, 1, 3, 2, 3, 4, 1, 4, 4, 2, 1, 2, 4, 3, 3, 4, 2, 1,
     4, 2), step7 = c(4, 3, 1, 3, 4, 2, 3, 1, 3, 4, 1, 2,
     3, 3, 1, 2, 4, 1, 2, 2, 1, 3, 3, 4, 1, 1, 1, 3, 2, 3,
     4, 1, 4, 4, 2, 1, 2, 4, 3, 3, 4, 2, 1, 4, 2), step8 = c(4,
     3, 1, 2, 4, 2, 3, 1, 3, 4, 1, 2, 3, 3, 1, 2, 4, 1, 2,
     2, 1, 3, 3, 4, 1, 1, 1, 3, 2, 3, 4, 1, 4, 4, 2, 1, 2,
     4, 3, 3, 4, 2, 1, 4, 3), step14 = c(4, 3, 1, 2, 4, 2,
     3, 1, 3, 4, 4, 2, 3, 3, 1, 2, 4, 1, 2, 2, 1, 3, 3, 1,
     1, 1, 1, 3, 2, 3, 4, 1, 4, 4, 2, 1, 2, 4, 3, 3, 4, 2,
     1, 4, 3), step20 = c(4, 3, 1, 2, 4, 2, 3, 1, 3, 4, 4,
     2, 3, 3, 1, 2, 4, 1, 4, 2, 1, 3, 3, 1, 1, 1, 1, 3, 2,
     3, 4, 1, 4, 2, 2, 1, 2, 4, 3, 3, 4, 2, 1, 4, 3), step21 = c(4,
     3, 1, 2, 4, 2, 3, 1, 3, 4, 4, 2, 3, 3, 1, 2, 4, 1, 4,
     2, 1, 3, 3, 1, 1, 1, 1, 2, 2, 3, 4, 1, 4, 2, 2, 1, 2,
     4, 3, 3, 4, 2, 1, 4, 3), step23 = c(4, 3, 1, 2, 4, 2,
     3, 1, 3, 4, 4, 2, 3, 3, 1, 3, 4, 1, 4, 2, 1, 3, 3, 1,
     1, 1, 1, 2, 2, 3, 4, 1, 4, 2, 2, 1, 2, 4, 3, 3, 4, 2,
     1, 4, 3), step29 = c(4, 3, 1, 2, 4, 2, 3, 1, 3, 4, 4,
     2, 3, 3, 1, 3, 4, 1, 4, 2, 1, 3, 3, 1, 1, 1, 1, 2, 2,
     3, 4, 1, 4, 2, 2, 1, 2, 4, 3, 3, 4, 2, 1, 3, 3), step35 = c(4,
     3, 1, 2, 4, 2, 3, 1, 3, 4, 4, 2, 3, 3, 1, 3, 4, 1, 4,
     2, 1, 3, 4, 1, 1, 1, 1, 2, 2, 3, 4, 1, 4, 2, 2, 1, 2,
     4, 3, 3, 4, 2, 1, 3, 3), step36 = c(4, 3, 1, 2, 4, 2,
     3, 2, 3, 4, 4, 1, 3, 3, 1, 3, 4, 1, 4, 2, 1, 3, 4, 1,
     1, 1, 1, 2, 2, 3, 4, 1, 4, 2, 2, 1, 2, 4, 3, 3, 4, 2,
     1, 3, 3), step47 = c(4, 3, 1, 2, 4, 2, 3, 2, 1, 4, 4,
     1, 3, 3, 1, 3, 4, 1, 4, 2, 1, 3, 4, 1, 1, 1, 1, 2, 2,
     3, 4, 1, 4, 2, 2, 1, 2, 4, 3, 3, 4, 2, 1, 3, 3), step52 = c(4,
     3, 1, 2, 4, 2, 3, 2, 1, 4, 4, 1, 3, 3, 1, 3, 4, 1, 4,
     2, 1, 4, 4, 1, 1, 1, 1, 2, 2, 3, 4, 1, 3, 2, 2, 1, 2,
     4, 3, 3, 4, 2, 1, 3, 3), step61 = c(4, 3, 1, 2, 4, 2,
     3, 2, 1, 4, 2, 1, 3, 3, 1, 3, 4, 1, 4, 2, 1, 4, 4, 1,
     1, 1, 1, 2, 2, 3, 4, 1, 3, 2, 2, 1, 2, 4, 3, 3, 4, 2,
     1, 3, 3), step72 = c(4, 3, 1, 2, 4, 2, 3, 2, 1, 4, 2,
     1, 3, 1, 1, 3, 4, 1, 4, 2, 3, 4, 4, 1, 1, 1, 1, 2, 2,
     3, 4, 1, 3, 2, 2, 1, 2, 4, 3, 3, 4, 2, 1, 3, 3), step81 = c(4,
     3, 1, 2, 4, 2, 3, 2, 1, 4, 2, 1, 3, 1, 4, 3, 4, 1, 4,
     2, 3, 4, 4, 1, 1, 1, 1, 2, 2, 3, 4, 1, 3, 2, 2, 1, 2,
     4, 3, 3, 4, 2, 1, 3, 3)), list(step0 = c(3, 3, 4, 3,
     3, 2, 4, 3, 1, 2, 4, 2, 3, 2, 1, 4, 3, 3, 2, 3, 3, 2, 1,
     1, 4, 1, 4, 4, 3, 1, 1, 2, 4, 2, 4, 1, 1, 4, 1, 2, 4, 2,
     2, 1, 1), step2 = c(3, 3, 4, 3, 1, 2, 4, 3, 1, 2, 4, 2, 3,
     2, 3, 4, 3, 3, 2, 3, 3, 2, 1, 1, 4, 1, 4, 4, 3, 1, 1, 2,
     4, 2, 4, 1, 1, 4, 1, 2, 4, 2, 2, 1, 1), step6 = c(3, 3, 4,
     3, 1, 2, 4, 3, 1, 2, 4, 2, 3, 2, 3, 4, 3, 3, 2, 3, 3, 2,
     1, 1, 4, 2, 4, 4, 3, 1, 1, 1, 4, 2, 4, 1, 1, 4, 1, 2, 4,
     2, 2, 1, 1), step8 = c(3, 3, 2, 3, 1, 2, 4, 3, 1, 2, 4, 2,
     3, 2, 3, 4, 3, 3, 4, 3, 3, 2, 1, 1, 4, 2, 4, 4, 3, 1, 1,
     1, 4, 2, 4, 1, 1, 4, 1, 2, 4, 2, 2, 1, 1), step12 = c(3,
     3, 2, 3, 1, 2, 4, 4, 1, 2, 4, 2, 3, 2, 3, 4, 3, 3, 4, 3,
     3, 2, 1, 1, 4, 2, 4, 4, 3, 1, 1, 1, 4, 2, 4, 1, 1, 3, 1,
     2, 4, 2, 2, 1, 1), step15 = c(3, 4, 2, 3, 1, 2, 4, 4, 1,
     2, 4, 2, 3, 2, 3, 4, 3, 3, 4, 3, 3, 2, 1, 1, 4, 2, 4, 4,
     3, 1, 1, 1, 4, 2, 4, 1, 1, 3, 1, 2, 4, 2, 2, 1, 1), step20 = c(3,
     4, 2, 3, 1, 2, 4, 4, 1, 2, 4, 2, 3, 2, 3, 4, 3, 2, 4, 3,
     3, 2, 1, 1, 4, 2, 4, 4, 3, 1, 1, 1, 4, 3, 4, 1, 1, 3, 1,
     2, 4, 2, 2, 1, 1), step24 = c(3, 4, 2, 2, 1, 2, 4, 4, 1,
     2, 4, 2, 3, 2, 3, 4, 3, 3, 4, 3, 3, 2, 1, 1, 4, 2, 4, 4,
     3, 1, 1, 1, 4, 3, 4, 1, 1, 3, 1, 2, 4, 2, 2, 1, 1), step25 = c(3,
     4, 2, 2, 1, 2, 4, 4, 1, 2, 4, 2, 3, 2, 3, 4, 3, 2, 4, 3,
     3, 2, 1, 1, 4, 2, 4, 4, 3, 1, 1, 1, 4, 3, 4, 1, 1, 3, 1,
     2, 4, 2, 2, 1, 1), step31 = c(3, 4, 2, 2, 1, 2, 4, 4, 1,
     2, 4, 2, 3, 2, 3, 4, 3, 2, 4, 3, 3, 2, 1, 1, 4, 2, 4, 4,
     3, 1, 1, 1, 4, 3, 4, 4, 1, 3, 1, 2, 4, 2, 2, 1, 1), step33 = c(3,
     4, 2, 2, 1, 2, 4, 4, 1, 2, 4, 2, 3, 2, 3, 4, 3, 2, 4, 1,
     3, 2, 1, 1, 4, 2, 4, 4, 3, 1, 1, 1, 4, 3, 4, 4, 1, 3, 1,
     2, 4, 2, 2, 1, 1), step35 = c(3, 4, 2, 2, 1, 3, 4, 4, 1,
     2, 4, 2, 3, 2, 3, 4, 3, 2, 4, 1, 3, 2, 1, 1, 4, 2, 4, 4,
     3, 1, 1, 1, 4, 3, 4, 4, 1, 3, 1, 2, 4, 2, 2, 1, 1), step39 = c(3,
     4, 2, 2, 1, 3, 4, 4, 1, 2, 4, 2, 3, 2, 3, 4, 3, 2, 4, 1,
     3, 2, 1, 1, 4, 2, 4, 4, 3, 1, 1, 1, 4, 3, 4, 4, 1, 3, 1,
     2, 4, 2, 2, 3, 1), step45 = c(3, 4, 2, 2, 1, 3, 4, 4, 1,
     2, 4, 2, 3, 1, 3, 4, 3, 2, 4, 1, 3, 2, 1, 1, 4, 2, 4, 4,
     3, 1, 1, 1, 4, 3, 4, 4, 1, 3, 1, 2, 4, 2, 2, 3, 1), step52 = c(1,
     4, 2, 2, 1, 3, 4, 4, 1, 2, 4, 2, 3, 1, 3, 4, 3, 2, 4, 1,
     3, 2, 1, 1, 4, 2, 4, 4, 3, 3, 1, 1, 4, 3, 4, 4, 1, 3, 1,
     2, 4, 2, 2, 3, 1), step54 = c(1, 4, 3, 2, 1, 3, 4, 4, 1,
     2, 4, 2, 3, 1, 3, 4, 3, 2, 4, 1, 3, 2, 1, 1, 4, 2, 4, 4,
     3, 3, 1, 1, 4, 2, 4, 4, 1, 3, 1, 2, 4, 2, 2, 3, 1), step57 = c(1,
     4, 3, 2, 1, 3, 4, 4, 1, 2, 4, 2, 3, 1, 3, 2, 3, 2, 4, 1,
     3, 2, 1, 1, 4, 2, 4, 4, 3, 3, 1, 1, 4, 2, 4, 4, 1, 3, 1,
     2, 4, 2, 2, 3, 1), step71 = c(1, 4, 3, 2, 1, 3, 4, 4, 1,
     2, 4, 2, 3, 1, 3, 2, 3, 2, 4, 1, 3, 2, 1, 1, 4, 2, 4, 4,
     3, 3, 1, 1, 4, 2, 4, 4, 1, 3, 2, 2, 4, 2, 2, 3, 1), step78 = c(1,
     4, 3, 2, 1, 3, 4, 4, 1, 2, 4, 2, 3, 1, 3, 2, 3, 2, 4, 1,
     3, 2, 1, 1, 4, 2, 4, 4, 3, 3, 1, 3, 4, 2, 4, 4, 1, 1, 2,
     2, 4, 2, 2, 3, 1), step89 = c(1, 4, 3, 2, 1, 3, 3, 4, 1,
     2, 4, 2, 3, 1, 3, 2, 3, 2, 4, 1, 3, 2, 1, 1, 4, 2, 4, 4,
     3, 3, 1, 3, 4, 2, 4, 4, 1, 1, 2, 2, 4, 2, 2, 3, 1)), list(
     step0 = c(2, 2, 3, 1, 1, 1, 3, 4, 3, 2, 4, 1, 4, 4, 4,
     1, 2, 4, 1, 2, 2, 2, 4, 3, 3, 4, 4, 3, 1, 3, 1, 3, 3,
     1, 3, 4, 2, 1, 4, 1, 1, 2, 2, 3, 2), step3 = c(2, 2,
     3, 1, 1, 1, 3, 4, 3, 2, 4, 1, 4, 4, 4, 1, 2, 4, 1, 2,
     2, 2, 4, 3, 3, 4, 4, 3, 1, 3, 1, 3, 3, 4, 3, 4, 2, 1,
     4, 1, 1, 2, 2, 3, 2), step4 = c(2, 2, 3, 1, 1, 1, 3,
     4, 3, 2, 4, 1, 4, 4, 4, 1, 2, 4, 1, 2, 2, 2, 4, 3, 3,
     4, 4, 3, 2, 3, 1, 3, 3, 4, 3, 4, 2, 1, 4, 1, 1, 2, 2,
     3, 1), step7 = c(2, 2, 3, 1, 1, 1, 3, 4, 3, 2, 4, 1,
     4, 4, 4, 1, 2, 4, 1, 2, 2, 2, 4, 3, 3, 4, 4, 3, 2, 3,
     1, 3, 3, 4, 3, 4, 2, 1, 4, 1, 1, 2, 2, 3, 3), step8 = c(2,
     2, 3, 1, 1, 1, 3, 2, 3, 2, 4, 1, 4, 4, 4, 1, 2, 4, 1,
     2, 2, 2, 4, 3, 3, 4, 4, 3, 2, 3, 1, 3, 3, 4, 3, 4, 2,
     1, 4, 1, 1, 4, 2, 3, 3), step15 = c(2, 2, 3, 1, 1, 1,
     3, 2, 3, 2, 4, 1, 4, 4, 2, 1, 2, 4, 1, 2, 2, 2, 4, 3,
     3, 4, 4, 3, 2, 3, 1, 3, 3, 4, 3, 4, 2, 1, 4, 1, 1, 4,
     2, 3, 3), step18 = c(3, 2, 3, 1, 1, 1, 3, 2, 3, 2, 4,
     1, 4, 4, 2, 1, 2, 4, 1, 2, 2, 2, 4, 3, 3, 4, 4, 3, 2,
     3, 1, 3, 3, 4, 2, 4, 2, 1, 4, 1, 1, 4, 2, 3, 3), step24 = c(3,
     2, 3, 1, 1, 1, 3, 2, 3, 2, 4, 1, 4, 4, 2, 3, 2, 4, 1,
     2, 2, 2, 4, 3, 3, 4, 4, 3, 2, 1, 1, 3, 3, 4, 2, 4, 2,
     1, 4, 1, 1, 4, 2, 3, 3), step27 = c(3, 2, 3, 1, 1, 1,
     3, 2, 4, 2, 4, 1, 4, 4, 2, 3, 2, 4, 1, 2, 2, 2, 4, 3,
     3, 4, 4, 3, 2, 1, 1, 3, 3, 4, 2, 4, 2, 1, 4, 1, 1, 4,
     2, 3, 3), step28 = c(3, 2, 3, 1, 1, 1, 3, 2, 4, 2, 4,
     1, 3, 4, 2, 3, 2, 4, 1, 2, 2, 2, 4, 3, 3, 4, 4, 4, 2,
     1, 1, 3, 3, 4, 2, 4, 2, 1, 4, 1, 1, 4, 2, 3, 3), step34 = c(3,
     2, 3, 1, 1, 1, 3, 2, 4, 2, 4, 1, 3, 4, 2, 3, 2, 4, 1,
     2, 2, 2, 4, 3, 3, 4, 4, 3, 2, 1, 1, 3, 4, 4, 2, 4, 2,
     1, 4, 1, 1, 4, 2, 3, 3), step38 = c(3, 2, 3, 1, 1, 1,
     3, 2, 4, 2, 4, 1, 3, 4, 2, 3, 2, 4, 1, 2, 2, 2, 4, 3,
     3, 4, 4, 3, 2, 1, 1, 3, 1, 4, 2, 4, 2, 1, 4, 4, 1, 4,
     2, 3, 3), step39 = c(3, 2, 3, 1, 1, 1, 3, 2, 4, 2, 4,
     1, 3, 4, 2, 3, 2, 4, 1, 2, 2, 4, 4, 3, 3, 4, 4, 3, 2,
     1, 1, 3, 1, 4, 2, 4, 2, 1, 4, 4, 1, 4, 2, 3, 3), step48 = c(3,
     2, 3, 1, 1, 1, 3, 2, 4, 2, 4, 1, 3, 4, 2, 3, 2, 4, 1,
     2, 2, 2, 4, 3, 3, 4, 4, 3, 2, 1, 1, 3, 1, 4, 4, 4, 2,
     1, 4, 4, 1, 4, 2, 3, 3), step55 = c(3, 2, 3, 1, 1, 1,
     3, 2, 4, 4, 4, 1, 3, 4, 2, 3, 2, 4, 1, 2, 2, 2, 4, 3,
     3, 4, 4, 3, 2, 1, 1, 3, 1, 4, 4, 4, 2, 1, 4, 4, 1, 4,
     2, 3, 3), step57 = c(3, 2, 3, 1, 1, 1, 3, 2, 4, 4, 4,
     1, 3, 4, 2, 3, 2, 4, 1, 2, 2, 2, 4, 3, 3, 4, 4, 3, 2,
     1, 2, 3, 1, 4, 4, 4, 2, 1, 4, 4, 1, 4, 2, 3, 3), step61 = c(3,
     2, 3, 1, 1, 1, 3, 2, 4, 4, 4, 1, 3, 4, 2, 3, 2, 4, 1,
     2, 2, 2, 4, 3, 3, 4, 4, 3, 2, 1, 2, 3, 1, 4, 4, 4, 2,
     1, 4, 3, 1, 4, 2, 3, 3), step69 = c(3, 2, 3, 1, 1, 1,
     3, 2, 4, 4, 4, 1, 3, 4, 2, 3, 2, 4, 1, 2, 2, 2, 4, 3,
     3, 4, 4, 3, 2, 1, 2, 3, 1, 4, 4, 2, 2, 1, 4, 3, 1, 4,
     2, 3, 3), step74 = c(4, 2, 3, 1, 1, 1, 3, 2, 4, 4, 4,
     1, 3, 4, 2, 3, 2, 4, 1, 2, 2, 2, 4, 3, 3, 4, 4, 3, 2,
     1, 2, 3, 1, 3, 4, 2, 2, 1, 4, 3, 1, 4, 2, 3, 3))))))
    where 13: (new("standardGeneric", .Data = function (object)
    standardGeneric("show"), generic = "show", package = "methods",
     group = list(), valueClass = character(0), signature = "object",
     default = new("derivedDefaultMethod", .Data = function (object)
     showDefault(object), target = new("signature", .Data = "ANY",
     names = "object", package = "methods"), defined = new("signature",
     .Data = "ANY", names = "object", package = "methods"),
     generic = "show"), skeleton = (new("derivedDefaultMethod",
     .Data = function (object)
     showDefault(object), target = new("signature", .Data = "ANY",
     names = "object", package = "methods"), defined = new("signature",
     .Data = "ANY", names = "object", package = "methods"),
     generic = "show"))(object)))(new("CrossoverSearchResult",
     design = new("CrossoverDesign", design = c(4, 3, 1, 2, 4,
     2, 3, 2, 1, 4, 2, 1, 3, 1, 4, 3, 4, 1, 4, 2, 3, 4, 4, 1,
     1, 1, 1, 2, 2, 3, 4, 1, 3, 2, 2, 1, 2, 4, 3, 3, 4, 2, 1,
     3, 3), s = 9L, p = 5L, v = 4, model = 4, description = "Found by search algorithm",
     attr = list(), misc = list()), startDesigns = list(c(1L,
     4L, 1L, 3L, 2L, 2L, 2L, 3L, 2L, 4L, 1L, 1L, 1L, 2L, 4L, 1L,
     4L, 3L, 4L, 3L, 3L, 1L, 4L, 1L, 3L, 4L, 1L, 1L, 4L, 2L, 4L,
     4L, 2L, 3L, 2L, 3L, 4L, 3L, 2L, 2L, 1L, 2L, 3L, 1L, 3L),
     c(4L, 1L, 3L, 3L, 2L, 1L, 2L, 2L, 4L, 1L, 4L, 2L, 4L,
     1L, 1L, 1L, 2L, 1L, 2L, 4L, 3L, 2L, 3L, 4L, 2L, 3L, 3L,
     1L, 4L, 4L, 2L, 1L, 3L, 3L, 1L, 2L, 1L, 1L, 2L, 4L, 3L,
     3L, 3L, 4L, 4L), c(4L, 3L, 4L, 3L, 3L, 1L, 1L, 3L, 2L,
     4L, 3L, 1L, 4L, 2L, 3L, 2L, 1L, 4L, 2L, 4L, 1L, 1L, 3L,
     2L, 1L, 2L, 1L, 1L, 3L, 2L, 3L, 4L, 4L, 1L, 2L, 3L, 2L,
     3L, 1L, 1L, 4L, 2L, 4L, 2L, 4L), c(1L, 2L, 3L, 2L, 2L,
     4L, 1L, 1L, 2L, 3L, 3L, 4L, 4L, 2L, 4L, 1L, 1L, 3L, 2L,
     3L, 4L, 3L, 4L, 1L, 1L, 2L, 1L, 2L, 1L, 2L, 3L, 4L, 4L,
     1L, 1L, 1L, 3L, 4L, 3L, 2L, 4L, 4L, 3L, 3L, 2L), c(3L,
     4L, 3L, 1L, 4L, 3L, 2L, 1L, 2L, 3L, 2L, 2L, 3L, 3L, 4L,
     1L, 4L, 2L, 1L, 3L, 4L, 4L, 1L, 3L, 1L, 4L, 4L, 2L, 1L,
     2L, 1L, 2L, 1L, 3L, 1L, 1L, 2L, 3L, 1L, 2L, 4L, 4L, 4L,
     2L, 3L), c(3L, 3L, 4L, 3L, 4L, 4L, 2L, 3L, 1L, 4L, 2L,
     4L, 1L, 4L, 2L, 3L, 1L, 1L, 3L, 2L, 4L, 1L, 2L, 2L, 1L,
     3L, 2L, 4L, 2L, 4L, 3L, 4L, 3L, 1L, 2L, 4L, 1L, 1L, 1L,
     3L, 2L, 3L, 2L, 1L, 1L), c(4L, 3L, 1L, 1L, 1L, 4L, 2L,
     3L, 1L, 4L, 2L, 2L, 1L, 3L, 2L, 3L, 2L, 3L, 2L, 1L, 2L,
     3L, 1L, 1L, 2L, 3L, 4L, 3L, 4L, 1L, 2L, 1L, 3L, 3L, 4L,
     2L, 4L, 3L, 1L, 4L, 4L, 1L, 4L, 2L, 4L), c(4L, 3L, 1L,
     3L, 4L, 2L, 3L, 1L, 3L, 4L, 1L, 2L, 3L, 1L, 1L, 2L, 4L,
     1L, 2L, 4L, 2L, 3L, 3L, 2L, 1L, 1L, 1L, 3L, 2L, 3L, 4L,
     1L, 4L, 4L, 2L, 1L, 2L, 4L, 3L, 3L, 4L, 2L, 1L, 4L, 2L
     ), c(3L, 3L, 4L, 3L, 3L, 2L, 4L, 3L, 1L, 2L, 4L, 2L,
     3L, 2L, 1L, 4L, 3L, 3L, 2L, 3L, 3L, 2L, 1L, 1L, 4L, 1L,
     4L, 4L, 3L, 1L, 1L, 2L, 4L, 2L, 4L, 1L, 1L, 4L, 1L, 2L,
     4L, 2L, 2L, 1L, 1L), c(2L, 2L, 3L, 1L, 1L, 1L, 3L, 4L,
     3L, 2L, 4L, 1L, 4L, 4L, 4L, 1L, 2L, 4L, 1L, 2L, 2L, 2L,
     4L, 3L, 3L, 4L, 4L, 3L, 1L, 3L, 1L, 3L, 3L, 1L, 3L, 4L,
     2L, 1L, 4L, 1L, 1L, 2L, 2L, 3L, 2L)), model = 4, eff = list(
     c(0.637964304141143, NA, NA, 0.660635633012685, 0.669678399109568,
     NA, NA, NA, 0.673610899186687, NA, NA, NA, NA, NA, NA,
     NA, NA, 0.715486285925919, 0.723102659924618, NA, 0.742161574192688,
     NA, NA, 0.771020167488905, NA, NA, 0.779502270334408,
     NA, NA, NA, 0.799005340342353, NA, 0.804397634348305,
     0.812710138725528, NA, NA, NA, NA, NA, NA, NA, NA, NA,
     0.815983849571131, NA, NA, NA, NA, NA, NA, NA, 0.81938649997033,
     NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 0.826657335225618,
     NA, 0.835239346365139, 0.842614192704045, NA, NA, NA,
     NA, NA, NA, NA, NA, 0.859361075299705, NA, NA, NA, NA,
     NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
     NA, NA, NA, NA, NA, NA), c(0.606300975911634, 0.619860532491684,
     NA, NA, 0.67511961795512, NA, 0.70193964292641, NA, 0.706729537424138,
     NA, NA, NA, NA, 0.729573820485202, NA, 0.734671707711715,
     NA, NA, NA, NA, 0.761949074827988, NA, NA, NA, 0.779443402653546,
     NA, NA, 0.79315272798287, NA, NA, NA, NA, NA, NA, NA,
     NA, NA, NA, 0.801225464560309, NA, NA, NA, NA, 0.805592704602365,
     NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 0.819615155782882,
     NA, 0.828953140758137, NA, NA, NA, NA, NA, NA, NA, NA,
     0.832518180160419, NA, NA, NA, NA, NA, 0.832854032583896,
     NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
     NA, NA, NA, 0.837171755006264, NA, NA, NA, NA, NA, NA,
     NA, 0.844855801064287, NA, NA), c(0.540544667424177,
     NA, NA, NA, NA, NA, 0.597246229139869, NA, 0.639370120068189,
     NA, NA, NA, NA, NA, NA, NA, NA, 0.643000069651316, 0.671006510729243,
     0.686839099872499, NA, NA, NA, 0.697188838833615, NA,
     NA, NA, NA, NA, NA, NA, NA, NA, NA, 0.757705064536388,
     NA, 0.779729877896966, NA, 0.787448292072523, NA, 0.790252721141113,
     NA, NA, 0.802567280723559, NA, NA, NA, NA, NA, NA, NA,
     NA, NA, NA, NA, 0.806628584605751, NA, NA, NA, NA, NA,
     NA, NA, NA, NA, NA, NA, NA, 0.825830993620804, NA, 0.826418917833876,
     NA, 0.841201068246976, NA, NA, NA, NA, 0.84387179923184,
     0.857614237669557, NA, NA, NA, NA, NA, NA, NA, NA, NA,
     NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA), c(0.476640887220334,
     NA, 0.546470684056955, NA, 0.60295225760103, NA, NA,
     NA, NA, NA, NA, NA, 0.634657597421934, NA, 0.67683331312007,
     NA, 0.707180112142248, NA, NA, NA, NA, NA, NA, NA, 0.725424018054169,
     NA, NA, NA, NA, NA, 0.73591846744616, 0.743840635188044,
     NA, NA, 0.767662168743457, NA, NA, NA, NA, NA, NA, NA,
     NA, 0.777963465342466, NA, 0.784219547540513, NA, NA,
     NA, NA, NA, NA, NA, NA, 0.804876771354321, NA, NA, NA,
     NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
     0.819262641455846, NA, NA, NA, NA, NA, NA, NA, NA, NA,
     NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 0.823045036136124,
     NA, NA, NA, NA, NA), c(0.500537635365731, NA, 0.535850341505799,
     NA, NA, NA, 0.605314173674306, NA, 0.64788952491278,
     NA, NA, NA, 0.683665067413962, NA, NA, NA, NA, 0.684610936567089,
     NA, NA, NA, NA, NA, NA, 0.696793966073255, NA, NA, NA,
     NA, NA, 0.697604761785406, NA, 0.762719962212372, NA,
     0.772616398507881, NA, NA, NA, NA, NA, NA, NA, NA, NA,
     0.777687403479506, 0.78627274917567, NA, 0.810360282031576,
     NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
     NA, 0.812691350321697, NA, 0.825508881133355, NA, NA,
     NA, NA, NA, NA, NA, NA, 0.839172595968909, NA, NA, NA,
     NA, NA, NA, NA, NA, NA, 0.841553430638484, NA, NA, NA,
     NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA), c(0.64206382495612,
     NA, NA, NA, 0.654189191637459, NA, NA, NA, NA, 0.658943326033152,
     0.680238970017268, NA, NA, NA, NA, NA, NA, NA, NA, 0.684448556437844,
     NA, 0.686083784324383, NA, 0.687102177611055, NA, NA,
     0.689182306402837, 0.69488855127681, 0.732846882139593,
     NA, NA, 0.736204746439888, NA, 0.737085659172046, 0.785334277974024,
     NA, NA, NA, NA, NA, NA, NA, NA, 0.796485559729499, NA,
     0.804258782837227, NA, 0.812713742105537, 0.82749047997166,
     0.83770181085422, NA, NA, NA, NA, NA, NA, NA, NA, NA,
     NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
     NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
     NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA),
     c(0.560019257513758, NA, 0.59002248728111, 0.591737023439956,
     NA, NA, 0.612493886227937, NA, 0.628808548205091, NA,
     NA, NA, 0.64036605130092, NA, 0.671333347078539, 0.702532185017751,
     NA, 0.722656578618891, 0.734704394981768, 0.739539171026051,
     0.748558339260159, NA, NA, NA, NA, NA, NA, 0.761606167378135,
     NA, NA, 0.780317686728819, NA, NA, NA, 0.794342376784399,
     0.799802787394848, NA, NA, NA, NA, NA, 0.80744932612716,
     NA, NA, 0.809721279521529, NA, NA, NA, NA, NA, NA, NA,
     NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
     NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 0.820189999897601,
     NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 0.821692459253902,
     0.828578698448422, NA, NA, NA, NA, NA, NA, NA, NA, 0.834520578339367,
     NA), c(0.643315763553789, NA, NA, 0.647910994632837,
     0.649390347889097, NA, NA, 0.655870884053047, 0.678849573236897,
     NA, NA, NA, NA, NA, 0.702893612318084, NA, NA, NA, NA,
     NA, 0.714080922513508, 0.719022828361366, NA, 0.742682134481133,
     NA, NA, NA, NA, NA, 0.744599241242644, NA, NA, NA, NA,
     NA, 0.756954660857737, 0.760384176664876, NA, NA, NA,
     NA, NA, NA, NA, NA, NA, NA, 0.7910400533543, NA, NA,
     NA, NA, 0.81568011273231, NA, NA, NA, NA, NA, NA, NA,
     NA, 0.828884232571578, NA, NA, NA, NA, NA, NA, NA, NA,
     NA, NA, 0.857746731060882, NA, NA, NA, NA, NA, NA, NA,
     NA, 0.880789221702651, NA, NA, NA, NA, NA, NA, NA, NA,
     NA, NA, NA, NA, NA, NA, NA, NA, NA, NA), c(0.624819520371986,
     NA, 0.648638057932525, NA, NA, NA, 0.674758910701905,
     NA, 0.684815071131943, NA, NA, NA, 0.709105937672733,
     NA, NA, 0.720378350122078, NA, NA, NA, NA, 0.730387028818458,
     NA, NA, NA, 0.754754732653994, 0.758324219238764, NA,
     NA, NA, NA, NA, 0.772942673498325, NA, 0.78618539626392,
     NA, 0.809813545735391, NA, NA, NA, 0.823906126482674,
     NA, NA, NA, NA, NA, 0.830978296195516, NA, NA, NA, NA,
     NA, NA, 0.837002186878194, NA, 0.84355925736234, NA,
     NA, 0.850154035273961, NA, NA, NA, NA, NA, NA, NA, NA,
     NA, NA, NA, NA, NA, 0.856521982041404, NA, NA, NA, NA,
     NA, NA, 0.873897991247284, NA, NA, NA, NA, NA, NA, NA,
     NA, NA, NA, 0.874061088625315, NA, NA, NA, NA, NA, NA,
     NA, NA, NA, NA), c(0.579044995241179, NA, NA, 0.594246232015653,
     0.633139689470443, NA, NA, 0.650721257902673, 0.664723893559122,
     NA, NA, NA, NA, NA, NA, 0.675114374185087, NA, NA, 0.703800022126619,
     NA, NA, NA, NA, NA, 0.730152127754334, NA, NA, 0.746427158984179,
     0.749792327820789, NA, NA, NA, NA, NA, 0.782518907438576,
     NA, NA, NA, 0.790284816177575, 0.790977126019723, NA,
     NA, NA, NA, NA, NA, NA, NA, 0.79721206357445, NA, NA,
     NA, NA, NA, NA, 0.797483305231604, NA, 0.839711170660833,
     NA, NA, NA, 0.854511843203157, NA, NA, NA, NA, NA, NA,
     NA, 0.855176354989167, NA, NA, NA, NA, 0.878823676770073,
     NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
     NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA)), search = list(
     n = c(100, 10), jumps = c(5, 50)), time = c(user.self = 0.143,
     sys.self = 0, elapsed = 0.162, user.child = 0, sys.child = 0
     ), misc = list(designs = list(list(step0 = c(1, 4, 1, 3,
     2, 2, 2, 3, 2, 4, 1, 1, 1, 2, 4, 1, 4, 3, 4, 3, 3, 1, 4,
     1, 3, 4, 1, 1, 4, 2, 4, 4, 2, 3, 2, 3, 4, 3, 2, 2, 1, 2,
     3, 1, 3), step3 = c(1, 4, 1, 3, 2, 2, 3, 3, 2, 4, 1, 1, 1,
     2, 4, 1, 4, 3, 4, 3, 3, 1, 4, 1, 3, 4, 1, 1, 4, 2, 4, 4,
     2, 3, 2, 3, 4, 3, 2, 2, 1, 2, 3, 1, 3), step4 = c(1, 1, 4,
     3, 2, 2, 3, 3, 2, 4, 1, 1, 1, 2, 4, 1, 4, 3, 4, 3, 3, 1,
     4, 1, 3, 4, 1, 1, 4, 2, 4, 4, 2, 3, 2, 3, 4, 3, 2, 2, 1,
     2, 3, 1, 3), step8 = c(1, 1, 4, 3, 2, 2, 3, 3, 2, 4, 1, 1,
     1, 2, 4, 1, 4, 3, 4, 3, 3, 1, 4, 1, 3, 4, 1, 1, 4, 2, 3,
     4, 2, 3, 2, 3, 4, 4, 2, 2, 1, 2, 3, 1, 3), step17 = c(1,
     1, 4, 3, 2, 2, 3, 3, 2, 4, 1, 1, 1, 2, 4, 1, 4, 3, 4, 3,
     3, 1, 4, 1, 3, 4, 1, 1, 4, 2, 3, 4, 2, 3, 1, 3, 4, 4, 2,
     2, 1, 2, 3, 1, 3), step18 = c(1, 1, 3, 3, 2, 2, 3, 3, 2,
     4, 1, 1, 1, 2, 4, 1, 4, 3, 4, 3, 3, 1, 4, 1, 3, 4, 1, 1,
     4, 2, 4, 4, 2, 3, 1, 3, 4, 4, 2, 2, 1, 2, 3, 1, 3), step20 = c(1,
     1, 4, 3, 2, 2, 3, 3, 2, 4, 1, 1, 1, 2, 4, 1, 3, 3, 4, 3,
     3, 1, 4, 1, 3, 4, 1, 1, 4, 2, 4, 4, 2, 3, 1, 3, 4, 4, 2,
     2, 1, 2, 3, 1, 3), step23 = c(1, 1, 4, 3, 2, 2, 3, 3, 2,
     4, 1, 1, 1, 2, 4, 1, 3, 3, 4, 3, 2, 1, 4, 1, 3, 4, 1, 1,
     4, 2, 4, 4, 2, 3, 1, 3, 4, 4, 2, 2, 1, 2, 3, 1, 3), step26 = c(1,
     1, 4, 3, 2, 3, 3, 3, 2, 4, 1, 1, 1, 2, 4, 1, 3, 2, 4, 3,
     2, 1, 4, 1, 3, 4, 1, 1, 4, 2, 4, 4, 2, 3, 1, 3, 4, 4, 2,
     2, 1, 2, 3, 1, 3), step30 = c(1, 1, 4, 3, 2, 3, 3, 3, 2,
     4, 1, 1, 1, 2, 4, 1, 3, 2, 4, 3, 2, 1, 4, 1, 3, 3, 1, 1,
     4, 2, 4, 4, 2, 3, 1, 3, 4, 4, 2, 2, 1, 2, 3, 1, 4), step32 = c(1,
     1, 4, 3, 2, 3, 3, 3, 2, 4, 2, 1, 1, 2, 4, 1, 3, 2, 4, 3,
     2, 1, 4, 1, 3, 3, 1, 1, 4, 1, 4, 4, 2, 3, 1, 3, 4, 4, 2,
     2, 1, 2, 3, 1, 4), step33 = c(1, 1, 4, 3, 2, 3, 3, 4, 2,
     4, 2, 1, 1, 2, 4, 1, 3, 2, 4, 3, 2, 1, 4, 1, 3, 3, 1, 1,
     4, 1, 4, 4, 2, 3, 1, 3, 4, 4, 2, 2, 1, 2, 3, 1, 4), step43 = c(1,
     1, 4, 3, 2, 3, 3, 4, 2, 4, 2, 1, 1, 2, 4, 1, 3, 2, 4, 3,
     2, 1, 4, 1, 3, 3, 1, 2, 4, 1, 4, 4, 2, 3, 1, 3, 4, 4, 2,
     2, 1, 2, 3, 1, 4), step51 = c(1, 1, 4, 3, 2, 3, 3, 4, 1,
     4, 2, 1, 1, 2, 4, 1, 3, 2, 4, 3, 2, 1, 4, 1, 3, 3, 1, 2,
     4, 1, 4, 4, 2, 3, 1, 3, 4, 4, 2, 2, 1, 2, 3, 1, 4), step63 = c(1,
     1, 4, 3, 2, 3, 3, 4, 1, 4, 2, 1, 1, 4, 4, 1, 3, 2, 4, 3,
     2, 1, 4, 1, 3, 3, 1, 2, 4, 1, 4, 4, 2, 3, 1, 3, 4, 4, 2,
     2, 1, 2, 3, 1, 4), step65 = c(1, 1, 4, 3, 2, 3, 3, 1, 1,
     4, 2, 1, 1, 4, 4, 1, 3, 2, 4, 3, 2, 1, 4, 1, 3, 3, 1, 2,
     4, 1, 4, 4, 2, 3, 1, 3, 4, 4, 2, 2, 1, 2, 3, 1, 4), step66 = c(1,
     1, 4, 3, 2, 3, 3, 1, 2, 4, 2, 1, 1, 4, 4, 1, 3, 2, 4, 3,
     2, 1, 4, 1, 3, 3, 1, 2, 4, 1, 4, 4, 2, 3, 1, 3, 4, 4, 1,
     2, 1, 2, 3, 1, 4), step75 = c(1, 1, 4, 3, 2, 3, 3, 1, 2,
     4, 2, 1, 1, 3, 4, 1, 3, 2, 4, 3, 2, 1, 4, 1, 3, 3, 1, 2,
     4, 1, 4, 4, 2, 3, 1, 3, 4, 4, 1, 2, 1, 2, 3, 1, 4)), list(
     step0 = c(4, 1, 3, 3, 2, 1, 2, 2, 4, 1, 4, 2, 4, 1, 1,
     1, 2, 1, 2, 4, 3, 2, 3, 4, 2, 3, 3, 1, 4, 4, 2, 1, 3,
     3, 1, 2, 1, 1, 2, 4, 3, 3, 3, 4, 4), step1 = c(4, 1,
     3, 3, 2, 1, 2, 2, 4, 1, 4, 2, 4, 1, 1, 1, 2, 1, 2, 4,
     3, 2, 3, 4, 2, 3, 3, 1, 4, 4, 2, 1, 3, 3, 1, 2, 1, 1,
     2, 4, 3, 3, 4, 4, 4), step4 = c(4, 1, 3, 3, 2, 1, 2,
     2, 4, 3, 4, 2, 4, 1, 1, 1, 2, 1, 2, 4, 3, 2, 3, 4, 2,
     1, 3, 1, 4, 4, 2, 1, 3, 3, 1, 2, 1, 1, 2, 4, 3, 3, 4,
     4, 4), step6 = c(4, 1, 3, 3, 2, 1, 2, 2, 4, 3, 4, 2,
     4, 1, 1, 1, 2, 1, 2, 4, 3, 2, 3, 4, 2, 1, 3, 1, 4, 4,
     2, 1, 3, 3, 1, 2, 4, 1, 2, 4, 3, 3, 4, 1, 4), step8 = c(4,
     1, 3, 3, 2, 1, 2, 2, 4, 3, 4, 2, 4, 1, 1, 1, 2, 1, 2,
     4, 3, 2, 3, 4, 2, 1, 3, 1, 4, 4, 2, 1, 3, 3, 2, 2, 4,
     1, 1, 4, 3, 3, 4, 1, 4), step13 = c(4, 1, 3, 3, 2, 1,
     2, 2, 4, 3, 4, 2, 4, 1, 1, 1, 2, 2, 2, 4, 3, 2, 3, 4,
     2, 1, 3, 1, 4, 4, 2, 1, 3, 3, 2, 2, 4, 1, 1, 4, 3, 3,
     4, 1, 4), step15 = c(4, 1, 3, 3, 2, 1, 2, 2, 4, 3, 4,
     2, 4, 1, 1, 1, 2, 2, 2, 4, 3, 2, 3, 4, 2, 1, 3, 1, 4,
     4, 2, 1, 3, 3, 2, 2, 4, 1, 1, 1, 3, 3, 4, 1, 4), step20 = c(4,
     1, 3, 3, 2, 1, 2, 2, 4, 3, 2, 2, 4, 1, 1, 1, 4, 2, 2,
     4, 3, 2, 3, 4, 2, 1, 3, 1, 4, 4, 2, 1, 3, 3, 2, 2, 4,
     1, 1, 1, 3, 3, 4, 1, 4), step24 = c(4, 1, 3, 3, 2, 1,
     2, 2, 4, 3, 2, 2, 4, 1, 1, 3, 4, 2, 2, 4, 3, 2, 1, 4,
     2, 1, 3, 1, 4, 4, 2, 1, 3, 3, 2, 2, 4, 1, 1, 1, 3, 3,
     4, 1, 4), step27 = c(4, 1, 3, 3, 2, 1, 2, 2, 4, 3, 2,
     2, 4, 1, 1, 3, 4, 2, 2, 4, 3, 2, 1, 4, 2, 1, 3, 1, 4,
     4, 2, 1, 4, 3, 2, 2, 4, 1, 1, 1, 3, 3, 4, 1, 4), step38 = c(4,
     1, 3, 3, 2, 1, 2, 2, 4, 3, 2, 2, 4, 1, 1, 3, 4, 2, 2,
     4, 3, 2, 1, 4, 2, 1, 3, 1, 4, 2, 2, 1, 4, 3, 2, 4, 4,
     1, 1, 1, 3, 3, 4, 1, 4), step43 = c(4, 1, 3, 3, 2, 1,
     2, 2, 4, 3, 2, 2, 4, 1, 1, 3, 4, 2, 2, 4, 3, 2, 1, 4,
     2, 1, 3, 1, 2, 2, 2, 1, 4, 3, 2, 4, 4, 1, 1, 1, 3, 3,
     4, 1, 4), step54 = c(4, 1, 3, 3, 2, 1, 2, 2, 4, 3, 2,
     2, 4, 1, 1, 3, 4, 2, 2, 4, 1, 2, 1, 4, 2, 1, 3, 1, 2,
     2, 2, 1, 4, 3, 2, 4, 4, 3, 1, 1, 3, 3, 4, 1, 4), step56 = c(4,
     1, 3, 3, 2, 1, 2, 2, 4, 3, 2, 2, 4, 1, 1, 3, 4, 2, 2,
     4, 1, 3, 1, 4, 2, 1, 3, 1, 2, 2, 2, 1, 4, 3, 2, 4, 4,
     3, 1, 1, 2, 3, 4, 1, 4), step65 = c(4, 1, 3, 3, 2, 1,
     2, 2, 4, 3, 2, 2, 4, 1, 1, 3, 4, 2, 2, 4, 1, 3, 1, 4,
     2, 1, 3, 4, 2, 2, 2, 1, 4, 3, 2, 4, 4, 3, 1, 1, 2, 3,
     4, 1, 4), step71 = c(4, 1, 3, 3, 2, 1, 2, 2, 4, 3, 2,
     2, 4, 1, 1, 3, 4, 2, 2, 4, 1, 3, 1, 4, 2, 1, 3, 4, 2,
     2, 2, 1, 4, 3, 4, 4, 4, 3, 1, 1, 2, 3, 4, 1, 4), step89 = c(4,
     1, 3, 3, 2, 1, 2, 2, 4, 3, 2, 2, 4, 1, 1, 3, 4, 2, 2,
     4, 1, 3, 1, 4, 2, 1, 3, 3, 2, 2, 2, 1, 4, 3, 4, 4, 4,
     3, 1, 1, 2, 3, 4, 1, 4), step97 = c(4, 1, 3, 3, 2, 1,
     2, 2, 4, 3, 2, 3, 4, 1, 1, 3, 4, 2, 2, 4, 1, 3, 1, 4,
     2, 1, 3, 3, 2, 2, 2, 1, 4, 3, 4, 4, 4, 3, 1, 1, 2, 3,
     4, 1, 4)), list(step0 = c(4, 3, 4, 3, 3, 1, 1, 3, 2,
     4, 3, 1, 4, 2, 3, 2, 1, 4, 2, 4, 1, 1, 3, 2, 1, 2, 1, 1,
     3, 2, 3, 4, 4, 1, 2, 3, 2, 3, 1, 1, 4, 2, 4, 2, 4), step6 = c(4,
     3, 4, 3, 3, 1, 1, 3, 2, 4, 3, 1, 4, 2, 3, 2, 1, 4, 2, 4,
     1, 1, 3, 2, 1, 2, 1, 1, 3, 4, 3, 4, 4, 1, 2, 3, 2, 3, 1,
     1, 2, 2, 4, 2, 4), step8 = c(4, 3, 4, 3, 3, 1, 1, 3, 2, 4,
     3, 1, 4, 2, 3, 2, 1, 4, 4, 4, 1, 1, 3, 2, 1, 2, 1, 1, 3,
     4, 3, 4, 2, 1, 2, 3, 2, 3, 1, 1, 2, 2, 4, 2, 4), step17 = c(4,
     3, 4, 3, 3, 1, 1, 3, 2, 4, 3, 1, 4, 2, 3, 2, 1, 4, 4, 4,
     1, 1, 3, 2, 1, 2, 1, 1, 4, 4, 3, 4, 2, 1, 2, 3, 2, 3, 1,
     1, 2, 2, 4, 2, 4), step18 = c(4, 3, 4, 3, 3, 1, 1, 3, 2,
     4, 3, 1, 4, 2, 3, 2, 1, 4, 4, 4, 4, 1, 3, 2, 1, 2, 1, 1,
     4, 1, 3, 4, 2, 1, 2, 3, 2, 3, 1, 1, 2, 2, 4, 2, 4), step19 = c(4,
     3, 4, 3, 3, 1, 1, 3, 2, 4, 3, 1, 4, 2, 3, 2, 1, 4, 4, 4,
     4, 1, 3, 2, 1, 2, 1, 1, 4, 3, 3, 4, 2, 1, 2, 3, 2, 3, 1,
     1, 2, 2, 4, 2, 4), step23 = c(4, 3, 4, 3, 3, 1, 1, 3, 2,
     4, 3, 1, 4, 2, 3, 2, 1, 4, 4, 4, 4, 1, 3, 2, 1, 2, 1, 1,
     4, 3, 3, 4, 2, 1, 2, 4, 2, 3, 1, 1, 2, 2, 4, 2, 4), step34 = c(4,
     3, 4, 3, 3, 1, 1, 3, 2, 4, 3, 1, 4, 2, 3, 2, 2, 4, 4, 4,
     4, 1, 3, 2, 1, 2, 1, 1, 4, 3, 3, 4, 2, 1, 2, 4, 2, 3, 1,
     1, 2, 2, 4, 1, 4), step36 = c(4, 3, 1, 3, 3, 1, 1, 3, 2,
     4, 3, 1, 4, 2, 3, 2, 2, 4, 4, 4, 4, 1, 3, 2, 1, 2, 1, 1,
     4, 3, 3, 4, 2, 1, 2, 4, 2, 3, 4, 1, 2, 2, 4, 1, 4), step38 = c(4,
     3, 1, 3, 3, 1, 1, 3, 2, 4, 3, 1, 4, 2, 3, 2, 2, 4, 4, 1,
     4, 1, 3, 2, 1, 2, 1, 4, 4, 3, 3, 4, 2, 1, 2, 4, 2, 3, 4,
     1, 2, 2, 4, 1, 4), step40 = c(4, 3, 1, 3, 3, 1, 1, 3, 2,
     4, 3, 1, 4, 2, 3, 2, 2, 4, 4, 1, 4, 3, 3, 2, 1, 2, 1, 4,
     4, 1, 3, 4, 2, 1, 2, 4, 2, 3, 4, 1, 2, 2, 4, 1, 4), step43 = c(4,
     3, 1, 3, 3, 1, 1, 3, 2, 4, 3, 1, 4, 2, 3, 2, 2, 4, 4, 1,
     4, 3, 3, 2, 1, 2, 1, 4, 4, 1, 3, 4, 2, 1, 2, 4, 2, 3, 4,
     1, 2, 2, 1, 1, 4), step55 = c(4, 2, 1, 3, 3, 1, 1, 3, 2,
     4, 3, 1, 4, 2, 3, 2, 2, 4, 4, 1, 4, 3, 3, 2, 1, 2, 1, 4,
     4, 1, 3, 4, 2, 1, 2, 4, 2, 3, 4, 1, 2, 2, 1, 1, 4), step68 = c(4,
     2, 1, 3, 3, 1, 1, 3, 2, 4, 3, 1, 4, 2, 3, 2, 2, 4, 4, 1,
     4, 3, 2, 2, 1, 2, 1, 4, 4, 1, 3, 4, 2, 1, 2, 4, 2, 3, 4,
     1, 3, 2, 1, 1, 4), step70 = c(4, 2, 1, 3, 3, 1, 1, 3, 2,
     4, 3, 1, 4, 2, 3, 2, 2, 4, 4, 1, 4, 3, 2, 2, 1, 2, 1, 4,
     3, 1, 3, 4, 2, 1, 2, 4, 2, 3, 4, 1, 4, 2, 1, 1, 4), step72 = c(4,
     2, 1, 3, 3, 1, 1, 3, 2, 4, 3, 1, 4, 2, 4, 2, 2, 4, 4, 1,
     4, 3, 2, 2, 1, 2, 1, 4, 3, 1, 3, 4, 2, 1, 2, 4, 2, 3, 4,
     1, 3, 2, 1, 1, 4), step77 = c(4, 1, 1, 3, 3, 1, 1, 3, 2,
     4, 3, 1, 4, 2, 4, 2, 2, 4, 4, 1, 4, 3, 2, 2, 1, 2, 1, 4,
     3, 1, 3, 4, 2, 1, 2, 4, 2, 3, 4, 1, 3, 2, 1, 1, 4), step78 = c(4,
     4, 1, 3, 3, 1, 1, 3, 2, 4, 3, 1, 4, 2, 4, 2, 2, 4, 4, 1,
     4, 3, 2, 2, 1, 2, 1, 4, 3, 1, 3, 4, 2, 1, 2, 4, 2, 3, 1,
     1, 3, 2, 1, 1, 4)), list(step0 = c(1, 2, 3, 2, 2, 4, 1, 1,
     2, 3, 3, 4, 4, 2, 4, 1, 1, 3, 2, 3, 4, 3, 4, 1, 1, 2, 1,
     2, 1, 2, 3, 4, 4, 1, 1, 1, 3, 4, 3, 2, 4, 4, 3, 3, 2), step2 = c(1,
     2, 2, 2, 2, 4, 1, 1, 3, 3, 3, 4, 4, 2, 4, 1, 1, 3, 2, 3,
     4, 3, 4, 1, 1, 2, 1, 2, 1, 2, 3, 4, 4, 1, 1, 1, 3, 4, 3,
     2, 4, 4, 3, 3, 2), step4 = c(1, 2, 2, 2, 1, 4, 1, 1, 3, 3,
     3, 4, 4, 2, 4, 1, 1, 3, 2, 3, 4, 3, 4, 1, 1, 2, 1, 2, 1,
     2, 3, 4, 4, 2, 1, 1, 3, 4, 3, 2, 4, 4, 3, 3, 2), step12 = c(1,
     2, 2, 2, 1, 4, 1, 1, 3, 3, 3, 4, 4, 2, 4, 4, 1, 3, 2, 3,
     4, 3, 1, 1, 1, 2, 1, 2, 1, 2, 3, 4, 4, 2, 1, 1, 3, 4, 3,
     2, 4, 4, 3, 3, 2), step14 = c(1, 2, 2, 2, 1, 4, 1, 1, 3,
     3, 3, 4, 4, 2, 4, 4, 1, 3, 2, 3, 4, 3, 1, 1, 1, 2, 1, 2,
     1, 4, 3, 4, 4, 2, 1, 1, 3, 2, 3, 2, 4, 4, 3, 3, 2), step16 = c(1,
     2, 2, 2, 1, 4, 1, 1, 3, 3, 3, 4, 4, 2, 4, 4, 1, 1, 2, 3,
     4, 3, 3, 1, 1, 2, 1, 2, 1, 4, 3, 4, 4, 2, 1, 1, 3, 2, 3,
     2, 4, 4, 3, 3, 2), step24 = c(1, 2, 2, 2, 1, 4, 1, 1, 3,
     3, 3, 4, 4, 2, 4, 4, 1, 1, 2, 2, 4, 3, 3, 1, 1, 2, 1, 2,
     1, 4, 3, 4, 4, 2, 1, 1, 3, 2, 3, 3, 4, 4, 3, 3, 2), step30 = c(1,
     2, 2, 2, 3, 4, 1, 1, 3, 1, 3, 4, 4, 2, 4, 4, 1, 1, 2, 2,
     4, 3, 3, 1, 1, 2, 1, 2, 1, 4, 3, 4, 4, 2, 1, 1, 3, 2, 3,
     3, 4, 4, 3, 3, 2), step31 = c(1, 2, 2, 2, 3, 4, 1, 1, 3,
     1, 3, 4, 4, 2, 4, 4, 1, 1, 2, 2, 4, 3, 3, 1, 1, 2, 2, 2,
     1, 4, 3, 4, 4, 2, 1, 1, 3, 2, 3, 3, 4, 4, 3, 3, 2), step34 = c(1,
     2, 2, 3, 3, 4, 1, 1, 3, 1, 3, 4, 4, 2, 4, 4, 1, 1, 2, 2,
     4, 3, 3, 1, 1, 2, 2, 2, 1, 4, 3, 4, 4, 2, 1, 1, 3, 2, 2,
     3, 4, 4, 3, 3, 2), step43 = c(1, 2, 2, 3, 3, 4, 1, 1, 3,
     4, 3, 4, 4, 2, 4, 4, 1, 1, 2, 2, 4, 3, 3, 1, 1, 2, 2, 2,
     1, 4, 3, 4, 4, 2, 1, 1, 3, 2, 2, 3, 4, 4, 3, 3, 2), step45 = c(1,
     2, 2, 3, 3, 4, 1, 1, 3, 4, 3, 4, 4, 2, 4, 4, 1, 1, 2, 2,
     4, 3, 3, 1, 2, 2, 2, 2, 1, 4, 3, 4, 4, 2, 1, 1, 3, 2, 2,
     3, 4, 4, 3, 3, 2), step54 = c(1, 2, 2, 3, 3, 4, 1, 1, 3,
     4, 3, 4, 4, 2, 3, 4, 1, 1, 2, 2, 4, 3, 3, 1, 2, 2, 2, 2,
     1, 4, 3, 4, 4, 2, 1, 1, 3, 2, 2, 4, 4, 4, 3, 3, 2), step72 = c(1,
     2, 2, 3, 3, 4, 1, 1, 3, 4, 3, 4, 4, 2, 1, 4, 3, 1, 2, 2,
     4, 3, 3, 1, 2, 2, 2, 2, 1, 4, 3, 4, 4, 2, 1, 1, 3, 2, 2,
     4, 4, 4, 3, 3, 2), step94 = c(1, 4, 2, 3, 3, 4, 1, 1, 3,
     4, 3, 4, 4, 2, 1, 4, 3, 1, 2, 2, 4, 3, 3, 1, 2, 2, 2, 2,
     1, 4, 3, 4, 4, 2, 1, 1, 3, 2, 2, 4, 2, 4, 3, 3, 2)), list(
     step0 = c(3, 4, 3, 1, 4, 3, 2, 1, 2, 3, 2, 2, 3, 3, 4,
     1, 4, 2, 1, 3, 4, 4, 1, 3, 1, 4, 4, 2, 1, 2, 1, 2, 1,
     3, 1, 1, 2, 3, 1, 2, 4, 4, 4, 2, 3), step2 = c(3, 4,
     3, 1, 4, 3, 2, 1, 2, 2, 2, 3, 3, 3, 4, 1, 4, 2, 1, 3,
     4, 4, 1, 3, 1, 4, 4, 2, 1, 2, 1, 2, 1, 3, 1, 1, 2, 3,
     1, 2, 4, 4, 4, 2, 3), step6 = c(3, 4, 3, 1, 4, 3, 2,
     1, 2, 2, 2, 3, 3, 3, 4, 1, 4, 2, 1, 3, 4, 4, 1, 3, 1,
     4, 4, 2, 1, 2, 1, 1, 2, 3, 1, 1, 2, 3, 1, 2, 4, 4, 4,
     2, 3), step8 = c(3, 4, 3, 1, 4, 3, 2, 1, 2, 2, 2, 3,
     3, 3, 4, 1, 4, 2, 1, 3, 4, 4, 1, 3, 1, 3, 4, 2, 1, 2,
     1, 1, 2, 3, 1, 1, 2, 4, 1, 2, 4, 4, 4, 2, 3), step12 = c(3,
     4, 3, 1, 4, 3, 2, 1, 2, 2, 2, 3, 3, 4, 4, 1, 3, 2, 1,
     3, 4, 4, 1, 3, 1, 3, 4, 2, 1, 2, 1, 1, 2, 3, 1, 1, 2,
     4, 1, 2, 4, 4, 4, 2, 3), step17 = c(3, 4, 2, 1, 4, 3,
     2, 1, 2, 2, 2, 3, 3, 4, 4, 1, 3, 2, 1, 3, 4, 4, 1, 3,
     1, 3, 4, 2, 1, 2, 1, 1, 2, 3, 1, 1, 2, 4, 1, 2, 4, 4,
     4, 2, 3), step24 = c(3, 4, 2, 1, 4, 3, 2, 1, 2, 2, 2,
     3, 3, 4, 4, 1, 3, 2, 1, 3, 4, 4, 1, 3, 1, 3, 4, 2, 1,
     2, 1, 4, 2, 3, 1, 1, 2, 4, 1, 2, 1, 4, 4, 2, 3), step30 = c(3,
     4, 2, 1, 4, 3, 2, 1, 2, 2, 2, 3, 3, 4, 1, 1, 3, 2, 1,
     3, 4, 4, 1, 3, 1, 3, 4, 2, 1, 2, 1, 4, 2, 3, 4, 1, 2,
     4, 1, 2, 1, 4, 4, 2, 3), step32 = c(3, 1, 2, 1, 4, 3,
     2, 1, 2, 2, 2, 3, 3, 4, 1, 4, 3, 2, 1, 3, 4, 4, 1, 3,
     1, 3, 4, 2, 1, 2, 1, 4, 2, 3, 4, 1, 2, 4, 1, 2, 1, 4,
     4, 2, 3), step34 = c(1, 1, 2, 1, 4, 3, 2, 1, 2, 2, 2,
     3, 3, 4, 1, 4, 3, 2, 1, 3, 4, 4, 1, 3, 1, 3, 4, 2, 1,
     2, 1, 4, 2, 3, 4, 1, 2, 4, 3, 2, 1, 4, 4, 2, 3), step44 = c(1,
     1, 2, 4, 1, 3, 2, 1, 2, 2, 2, 3, 3, 4, 1, 4, 3, 2, 1,
     3, 4, 4, 1, 3, 1, 3, 4, 2, 1, 2, 1, 4, 2, 3, 4, 1, 2,
     4, 3, 2, 1, 4, 4, 2, 3), step45 = c(1, 1, 2, 4, 1, 3,
     3, 1, 2, 2, 2, 3, 3, 4, 1, 4, 3, 2, 1, 3, 4, 4, 1, 3,
     1, 3, 4, 2, 1, 2, 1, 4, 2, 3, 4, 1, 2, 4, 3, 2, 1, 4,
     4, 2, 3), step47 = c(1, 1, 2, 4, 1, 3, 3, 1, 2, 2, 2,
     3, 3, 4, 1, 4, 3, 2, 1, 3, 4, 2, 1, 3, 1, 3, 4, 2, 1,
     2, 1, 4, 2, 3, 4, 1, 2, 4, 3, 2, 1, 4, 4, 2, 3), step63 = c(1,
     1, 2, 4, 1, 3, 3, 1, 2, 2, 2, 3, 3, 4, 1, 4, 3, 2, 1,
     3, 4, 2, 1, 3, 2, 3, 4, 2, 1, 2, 1, 4, 2, 3, 4, 1, 2,
     4, 3, 2, 1, 4, 4, 2, 3), step65 = c(1, 1, 2, 4, 1, 3,
     3, 1, 2, 2, 2, 3, 3, 4, 1, 4, 3, 2, 1, 3, 4, 2, 1, 3,
     2, 3, 4, 1, 1, 2, 1, 4, 2, 3, 4, 1, 2, 4, 3, 2, 1, 4,
     4, 2, 3), step74 = c(1, 1, 2, 4, 1, 3, 3, 1, 2, 2, 2,
     3, 3, 4, 1, 4, 3, 2, 1, 3, 4, 2, 1, 3, 2, 3, 1, 1, 4,
     2, 1, 4, 2, 3, 4, 1, 2, 4, 3, 2, 1, 4, 4, 2, 3), step84 = c(3,
     1, 2, 4, 1, 3, 3, 1, 2, 2, 2, 3, 3, 4, 1, 4, 3, 2, 1,
     3, 4, 2, 1, 3, 2, 3, 1, 1, 4, 2, 1, 4, 2, 3, 4, 1, 2,
     4, 3, 2, 1, 4, 4, 2, 1)), list(step0 = c(3, 3, 4, 3,
     4, 4, 2, 3, 1, 4, 2, 4, 1, 4, 2, 3, 1, 1, 3, 2, 4, 1, 2,
     2, 1, 3, 2, 4, 2, 4, 3, 4, 3, 1, 2, 4, 1, 1, 1, 3, 2, 3,
     2, 1, 1), step4 = c(3, 3, 4, 4, 4, 4, 2, 3, 1, 4, 2, 4, 1,
     4, 2, 3, 1, 1, 3, 2, 4, 1, 2, 2, 1, 3, 2, 3, 2, 4, 3, 4,
     3, 1, 2, 4, 1, 1, 1, 3, 2, 3, 2, 1, 1), step9 = c(3, 3, 4,
     4, 4, 4, 2, 3, 1, 4, 2, 4, 1, 4, 2, 3, 1, 1, 3, 2, 4, 1,
     2, 2, 1, 3, 2, 3, 2, 4, 3, 4, 3, 1, 2, 4, 1, 1, 1, 3, 1,
     3, 2, 1, 1), step10 = c(3, 3, 4, 2, 4, 4, 2, 3, 1, 4, 2,
     4, 1, 4, 2, 3, 1, 1, 3, 4, 4, 1, 2, 2, 1, 3, 2, 3, 2, 4,
     3, 4, 3, 1, 2, 4, 1, 1, 1, 3, 1, 3, 2, 1, 1), step19 = c(3,
     3, 4, 2, 4, 4, 2, 3, 1, 4, 2, 4, 1, 4, 2, 3, 1, 1, 3, 4,
     4, 1, 2, 2, 1, 3, 2, 3, 2, 4, 3, 4, 3, 1, 2, 4, 1, 1, 1,
     3, 1, 3, 2, 1, 4), step21 = c(3, 3, 4, 2, 4, 4, 2, 3, 1,
     4, 2, 4, 1, 4, 1, 3, 1, 1, 3, 4, 4, 1, 2, 2, 1, 3, 2, 3,
     2, 4, 3, 4, 3, 1, 2, 4, 1, 1, 1, 3, 1, 3, 2, 1, 4), step23 = c(3,
     3, 4, 2, 4, 4, 2, 3, 1, 4, 2, 1, 1, 4, 1, 3, 1, 1, 3, 4,
     4, 1, 2, 2, 1, 3, 2, 3, 2, 4, 3, 4, 3, 1, 2, 4, 1, 1, 1,
     3, 1, 3, 2, 1, 4), step26 = c(3, 3, 4, 2, 4, 4, 2, 3, 1,
     4, 2, 1, 1, 4, 1, 3, 1, 1, 3, 4, 4, 1, 2, 2, 1, 3, 2, 3,
     2, 4, 3, 4, 3, 1, 2, 1, 4, 1, 1, 3, 1, 3, 2, 1, 4), step27 = c(3,
     3, 4, 2, 4, 4, 2, 3, 1, 4, 2, 1, 3, 4, 1, 3, 1, 1, 3, 4,
     4, 1, 2, 2, 1, 3, 2, 3, 2, 4, 3, 4, 3, 1, 2, 1, 4, 1, 1,
     3, 1, 3, 2, 1, 4), step28 = c(3, 3, 4, 2, 4, 4, 2, 3, 1,
     4, 2, 1, 3, 4, 1, 2, 1, 1, 3, 4, 4, 1, 2, 3, 1, 3, 2, 3,
     2, 4, 3, 4, 3, 1, 2, 1, 4, 1, 1, 3, 1, 3, 2, 1, 4), step31 = c(3,
     3, 4, 2, 4, 4, 2, 3, 1, 4, 2, 1, 3, 4, 1, 2, 1, 1, 3, 2,
     4, 1, 2, 3, 1, 3, 2, 3, 2, 4, 3, 4, 3, 1, 2, 1, 4, 1, 1,
     3, 1, 3, 2, 1, 4), step33 = c(3, 3, 4, 2, 4, 4, 2, 3, 1,
     4, 2, 1, 3, 4, 1, 2, 1, 1, 3, 2, 4, 1, 2, 3, 1, 3, 2, 3,
     2, 4, 3, 4, 3, 1, 2, 1, 4, 2, 1, 3, 1, 3, 2, 1, 4), step34 = c(3,
     3, 4, 2, 4, 4, 2, 3, 1, 4, 2, 1, 3, 4, 1, 2, 1, 1, 3, 2,
     4, 1, 2, 3, 1, 1, 2, 3, 2, 4, 3, 4, 3, 1, 2, 1, 4, 2, 1,
     3, 3, 3, 2, 1, 4), step43 = c(3, 3, 4, 2, 4, 2, 2, 3, 1,
     4, 2, 1, 3, 4, 1, 2, 1, 1, 3, 2, 4, 1, 2, 3, 1, 1, 2, 3,
     2, 4, 3, 4, 3, 1, 2, 1, 4, 2, 1, 3, 3, 3, 2, 1, 4), step45 = c(3,
     3, 4, 2, 4, 2, 2, 3, 1, 4, 2, 1, 3, 4, 1, 2, 1, 1, 3, 2,
     4, 1, 2, 3, 1, 1, 2, 3, 2, 4, 3, 4, 3, 1, 2, 1, 4, 2, 1,
     3, 4, 3, 2, 1, 4), step47 = c(3, 3, 4, 2, 4, 2, 2, 3, 1,
     4, 2, 1, 4, 4, 1, 2, 1, 1, 3, 2, 4, 1, 2, 3, 1, 1, 2, 3,
     2, 4, 3, 4, 3, 1, 2, 1, 4, 2, 1, 3, 4, 3, 2, 1, 4), step48 = c(3,
     3, 4, 2, 4, 2, 2, 3, 1, 1, 2, 1, 4, 4, 1, 2, 1, 1, 3, 2,
     4, 1, 2, 3, 1, 1, 2, 3, 2, 4, 3, 4, 3, 1, 2, 4, 4, 2, 1,
     3, 4, 3, 2, 1, 4), step49 = c(3, 3, 4, 2, 4, 2, 2, 3, 1,
     1, 2, 1, 4, 4, 3, 2, 1, 1, 3, 2, 4, 1, 2, 3, 1, 1, 2, 3,
     2, 4, 3, 4, 3, 1, 2, 4, 4, 2, 1, 3, 4, 3, 2, 1, 4)), list(
     step0 = c(4, 3, 1, 1, 1, 4, 2, 3, 1, 4, 2, 2, 1, 3, 2,
     3, 2, 3, 2, 1, 2, 3, 1, 1, 2, 3, 4, 3, 4, 1, 2, 1, 3,
     3, 4, 2, 4, 3, 1, 4, 4, 1, 4, 2, 4), step2 = c(4, 3,
     2, 1, 1, 4, 2, 3, 1, 4, 2, 2, 1, 3, 1, 3, 2, 3, 2, 1,
     2, 3, 1, 1, 2, 3, 4, 3, 4, 1, 2, 1, 3, 3, 4, 2, 4, 3,
     1, 4, 4, 1, 4, 2, 4), step3 = c(4, 3, 2, 1, 1, 4, 2,
     3, 1, 4, 2, 2, 1, 3, 1, 3, 2, 3, 2, 1, 2, 3, 1, 1, 2,
     3, 4, 3, 4, 2, 2, 1, 3, 3, 4, 2, 4, 3, 1, 4, 4, 1, 4,
     2, 4), step6 = c(4, 3, 2, 1, 1, 4, 2, 3, 1, 4, 2, 2,
     1, 3, 1, 3, 2, 3, 2, 1, 2, 3, 1, 1, 2, 3, 2, 3, 4, 2,
     2, 1, 3, 3, 4, 4, 4, 3, 1, 4, 4, 1, 4, 2, 4), step8 = c(4,
     3, 2, 1, 1, 4, 2, 3, 1, 4, 2, 2, 1, 3, 1, 4, 2, 3, 2,
     1, 2, 3, 1, 1, 2, 3, 2, 3, 4, 2, 2, 1, 3, 3, 4, 3, 4,
     3, 1, 4, 4, 1, 4, 2, 4), step12 = c(4, 3, 2, 1, 1, 4,
     4, 3, 1, 4, 2, 2, 1, 3, 1, 4, 2, 3, 2, 1, 2, 3, 1, 1,
     2, 3, 2, 3, 4, 2, 2, 1, 3, 3, 4, 3, 4, 3, 1, 4, 2, 1,
     4, 2, 4), step14 = c(1, 3, 2, 4, 1, 4, 4, 3, 1, 4, 2,
     2, 1, 3, 1, 4, 2, 3, 2, 1, 2, 3, 1, 1, 2, 3, 2, 3, 4,
     2, 2, 1, 3, 3, 4, 3, 4, 3, 1, 4, 2, 1, 4, 2, 4), step15 = c(1,
     3, 2, 4, 1, 4, 4, 3, 1, 4, 2, 2, 1, 3, 1, 4, 2, 3, 2,
     1, 2, 3, 1, 1, 2, 3, 2, 3, 4, 2, 2, 1, 3, 3, 4, 3, 4,
     1, 1, 4, 2, 1, 4, 2, 4), step17 = c(1, 3, 2, 4, 1, 4,
     4, 3, 1, 4, 2, 2, 1, 3, 1, 4, 2, 3, 2, 1, 2, 3, 1, 1,
     2, 3, 2, 3, 4, 2, 2, 1, 3, 3, 4, 3, 4, 1, 1, 4, 2, 1,
     4, 3, 4), step18 = c(1, 3, 2, 4, 1, 4, 4, 3, 1, 4, 2,
     2, 4, 3, 1, 4, 2, 3, 2, 1, 2, 3, 1, 1, 2, 3, 2, 3, 4,
     2, 2, 1, 3, 3, 4, 3, 1, 1, 1, 4, 2, 1, 4, 3, 4), step19 = c(1,
     3, 2, 4, 1, 4, 4, 3, 1, 4, 2, 2, 4, 3, 1, 4, 2, 2, 2,
     1, 2, 3, 1, 1, 2, 3, 2, 3, 4, 2, 2, 1, 3, 3, 4, 3, 1,
     1, 1, 4, 2, 1, 4, 3, 4), step20 = c(1, 3, 2, 4, 1, 4,
     4, 1, 1, 4, 2, 2, 4, 3, 1, 4, 2, 2, 2, 1, 2, 3, 1, 1,
     2, 3, 2, 3, 4, 2, 2, 1, 3, 3, 4, 3, 3, 1, 1, 4, 2, 1,
     4, 3, 4), step27 = c(1, 3, 2, 4, 1, 4, 4, 1, 1, 4, 2,
     2, 4, 3, 1, 4, 2, 2, 2, 1, 2, 3, 1, 1, 2, 3, 2, 3, 4,
     2, 2, 1, 3, 3, 4, 3, 3, 1, 4, 4, 2, 1, 4, 3, 4), step30 = c(1,
     3, 2, 4, 1, 3, 4, 1, 1, 4, 2, 2, 4, 3, 1, 4, 2, 2, 2,
     1, 2, 3, 1, 1, 2, 3, 2, 4, 4, 2, 2, 1, 3, 3, 4, 3, 3,
     1, 4, 4, 2, 1, 4, 3, 4), step34 = c(1, 3, 2, 4, 1, 3,
     4, 1, 1, 4, 2, 2, 4, 3, 1, 4, 4, 2, 2, 1, 2, 3, 1, 1,
     2, 3, 2, 4, 4, 2, 2, 1, 3, 3, 2, 3, 3, 1, 4, 4, 2, 1,
     4, 3, 4), step35 = c(1, 3, 2, 4, 1, 3, 4, 1, 1, 4, 1,
     2, 4, 3, 1, 4, 4, 2, 2, 1, 2, 3, 1, 1, 2, 3, 2, 4, 4,
     2, 2, 1, 3, 3, 2, 3, 3, 1, 4, 4, 2, 1, 4, 3, 4), step41 = c(1,
     3, 2, 4, 1, 3, 4, 1, 1, 4, 1, 2, 4, 3, 1, 4, 4, 2, 2,
     1, 2, 3, 1, 1, 2, 3, 2, 4, 4, 2, 2, 1, 3, 3, 4, 3, 3,
     1, 4, 4, 2, 1, 4, 3, 4), step44 = c(1, 3, 2, 2, 1, 3,
     4, 1, 1, 4, 1, 2, 4, 3, 1, 4, 4, 2, 2, 1, 2, 3, 1, 1,
     2, 3, 2, 4, 4, 2, 4, 1, 3, 3, 4, 3, 3, 1, 4, 4, 2, 1,
     4, 3, 4), step77 = c(1, 3, 2, 2, 1, 3, 4, 1, 1, 4, 1,
     2, 4, 3, 1, 4, 4, 2, 2, 1, 2, 3, 1, 1, 2, 3, 2, 4, 4,
     2, 4, 1, 3, 3, 4, 2, 3, 1, 4, 4, 2, 1, 4, 3, 4), step88 = c(1,
     3, 2, 2, 1, 3, 4, 1, 1, 4, 1, 2, 4, 3, 1, 4, 4, 2, 2,
     1, 2, 3, 1, 1, 2, 3, 2, 4, 4, 2, 4, 1, 3, 3, 4, 2, 3,
     1, 4, 4, 2, 1, 3, 4, 4), step89 = c(1, 3, 2, 2, 1, 3,
     4, 1, 1, 4, 1, 2, 4, 3, 1, 4, 4, 2, 2, 1, 2, 3, 1, 1,
     2, 3, 2, 4, 4, 3, 4, 1, 3, 3, 4, 2, 3, 1, 4, 4, 2, 1,
     3, 4, 4), step98 = c(1, 3, 2, 2, 1, 3, 4, 1, 1, 4, 1,
     2, 4, 3, 1, 4, 4, 2, 2, 3, 2, 3, 1, 1, 2, 3, 2, 4, 4,
     1, 4, 1, 3, 3, 4, 2, 3, 1, 4, 4, 2, 1, 3, 4, 4)), list(
     step0 = c(4, 3, 1, 3, 4, 2, 3, 1, 3, 4, 1, 2, 3, 1, 1,
     2, 4, 1, 2, 4, 2, 3, 3, 2, 1, 1, 1, 3, 2, 3, 4, 1, 4,
     4, 2, 1, 2, 4, 3, 3, 4, 2, 1, 4, 2), step3 = c(4, 3,
     1, 3, 4, 2, 3, 1, 3, 4, 1, 2, 3, 1, 1, 2, 4, 1, 2, 4,
     1, 3, 3, 2, 1, 1, 1, 3, 2, 3, 4, 1, 4, 4, 2, 1, 2, 4,
     3, 3, 4, 2, 1, 4, 2), step4 = c(4, 3, 1, 3, 4, 2, 3,
     1, 3, 4, 1, 2, 3, 1, 1, 2, 4, 1, 2, 2, 1, 3, 3, 4, 1,
     1, 1, 3, 2, 3, 4, 1, 4, 4, 2, 1, 2, 4, 3, 3, 4, 2, 1,
     4, 2), step7 = c(4, 3, 1, 3, 4, 2, 3, 1, 3, 4, 1, 2,
     3, 3, 1, 2, 4, 1, 2, 2, 1, 3, 3, 4, 1, 1, 1, 3, 2, 3,
     4, 1, 4, 4, 2, 1, 2, 4, 3, 3, 4, 2, 1, 4, 2), step8 = c(4,
     3, 1, 2, 4, 2, 3, 1, 3, 4, 1, 2, 3, 3, 1, 2, 4, 1, 2,
     2, 1, 3, 3, 4, 1, 1, 1, 3, 2, 3, 4, 1, 4, 4, 2, 1, 2,
     4, 3, 3, 4, 2, 1, 4, 3), step14 = c(4, 3, 1, 2, 4, 2,
     3, 1, 3, 4, 4, 2, 3, 3, 1, 2, 4, 1, 2, 2, 1, 3, 3, 1,
     1, 1, 1, 3, 2, 3, 4, 1, 4, 4, 2, 1, 2, 4, 3, 3, 4, 2,
     1, 4, 3), step20 = c(4, 3, 1, 2, 4, 2, 3, 1, 3, 4, 4,
     2, 3, 3, 1, 2, 4, 1, 4, 2, 1, 3, 3, 1, 1, 1, 1, 3, 2,
     3, 4, 1, 4, 2, 2, 1, 2, 4, 3, 3, 4, 2, 1, 4, 3), step21 = c(4,
     3, 1, 2, 4, 2, 3, 1, 3, 4, 4, 2, 3, 3, 1, 2, 4, 1, 4,
     2, 1, 3, 3, 1, 1, 1, 1, 2, 2, 3, 4, 1, 4, 2, 2, 1, 2,
     4, 3, 3, 4, 2, 1, 4, 3), step23 = c(4, 3, 1, 2, 4, 2,
     3, 1, 3, 4, 4, 2, 3, 3, 1, 3, 4, 1, 4, 2, 1, 3, 3, 1,
     1, 1, 1, 2, 2, 3, 4, 1, 4, 2, 2, 1, 2, 4, 3, 3, 4, 2,
     1, 4, 3), step29 = c(4, 3, 1, 2, 4, 2, 3, 1, 3, 4, 4,
     2, 3, 3, 1, 3, 4, 1, 4, 2, 1, 3, 3, 1, 1, 1, 1, 2, 2,
     3, 4, 1, 4, 2, 2, 1, 2, 4, 3, 3, 4, 2, 1, 3, 3), step35 = c(4,
     3, 1, 2, 4, 2, 3, 1, 3, 4, 4, 2, 3, 3, 1, 3, 4, 1, 4,
     2, 1, 3, 4, 1, 1, 1, 1, 2, 2, 3, 4, 1, 4, 2, 2, 1, 2,
     4, 3, 3, 4, 2, 1, 3, 3), step36 = c(4, 3, 1, 2, 4, 2,
     3, 2, 3, 4, 4, 1, 3, 3, 1, 3, 4, 1, 4, 2, 1, 3, 4, 1,
     1, 1, 1, 2, 2, 3, 4, 1, 4, 2, 2, 1, 2, 4, 3, 3, 4, 2,
     1, 3, 3), step47 = c(4, 3, 1, 2, 4, 2, 3, 2, 1, 4, 4,
     1, 3, 3, 1, 3, 4, 1, 4, 2, 1, 3, 4, 1, 1, 1, 1, 2, 2,
     3, 4, 1, 4, 2, 2, 1, 2, 4, 3, 3, 4, 2, 1, 3, 3), step52 = c(4,
     3, 1, 2, 4, 2, 3, 2, 1, 4, 4, 1, 3, 3, 1, 3, 4, 1, 4,
     2, 1, 4, 4, 1, 1, 1, 1, 2, 2, 3, 4, 1, 3, 2, 2, 1, 2,
     4, 3, 3, 4, 2, 1, 3, 3), step61 = c(4, 3, 1, 2, 4, 2,
     3, 2, 1, 4, 2, 1, 3, 3, 1, 3, 4, 1, 4, 2, 1, 4, 4, 1,
     1, 1, 1, 2, 2, 3, 4, 1, 3, 2, 2, 1, 2, 4, 3, 3, 4, 2,
     1, 3, 3), step72 = c(4, 3, 1, 2, 4, 2, 3, 2, 1, 4, 2,
     1, 3, 1, 1, 3, 4, 1, 4, 2, 3, 4, 4, 1, 1, 1, 1, 2, 2,
     3, 4, 1, 3, 2, 2, 1, 2, 4, 3, 3, 4, 2, 1, 3, 3), step81 = c(4,
     3, 1, 2, 4, 2, 3, 2, 1, 4, 2, 1, 3, 1, 4, 3, 4, 1, 4,
     2, 3, 4, 4, 1, 1, 1, 1, 2, 2, 3, 4, 1, 3, 2, 2, 1, 2,
     4, 3, 3, 4, 2, 1, 3, 3)), list(step0 = c(3, 3, 4, 3,
     3, 2, 4, 3, 1, 2, 4, 2, 3, 2, 1, 4, 3, 3, 2, 3, 3, 2, 1,
     1, 4, 1, 4, 4, 3, 1, 1, 2, 4, 2, 4, 1, 1, 4, 1, 2, 4, 2,
     2, 1, 1), step2 = c(3, 3, 4, 3, 1, 2, 4, 3, 1, 2, 4, 2, 3,
     2, 3, 4, 3, 3, 2, 3, 3, 2, 1, 1, 4, 1, 4, 4, 3, 1, 1, 2,
     4, 2, 4, 1, 1, 4, 1, 2, 4, 2, 2, 1, 1), step6 = c(3, 3, 4,
     3, 1, 2, 4, 3, 1, 2, 4, 2, 3, 2, 3, 4, 3, 3, 2, 3, 3, 2,
     1, 1, 4, 2, 4, 4, 3, 1, 1, 1, 4, 2, 4, 1, 1, 4, 1, 2, 4,
     2, 2, 1, 1), step8 = c(3, 3, 2, 3, 1, 2, 4, 3, 1, 2, 4, 2,
     3, 2, 3, 4, 3, 3, 4, 3, 3, 2, 1, 1, 4, 2, 4, 4, 3, 1, 1,
     1, 4, 2, 4, 1, 1, 4, 1, 2, 4, 2, 2, 1, 1), step12 = c(3,
     3, 2, 3, 1, 2, 4, 4, 1, 2, 4, 2, 3, 2, 3, 4, 3, 3, 4, 3,
     3, 2, 1, 1, 4, 2, 4, 4, 3, 1, 1, 1, 4, 2, 4, 1, 1, 3, 1,
     2, 4, 2, 2, 1, 1), step15 = c(3, 4, 2, 3, 1, 2, 4, 4, 1,
     2, 4, 2, 3, 2, 3, 4, 3, 3, 4, 3, 3, 2, 1, 1, 4, 2, 4, 4,
     3, 1, 1, 1, 4, 2, 4, 1, 1, 3, 1, 2, 4, 2, 2, 1, 1), step20 = c(3,
     4, 2, 3, 1, 2, 4, 4, 1, 2, 4, 2, 3, 2, 3, 4, 3, 2, 4, 3,
     3, 2, 1, 1, 4, 2, 4, 4, 3, 1, 1, 1, 4, 3, 4, 1, 1, 3, 1,
     2, 4, 2, 2, 1, 1), step24 = c(3, 4, 2, 2, 1, 2, 4, 4, 1,
     2, 4, 2, 3, 2, 3, 4, 3, 3, 4, 3, 3, 2, 1, 1, 4, 2, 4, 4,
     3, 1, 1, 1, 4, 3, 4, 1, 1, 3, 1, 2, 4, 2, 2, 1, 1), step25 = c(3,
     4, 2, 2, 1, 2, 4, 4, 1, 2, 4, 2, 3, 2, 3, 4, 3, 2, 4, 3,
     3, 2, 1, 1, 4, 2, 4, 4, 3, 1, 1, 1, 4, 3, 4, 1, 1, 3, 1,
     2, 4, 2, 2, 1, 1), step31 = c(3, 4, 2, 2, 1, 2, 4, 4, 1,
     2, 4, 2, 3, 2, 3, 4, 3, 2, 4, 3, 3, 2, 1, 1, 4, 2, 4, 4,
     3, 1, 1, 1, 4, 3, 4, 4, 1, 3, 1, 2, 4, 2, 2, 1, 1), step33 = c(3,
     4, 2, 2, 1, 2, 4, 4, 1, 2, 4, 2, 3, 2, 3, 4, 3, 2, 4, 1,
     3, 2, 1, 1, 4, 2, 4, 4, 3, 1, 1, 1, 4, 3, 4, 4, 1, 3, 1,
     2, 4, 2, 2, 1, 1), step35 = c(3, 4, 2, 2, 1, 3, 4, 4, 1,
     2, 4, 2, 3, 2, 3, 4, 3, 2, 4, 1, 3, 2, 1, 1, 4, 2, 4, 4,
     3, 1, 1, 1, 4, 3, 4, 4, 1, 3, 1, 2, 4, 2, 2, 1, 1), step39 = c(3,
     4, 2, 2, 1, 3, 4, 4, 1, 2, 4, 2, 3, 2, 3, 4, 3, 2, 4, 1,
     3, 2, 1, 1, 4, 2, 4, 4, 3, 1, 1, 1, 4, 3, 4, 4, 1, 3, 1,
     2, 4, 2, 2, 3, 1), step45 = c(3, 4, 2, 2, 1, 3, 4, 4, 1,
     2, 4, 2, 3, 1, 3, 4, 3, 2, 4, 1, 3, 2, 1, 1, 4, 2, 4, 4,
     3, 1, 1, 1, 4, 3, 4, 4, 1, 3, 1, 2, 4, 2, 2, 3, 1), step52 = c(1,
     4, 2, 2, 1, 3, 4, 4, 1, 2, 4, 2, 3, 1, 3, 4, 3, 2, 4, 1,
     3, 2, 1, 1, 4, 2, 4, 4, 3, 3, 1, 1, 4, 3, 4, 4, 1, 3, 1,
     2, 4, 2, 2, 3, 1), step54 = c(1, 4, 3, 2, 1, 3, 4, 4, 1,
     2, 4, 2, 3, 1, 3, 4, 3, 2, 4, 1, 3, 2, 1, 1, 4, 2, 4, 4,
     3, 3, 1, 1, 4, 2, 4, 4, 1, 3, 1, 2, 4, 2, 2, 3, 1), step57 = c(1,
     4, 3, 2, 1, 3, 4, 4, 1, 2, 4, 2, 3, 1, 3, 2, 3, 2, 4, 1,
     3, 2, 1, 1, 4, 2, 4, 4, 3, 3, 1, 1, 4, 2, 4, 4, 1, 3, 1,
     2, 4, 2, 2, 3, 1), step71 = c(1, 4, 3, 2, 1, 3, 4, 4, 1,
     2, 4, 2, 3, 1, 3, 2, 3, 2, 4, 1, 3, 2, 1, 1, 4, 2, 4, 4,
     3, 3, 1, 1, 4, 2, 4, 4, 1, 3, 2, 2, 4, 2, 2, 3, 1), step78 = c(1,
     4, 3, 2, 1, 3, 4, 4, 1, 2, 4, 2, 3, 1, 3, 2, 3, 2, 4, 1,
     3, 2, 1, 1, 4, 2, 4, 4, 3, 3, 1, 3, 4, 2, 4, 4, 1, 1, 2,
     2, 4, 2, 2, 3, 1), step89 = c(1, 4, 3, 2, 1, 3, 3, 4, 1,
     2, 4, 2, 3, 1, 3, 2, 3, 2, 4, 1, 3, 2, 1, 1, 4, 2, 4, 4,
     3, 3, 1, 3, 4, 2, 4, 4, 1, 1, 2, 2, 4, 2, 2, 3, 1)), list(
     step0 = c(2, 2, 3, 1, 1, 1, 3, 4, 3, 2, 4, 1, 4, 4, 4,
     1, 2, 4, 1, 2, 2, 2, 4, 3, 3, 4, 4, 3, 1, 3, 1, 3, 3,
     1, 3, 4, 2, 1, 4, 1, 1, 2, 2, 3, 2), step3 = c(2, 2,
     3, 1, 1, 1, 3, 4, 3, 2, 4, 1, 4, 4, 4, 1, 2, 4, 1, 2,
     2, 2, 4, 3, 3, 4, 4, 3, 1, 3, 1, 3, 3, 4, 3, 4, 2, 1,
     4, 1, 1, 2, 2, 3, 2), step4 = c(2, 2, 3, 1, 1, 1, 3,
     4, 3, 2, 4, 1, 4, 4, 4, 1, 2, 4, 1, 2, 2, 2, 4, 3, 3,
     4, 4, 3, 2, 3, 1, 3, 3, 4, 3, 4, 2, 1, 4, 1, 1, 2, 2,
     3, 1), step7 = c(2, 2, 3, 1, 1, 1, 3, 4, 3, 2, 4, 1,
     4, 4, 4, 1, 2, 4, 1, 2, 2, 2, 4, 3, 3, 4, 4, 3, 2, 3,
     1, 3, 3, 4, 3, 4, 2, 1, 4, 1, 1, 2, 2, 3, 3), step8 = c(2,
     2, 3, 1, 1, 1, 3, 2, 3, 2, 4, 1, 4, 4, 4, 1, 2, 4, 1,
     2, 2, 2, 4, 3, 3, 4, 4, 3, 2, 3, 1, 3, 3, 4, 3, 4, 2,
     1, 4, 1, 1, 4, 2, 3, 3), step15 = c(2, 2, 3, 1, 1, 1,
     3, 2, 3, 2, 4, 1, 4, 4, 2, 1, 2, 4, 1, 2, 2, 2, 4, 3,
     3, 4, 4, 3, 2, 3, 1, 3, 3, 4, 3, 4, 2, 1, 4, 1, 1, 4,
     2, 3, 3), step18 = c(3, 2, 3, 1, 1, 1, 3, 2, 3, 2, 4,
     1, 4, 4, 2, 1, 2, 4, 1, 2, 2, 2, 4, 3, 3, 4, 4, 3, 2,
     3, 1, 3, 3, 4, 2, 4, 2, 1, 4, 1, 1, 4, 2, 3, 3), step24 = c(3,
     2, 3, 1, 1, 1, 3, 2, 3, 2, 4, 1, 4, 4, 2, 3, 2, 4, 1,
     2, 2, 2, 4, 3, 3, 4, 4, 3, 2, 1, 1, 3, 3, 4, 2, 4, 2,
     1, 4, 1, 1, 4, 2, 3, 3), step27 = c(3, 2, 3, 1, 1, 1,
     3, 2, 4, 2, 4, 1, 4, 4, 2, 3, 2, 4, 1, 2, 2, 2, 4, 3,
     3, 4, 4, 3, 2, 1, 1, 3, 3, 4, 2, 4, 2, 1, 4, 1, 1, 4,
     2, 3, 3), step28 = c(3, 2, 3, 1, 1, 1, 3, 2, 4, 2, 4,
     1, 3, 4, 2, 3, 2, 4, 1, 2, 2, 2, 4, 3, 3, 4, 4, 4, 2,
     1, 1, 3, 3, 4, 2, 4, 2, 1, 4, 1, 1, 4, 2, 3, 3), step34 = c(3,
     2, 3, 1, 1, 1, 3, 2, 4, 2, 4, 1, 3, 4, 2, 3, 2, 4, 1,
     2, 2, 2, 4, 3, 3, 4, 4, 3, 2, 1, 1, 3, 4, 4, 2, 4, 2,
     1, 4, 1, 1, 4, 2, 3, 3), step38 = c(3, 2, 3, 1, 1, 1,
     3, 2, 4, 2, 4, 1, 3, 4, 2, 3, 2, 4, 1, 2, 2, 2, 4, 3,
     3, 4, 4, 3, 2, 1, 1, 3, 1, 4, 2, 4, 2, 1, 4, 4, 1, 4,
     2, 3, 3), step39 = c(3, 2, 3, 1, 1, 1, 3, 2, 4, 2, 4,
     1, 3, 4, 2, 3, 2, 4, 1, 2, 2, 4, 4, 3, 3, 4, 4, 3, 2,
     1, 1, 3, 1, 4, 2, 4, 2, 1, 4, 4, 1, 4, 2, 3, 3), step48 = c(3,
     2, 3, 1, 1, 1, 3, 2, 4, 2, 4, 1, 3, 4, 2, 3, 2, 4, 1,
     2, 2, 2, 4, 3, 3, 4, 4, 3, 2, 1, 1, 3, 1, 4, 4, 4, 2,
     1, 4, 4, 1, 4, 2, 3, 3), step55 = c(3, 2, 3, 1, 1, 1,
     3, 2, 4, 4, 4, 1, 3, 4, 2, 3, 2, 4, 1, 2, 2, 2, 4, 3,
     3, 4, 4, 3, 2, 1, 1, 3, 1, 4, 4, 4, 2, 1, 4, 4, 1, 4,
     2, 3, 3), step57 = c(3, 2, 3, 1, 1, 1, 3, 2, 4, 4, 4,
     1, 3, 4, 2, 3, 2, 4, 1, 2, 2, 2, 4, 3, 3, 4, 4, 3, 2,
     1, 2, 3, 1, 4, 4, 4, 2, 1, 4, 4, 1, 4, 2, 3, 3), step61 = c(3,
     2, 3, 1, 1, 1, 3, 2, 4, 4, 4, 1, 3, 4, 2, 3, 2, 4, 1,
     2, 2, 2, 4, 3, 3, 4, 4, 3, 2, 1, 2, 3, 1, 4, 4, 4, 2,
     1, 4, 3, 1, 4, 2, 3, 3), step69 = c(3, 2, 3, 1, 1, 1,
     3, 2, 4, 4, 4, 1, 3, 4, 2, 3, 2, 4, 1, 2, 2, 2, 4, 3,
     3, 4, 4, 3, 2, 1, 2, 3, 1, 4, 4, 2, 2, 1, 4, 3, 1, 4,
     2, 3, 3), step74 = c(4, 2, 3, 1, 1, 1, 3, 2, 4, 4, 4,
     1, 3, 4, 2, 3, 2, 4, 1, 2, 2, 2, 4, 3, 3, 4, 4, 3, 2,
     1, 2, 3, 1, 3, 4, 2, 2, 1, 4, 3, 1, 4, 2, 3, 3))))))
    where 14: print.default(x, ...)
    where 15: .nextMethod(x, ...)
    where 16: eval(call, callEnv)
    where 17: eval(call, callEnv)
    where 18: callNextMethod(x, ...)
    where 19: print(x)
    where 20: print(x)
    
     --- value of length: 2 type: logical ---
    [1] FALSE FALSE
     --- function from context ---
    function (design, v = length(table(design)), model, ppp = 0.5,
     placebos = 1, contrasts)
    {
     if (class(design) == "CrossoverSearchResult") {
     if (missing(model)) {
     model <- design@model
     }
     else {
     if (model != design@model)
     warning("Model from object does not equal specified model")
     }
     design <- design@design
     }
     if (class(design) == "CrossoverDesign") {
     if (missing(model)) {
     model <- design@model
     }
     else {
     if (model != design@model)
     warning("Model from object does not equal specified model")
     }
     design <- design@design
     }
     model <- getModelNr(model)
     if (missing(contrasts)) {
     contrasts <- getPairwiseContrasts(model, v)
     }
     if (is.matrix(contrasts)) {
     contrasts <- list(contrasts)
     }
     H <- linkMatrix(model, v, ppp, placebos)
     p <- dim(design)[1]
     s <- dim(design)[2]
     rcDesign <- rcd(design, v = v, model = model)
     Xr <- rcdMatrix(rcDesign, v = v, model = model)
     Ar <- t(Xr) %*% (diag(s * p) - getPZ(s, p)) %*% Xr
     A <- t(H) %*% Ar %*% H
     result <- list()
     for (C in contrasts) {
     n <- sum(colSums(C == 0) < dim(C)[1])
     m <- matrix(0, n, n)
     if (!estimable(design, v, model, C)) {
     m[row(m) != col(m)] <- NA
     }
     else {
     m[lower.tri(m)] <- diag(C %*% ginv(A) %*% t(C))
     m[upper.tri(m)] <- t(m)[upper.tri(m)]
     }
     result <- c(result, list(m))
     }
     names(result)[1] <- "Var.trt.pair"
     if (length(result) == 2) {
     names(result)[2] <- "Var.car.pair"
     }
     if (length(result) == 3) {
     names(result)[2:3] <- c("Var.car.pair.1", "Var.car.pair.2")
     }
     result$model <- model
     return(result)
    }
    <bytecode: 0x878ee58>
    <environment: namespace:Crossover>
     --- function search by body ---
    Function general.carryover in namespace Crossover has this body.
     ----------- END OF FAILURE REPORT --------------
    Error in if (class(design) == "CrossoverSearchResult") { :
     the condition has length > 1
    Calls: print ... <Anonymous> -> <Anonymous> -> print -> general.carryover
    Execution halted
Flavor: r-devel-linux-x86_64-debian-clang

Version: 0.1-18
Check: tests
Result: ERROR
     Running 'testthat.R' [11s/12s]
    Running the tests in 'tests/testthat.R' failed.
    Complete output:
     > library(testthat)
     > library(Crossover)
     Loading required package: rJava
     Loading required package: CommonJavaJars
     Loading required package: JavaGD
     Loading required package: ggplot2
     >
     > test_check("Crossover")
     Skipping design tests for v=2.
     ----------- FAILURE REPORT --------------
     --- failure: the condition has length > 1 ---
     --- srcref ---
     at testthat/test-efficiency.R#30:
     --- package (from environment) ---
     Crossover
     --- call from context ---
     design.efficiency.old(design)
     --- call from argument ---
     if (class(design) == "CrossoverSearchResult") design <- design@design
     --- R stacktrace ---
     where 1 at testthat/test-efficiency.R#203: design.efficiency.old(design)
     where 2 at testthat/test-efficiency.R#217: test.eff()
     where 3: eval(code, test_env)
     where 4: eval(code, test_env)
     where 5: withCallingHandlers({
     eval(code, test_env)
     if (!handled && !is.null(test)) {
     skip_empty()
     }
     }, expectation = handle_expectation, skip = handle_skip, warning = handle_warning,
     message = handle_message, error = handle_error)
     where 6: doTryCatch(return(expr), name, parentenv, handler)
     where 7: tryCatchOne(expr, names, parentenv, handlers[[1L]])
     where 8: tryCatchList(expr, names[-nh], parentenv, handlers[-nh])
     where 9: doTryCatch(return(expr), name, parentenv, handler)
     where 10: tryCatchOne(tryCatchList(expr, names[-nh], parentenv, handlers[-nh]),
     names[nh], parentenv, handlers[[nh]])
     where 11: tryCatchList(expr, classes, parentenv, handlers)
     where 12: tryCatch(withCallingHandlers({
     eval(code, test_env)
     if (!handled && !is.null(test)) {
     skip_empty()
     }
     }, expectation = handle_expectation, skip = handle_skip, warning = handle_warning,
     message = handle_message, error = handle_error), error = handle_fatal,
     skip = function(e) {
     })
     where 13: test_code(NULL, exprs, env)
     where 14: source_file(path, new.env(parent = env), chdir = TRUE, wrap = wrap)
     where 15: force(code)
     where 16: doWithOneRestart(return(expr), restart)
     where 17: withOneRestart(expr, restarts[[1L]])
     where 18: withRestarts(testthat_abort_reporter = function() NULL, force(code))
     where 19: with_reporter(reporter = reporter, start_end_reporter = start_end_reporter,
     {
     reporter$start_file(basename(path))
     lister$start_file(basename(path))
     source_file(path, new.env(parent = env), chdir = TRUE,
     wrap = wrap)
     reporter$.end_context()
     reporter$end_file()
     })
     where 20: FUN(X[[i]], ...)
     where 21: lapply(paths, test_file, env = env, reporter = current_reporter,
     start_end_reporter = FALSE, load_helpers = FALSE, wrap = wrap)
     where 22: force(code)
     where 23: doWithOneRestart(return(expr), restart)
     where 24: withOneRestart(expr, restarts[[1L]])
     where 25: withRestarts(testthat_abort_reporter = function() NULL, force(code))
     where 26: with_reporter(reporter = current_reporter, results <- lapply(paths,
     test_file, env = env, reporter = current_reporter, start_end_reporter = FALSE,
     load_helpers = FALSE, wrap = wrap))
     where 27: test_files(paths, reporter = reporter, env = env, stop_on_failure = stop_on_failure,
     stop_on_warning = stop_on_warning, wrap = wrap)
     where 28: test_dir(path = test_path, reporter = reporter, env = env, filter = filter,
     ..., stop_on_failure = stop_on_failure, stop_on_warning = stop_on_warning,
     wrap = wrap)
     where 29: test_package_dir(package = package, test_path = test_path, filter = filter,
     reporter = reporter, ..., stop_on_failure = stop_on_failure,
     stop_on_warning = stop_on_warning, wrap = wrap)
     where 30: test_check("Crossover")
    
     --- value of length: 2 type: logical ---
     [1] FALSE FALSE
     --- function from context ---
     function(design) {
     if (class(design)=="CrossoverSearchResult") design <- design@design
     if (class(design)=="CrossoverDesign") {
     #model <- design@model
     design <- design@design
     }
     #model <- getModelNr(model)
     design <- t(design)
    
     ## input
     ## nseq is the number of sequences
     ## nper is the number of periods
     ## ntrt is the number of treatments
     ## nrep is the nseq x 1 vector containing the number of subjects allocated to each sequence
     ## design is an nseq x nper array containing the nseq treatment sequences
    
     ## create the factors for groups, subjects, periods, treatments and carry-over effects
    
     nper <- dim(design)[2]
     nseq <- dim(design)[1]
     ntrt <- length(levels(as.factor(design)))
     n<-rep(1,nseq)
    
     ## group factor
     group<-rep(1:nseq,nper*n)
     ##subject factor
     subject<-rep(1:sum(n), rep(nper,sum(n)))
     ##period factor
     per<-rep(1:nper, sum(n))
    
    
     trt<-NULL
     for(i in 1:nseq){
     trt<-c(trt,rep(design[i,],n[i]))
     }
     ## treatment design matrix
     trt.mat<-matrix(trt,sum(n),nper,byrow=T)
    
     ## carry-over design matrix
     car.mat<-matrix(0,sum(n),nper,byrow=T)
     car.mat[,1]<-1
     car.mat[,2:nper]<-trt.mat[,1:(nper-1)]
    
     car<-NULL
     for(i in 1:sum(n)){
     car<-c(car,car.mat[i,])
     }
    
    
     ## create factors for design matrix
     nsubj<-sum(n)
     ndata<-nsubj*nper
    
     mean01<-matrix(1,ndata,1)
     subj01<-matrix(0,ndata,nsubj)
     per01<-matrix(0,ndata,nper)
     trt01<-matrix(0,ndata,ntrt)
     car01<-matrix(0,ndata,ntrt)
     ## subjects
     for(i in 1:nsubj){
     subj01[,i][subject==i]<-1
     }
     ##periods
     for(i in 1:nper){
     per01[,i][per==i]<-1
     }
     ## treatments
     for(i in 1:ntrt){
     trt01[,i][trt==i]<-1
     }
     ##carry-over
     car01[,1:ntrt][per==1]<-0
     for(j in 2:nper){
     car01[,1:ntrt][per==j]<-trt01[,1:ntrt][per==(j-1)]
     }
    
     ## X matrix without subjects - returned for use in simulating data - not used further here
     xmat.no.subjects<-matrix(cbind(mean01,per01,trt01,car01),ndata,(1+nper+2*ntrt),byrow=F)
     ## X matrix
     xmat<-matrix(cbind(mean01,subj01,per01,trt01,car01),ndata,(1+nsubj+nper+2*ntrt),byrow=F)
     ## X'X matrix
     xtx<-t(xmat)%*%xmat
     ## inverse of X'X matrix
     xtx.inv<-ginv(xtx)
    
     ## extract part of inverse for carry-over effects
     n.cols.all<-1+nsubj+nper+2*ntrt
     n.cols.car.upp<-n.cols.all
     n.cols.car.low<-n.cols.car.upp-(ntrt-1)
     n.cols.trt.upp<-n.cols.car.low-1
     n.cols.trt.low<-n.cols.trt.upp-(ntrt-1)
     ## extract part of inverse for treatments adjusted for carry-over effects
     xtx.inv.car.adj<-xtx.inv[n.cols.car.low:n.cols.car.upp,n.cols.car.low:n.cols.car.upp]
     xtx.inv.trt.adj<-xtx.inv[n.cols.trt.low:n.cols.trt.upp,n.cols.trt.low:n.cols.trt.upp]
    
     ## repeat the above for the model without carry-over effects
     ## X matrix
     xmat<-matrix(cbind(mean01,subj01,per01,trt01),ndata,(1+nsubj+nper+ntrt),byrow=F)
     ## X'X matrix
     xtx<-t(xmat)%*%xmat
     ## inverse of X'X matrix
     xtx.inv<-ginv(xtx)
     ## extract part of inverse for carry-over effects
     n.cols.all<-1+nsubj+nper+ntrt
     n.cols.trt.upp<-n.cols.all
     n.cols.trt.low<-n.cols.trt.upp-(ntrt-1)
     ## extract part of inverse for treatments unadjusted for carry-over effects
     xtx.inv.trt<-xtx.inv[n.cols.trt.low:n.cols.trt.upp,n.cols.trt.low:n.cols.trt.upp]
    
     ## variances of pairwise comparisons
     ## adjusted for carry-over effects
     var.trt.pair.adj<-matrix(0,ntrt,ntrt)
     for(i in 1:ntrt){
     for(j in 1:ntrt){
     if (i!=j) {
     var.trt.pair.adj[i,j]<-xtx.inv.trt.adj[i,i]+xtx.inv.trt.adj[j,j] - 2*xtx.inv.trt.adj[i,j]
     }}}
     ## variances of pairwise comparisons
     ## unadjusted for carry-over effects
     var.trt.pair<-matrix(0,ntrt,ntrt)
     for(i in 1:ntrt){
     for(j in 1:ntrt){
     if (i!=j) {
     var.trt.pair[i,j]<-xtx.inv.trt[i,i]+xtx.inv.trt[j,j] - 2*xtx.inv.trt[i,j]
     }}}
    
     ## efficiency calculations
     ## replication of each treatment in the design
     rep<-matrix(0,ntrt)
     for(i in 1:ntrt){
     rep[i]<-sum(trt.mat==i)
     }
     ## variances of pairwise comparisons in ideal design
     var.trt.pair.ideal<-matrix(0,ntrt,ntrt)
     for(i in 1:ntrt){
     for(j in 1:ntrt){
     if (i!=j) {
     var.trt.pair.ideal[i,j]<-1/rep[i] + 1/rep[j]
     }}}
     ## matrix of efficiencies for pairwise treatment comparisons unadjusted for carry-over effects
     eff.trt.pair<-matrix(0,ntrt,ntrt)
     for(i in 1:ntrt){
     for(j in 1:ntrt){
     if (i!=j) {
     eff.trt.pair[i,j]<-var.trt.pair.ideal[i,j]/var.trt.pair[i,j]
     }}}
     ## matrix of efficiencies for pairwise treatment comparisons adjusted for carry-over effects
     eff.trt.pair.adj<-matrix(0,ntrt,ntrt)
     for(i in 1:ntrt){
     for(j in 1:ntrt){
     if (i!=j) {
     eff.trt.pair.adj[i,j]<-var.trt.pair.ideal[i,j]/var.trt.pair.adj[i,j]
     }}}
     ## average efficiency of pairwise treatment comparisons unadjusted for carry-over effects
     av.eff.trt.pair<-sum(eff.trt.pair)/(ntrt*(ntrt-1))
     ## average efficiency of pairwise treatment comparisons adjusted for carry-over effects
     av.eff.trt.pair.adj<-sum(eff.trt.pair.adj)/(ntrt*(ntrt-1))
    
     return(list(xmat.no.subjects=xmat.no.subjects,
     var.trt.pair=var.trt.pair,eff.trt.pair=eff.trt.pair,av.eff.trt.pair=av.eff.trt.pair,
     var.trt.pair.adj=var.trt.pair.adj,eff.trt.pair.adj=eff.trt.pair.adj,av.eff.trt.pair.adj=av.eff.trt.pair.adj))
    
     }
     <environment: 0x15841f0>
     --- function search by body ---
     ----------- END OF FAILURE REPORT --------------
     -- 1. Error: (unknown) (@test-efficiency.R#217) -------------------------------
     the condition has length > 1
     Backtrace:
     1. Crossover:::test.eff()
     2. Crossover:::design.efficiency.old(design)
    
     ----------- FAILURE REPORT --------------
     --- failure: the condition has length > 1 ---
     --- srcref ---
     :
     --- package (from environment) ---
     Crossover
     --- call from context ---
     general.carryover(design1, model = 1)
     --- call from argument ---
     if (class(design) == "CrossoverSearchResult") {
     if (missing(model)) {
     model <- design@model
     }
     else {
     if (model != design@model)
     warning("Model from object does not equal specified model")
     }
     design <- design@design
     }
     --- R stacktrace ---
     where 1 at testthat/test-evaluation.R#28: general.carryover(design1, model = 1)
     where 2 at testthat/test-evaluation.R#62: test.evaluation()
     where 3: eval(code, test_env)
     where 4: eval(code, test_env)
     where 5: withCallingHandlers({
     eval(code, test_env)
     if (!handled && !is.null(test)) {
     skip_empty()
     }
     }, expectation = handle_expectation, skip = handle_skip, warning = handle_warning,
     message = handle_message, error = handle_error)
     where 6: doTryCatch(return(expr), name, parentenv, handler)
     where 7: tryCatchOne(expr, names, parentenv, handlers[[1L]])
     where 8: tryCatchList(expr, names[-nh], parentenv, handlers[-nh])
     where 9: doTryCatch(return(expr), name, parentenv, handler)
     where 10: tryCatchOne(tryCatchList(expr, names[-nh], parentenv, handlers[-nh]),
     names[nh], parentenv, handlers[[nh]])
     where 11: tryCatchList(expr, classes, parentenv, handlers)
     where 12: tryCatch(withCallingHandlers({
     eval(code, test_env)
     if (!handled && !is.null(test)) {
     skip_empty()
     }
     }, expectation = handle_expectation, skip = handle_skip, warning = handle_warning,
     message = handle_message, error = handle_error), error = handle_fatal,
     skip = function(e) {
     })
     where 13: test_code(NULL, exprs, env)
     where 14: source_file(path, new.env(parent = env), chdir = TRUE, wrap = wrap)
     where 15: force(code)
     where 16: doWithOneRestart(return(expr), restart)
     where 17: withOneRestart(expr, restarts[[1L]])
     where 18: withRestarts(testthat_abort_reporter = function() NULL, force(code))
     where 19: with_reporter(reporter = reporter, start_end_reporter = start_end_reporter,
     {
     reporter$start_file(basename(path))
     lister$start_file(basename(path))
     source_file(path, new.env(parent = env), chdir = TRUE,
     wrap = wrap)
     reporter$.end_context()
     reporter$end_file()
     })
     where 20: FUN(X[[i]], ...)
     where 21: lapply(paths, test_file, env = env, reporter = current_reporter,
     start_end_reporter = FALSE, load_helpers = FALSE, wrap = wrap)
     where 22: force(code)
     where 23: doWithOneRestart(return(expr), restart)
     where 24: withOneRestart(expr, restarts[[1L]])
     where 25: withRestarts(testthat_abort_reporter = function() NULL, force(code))
     where 26: with_reporter(reporter = current_reporter, results <- lapply(paths,
     test_file, env = env, reporter = current_reporter, start_end_reporter = FALSE,
     load_helpers = FALSE, wrap = wrap))
     where 27: test_files(paths, reporter = reporter, env = env, stop_on_failure = stop_on_failure,
     stop_on_warning = stop_on_warning, wrap = wrap)
     where 28: test_dir(path = test_path, reporter = reporter, env = env, filter = filter,
     ..., stop_on_failure = stop_on_failure, stop_on_warning = stop_on_warning,
     wrap = wrap)
     where 29: test_package_dir(package = package, test_path = test_path, filter = filter,
     reporter = reporter, ..., stop_on_failure = stop_on_failure,
     stop_on_warning = stop_on_warning, wrap = wrap)
     where 30: test_check("Crossover")
    
     --- value of length: 2 type: logical ---
     [1] FALSE FALSE
     --- function from context ---
     function (design, v = length(table(design)), model, ppp = 0.5,
     placebos = 1, contrasts)
     {
     if (class(design) == "CrossoverSearchResult") {
     if (missing(model)) {
     model <- design@model
     }
     else {
     if (model != design@model)
     warning("Model from object does not equal specified model")
     }
     design <- design@design
     }
     if (class(design) == "CrossoverDesign") {
     if (missing(model)) {
     model <- design@model
     }
     else {
     if (model != design@model)
     warning("Model from object does not equal specified model")
     }
     design <- design@design
     }
     model <- getModelNr(model)
     if (missing(contrasts)) {
     contrasts <- getPairwiseContrasts(model, v)
     }
     if (is.matrix(contrasts)) {
     contrasts <- list(contrasts)
     }
     H <- linkMatrix(model, v, ppp, placebos)
     p <- dim(design)[1]
     s <- dim(design)[2]
     rcDesign <- rcd(design, v = v, model = model)
     Xr <- rcdMatrix(rcDesign, v = v, model = model)
     Ar <- t(Xr) %*% (diag(s * p) - getPZ(s, p)) %*% Xr
     A <- t(H) %*% Ar %*% H
     result <- list()
     for (C in contrasts) {
     n <- sum(colSums(C == 0) < dim(C)[1])
     m <- matrix(0, n, n)
     if (!estimable(design, v, model, C)) {
     m[row(m) != col(m)] <- NA
     }
     else {
     m[lower.tri(m)] <- diag(C %*% ginv(A) %*% t(C))
     m[upper.tri(m)] <- t(m)[upper.tri(m)]
     }
     result <- c(result, list(m))
     }
     names(result)[1] <- "Var.trt.pair"
     if (length(result) == 2) {
     names(result)[2] <- "Var.car.pair"
     }
     if (length(result) == 3) {
     names(result)[2:3] <- c("Var.car.pair.1", "Var.car.pair.2")
     }
     result$model <- model
     return(result)
     }
     <bytecode: 0x573f188>
     <environment: namespace:Crossover>
     --- function search by body ---
     Function general.carryover in namespace Crossover has this body.
     ----------- END OF FAILURE REPORT --------------
     -- 2. Error: (unknown) (@test-evaluation.R#62) --------------------------------
     the condition has length > 1
     Backtrace:
     1. Crossover:::test.evaluation()
     2. Crossover::general.carryover(design1, model = 1)
    
     Skipping comparison of old and new general.carryover function.
     ----------- FAILURE REPORT --------------
     --- failure: the condition has length > 1 ---
     --- srcref ---
     :
     --- package (from environment) ---
     Crossover
     --- call from context ---
     general.carryover(design, model = 1)
     --- call from argument ---
     if (class(design) == "CrossoverSearchResult") {
     if (missing(model)) {
     model <- design@model
     }
     else {
     if (model != design@model)
     warning("Model from object does not equal specified model")
     }
     design <- design@design
     }
     --- R stacktrace ---
     where 1 at testthat/test-misc.R#23: general.carryover(design, model = 1)
     where 2 at testthat/test-misc.R#29: test.design.functions()
     where 3: eval(code, test_env)
     where 4: eval(code, test_env)
     where 5: withCallingHandlers({
     eval(code, test_env)
     if (!handled && !is.null(test)) {
     skip_empty()
     }
     }, expectation = handle_expectation, skip = handle_skip, warning = handle_warning,
     message = handle_message, error = handle_error)
     where 6: doTryCatch(return(expr), name, parentenv, handler)
     where 7: tryCatchOne(expr, names, parentenv, handlers[[1L]])
     where 8: tryCatchList(expr, names[-nh], parentenv, handlers[-nh])
     where 9: doTryCatch(return(expr), name, parentenv, handler)
     where 10: tryCatchOne(tryCatchList(expr, names[-nh], parentenv, handlers[-nh]),
     names[nh], parentenv, handlers[[nh]])
     where 11: tryCatchList(expr, classes, parentenv, handlers)
     where 12: tryCatch(withCallingHandlers({
     eval(code, test_env)
     if (!handled && !is.null(test)) {
     skip_empty()
     }
     }, expectation = handle_expectation, skip = handle_skip, warning = handle_warning,
     message = handle_message, error = handle_error), error = handle_fatal,
     skip = function(e) {
     })
     where 13: test_code(NULL, exprs, env)
     where 14: source_file(path, new.env(parent = env), chdir = TRUE, wrap = wrap)
     where 15: force(code)
     where 16: doWithOneRestart(return(expr), restart)
     where 17: withOneRestart(expr, restarts[[1L]])
     where 18: withRestarts(testthat_abort_reporter = function() NULL, force(code))
     where 19: with_reporter(reporter = reporter, start_end_reporter = start_end_reporter,
     {
     reporter$start_file(basename(path))
     lister$start_file(basename(path))
     source_file(path, new.env(parent = env), chdir = TRUE,
     wrap = wrap)
     reporter$.end_context()
     reporter$end_file()
     })
     where 20: FUN(X[[i]], ...)
     where 21: lapply(paths, test_file, env = env, reporter = current_reporter,
     start_end_reporter = FALSE, load_helpers = FALSE, wrap = wrap)
     where 22: force(code)
     where 23: doWithOneRestart(return(expr), restart)
     where 24: withOneRestart(expr, restarts[[1L]])
     where 25: withRestarts(testthat_abort_reporter = function() NULL, force(code))
     where 26: with_reporter(reporter = current_reporter, results <- lapply(paths,
     test_file, env = env, reporter = current_reporter, start_end_reporter = FALSE,
     load_helpers = FALSE, wrap = wrap))
     where 27: test_files(paths, reporter = reporter, env = env, stop_on_failure = stop_on_failure,
     stop_on_warning = stop_on_warning, wrap = wrap)
     where 28: test_dir(path = test_path, reporter = reporter, env = env, filter = filter,
     ..., stop_on_failure = stop_on_failure, stop_on_warning = stop_on_warning,
     wrap = wrap)
     where 29: test_package_dir(package = package, test_path = test_path, filter = filter,
     reporter = reporter, ..., stop_on_failure = stop_on_failure,
     stop_on_warning = stop_on_warning, wrap = wrap)
     where 30: test_check("Crossover")
    
     --- value of length: 2 type: logical ---
     [1] FALSE FALSE
     --- function from context ---
     function (design, v = length(table(design)), model, ppp = 0.5,
     placebos = 1, contrasts)
     {
     if (class(design) == "CrossoverSearchResult") {
     if (missing(model)) {
     model <- design@model
     }
     else {
     if (model != design@model)
     warning("Model from object does not equal specified model")
     }
     design <- design@design
     }
     if (class(design) == "CrossoverDesign") {
     if (missing(model)) {
     model <- design@model
     }
     else {
     if (model != design@model)
     warning("Model from object does not equal specified model")
     }
     design <- design@design
     }
     model <- getModelNr(model)
     if (missing(contrasts)) {
     contrasts <- getPairwiseContrasts(model, v)
     }
     if (is.matrix(contrasts)) {
     contrasts <- list(contrasts)
     }
     H <- linkMatrix(model, v, ppp, placebos)
     p <- dim(design)[1]
     s <- dim(design)[2]
     rcDesign <- rcd(design, v = v, model = model)
     Xr <- rcdMatrix(rcDesign, v = v, model = model)
     Ar <- t(Xr) %*% (diag(s * p) - getPZ(s, p)) %*% Xr
     A <- t(H) %*% Ar %*% H
     result <- list()
     for (C in contrasts) {
     n <- sum(colSums(C == 0) < dim(C)[1])
     m <- matrix(0, n, n)
     if (!estimable(design, v, model, C)) {
     m[row(m) != col(m)] <- NA
     }
     else {
     m[lower.tri(m)] <- diag(C %*% ginv(A) %*% t(C))
     m[upper.tri(m)] <- t(m)[upper.tri(m)]
     }
     result <- c(result, list(m))
     }
     names(result)[1] <- "Var.trt.pair"
     if (length(result) == 2) {
     names(result)[2] <- "Var.car.pair"
     }
     if (length(result) == 3) {
     names(result)[2:3] <- c("Var.car.pair.1", "Var.car.pair.2")
     }
     result$model <- model
     return(result)
     }
     <bytecode: 0x573f188>
     <environment: namespace:Crossover>
     --- function search by body ---
     Function general.carryover in namespace Crossover has this body.
     ----------- END OF FAILURE REPORT --------------
     -- 3. Error: (unknown) (@test-misc.R#29) --------------------------------------
     the condition has length > 1
     Backtrace:
     1. Crossover:::test.design.functions()
     2. Crossover::general.carryover(design, model = 1)
    
     Skipping simulation.
     == testthat results ===========================================================
     [ OK: 162 | SKIPPED: 0 | WARNINGS: 0 | FAILED: 3 ]
     1. Error: (unknown) (@test-efficiency.R#217)
     2. Error: (unknown) (@test-evaluation.R#62)
     3. Error: (unknown) (@test-misc.R#29)
    
     Error: testthat unit tests failed
     Execution halted
Flavor: r-devel-linux-x86_64-debian-clang

Version: 0.1-18
Check: re-building of vignette outputs
Result: WARN
    Error(s) in re-building vignettes:
     ...
    --- re-building 'Crossover.Rnw' using knitr
    Loading required package: mvtnorm
    Loading required package: survival
    Loading required package: TH.data
    
    Attaching package: 'TH.data'
    
    The following object is masked from 'package:MASS':
    
     geyser
    
     ----------- FAILURE REPORT --------------
     --- failure: the condition has length > 1 ---
     --- srcref ---
    :
     --- package (from environment) ---
    Crossover
     --- call from context ---
    general.carryover(design, model = 1)
     --- call from argument ---
    if (class(design) == "CrossoverSearchResult") {
     if (missing(model)) {
     model <- design@model
     }
     else {
     if (model != design@model)
     warning("Model from object does not equal specified model")
     }
     design <- design@design
    }
     --- R stacktrace ---
    where 1: general.carryover(design, model = 1)
    where 2: eval(expr, envir, enclos)
    where 3: eval(expr, envir, enclos)
    where 4: withVisible(eval(expr, envir, enclos))
    where 5: withCallingHandlers(withVisible(eval(expr, envir, enclos)), warning = wHandler,
     error = eHandler, message = mHandler)
    where 6: handle(ev <- withCallingHandlers(withVisible(eval(expr, envir,
     enclos)), warning = wHandler, error = eHandler, message = mHandler))
    where 7: timing_fn(handle(ev <- withCallingHandlers(withVisible(eval(expr,
     envir, enclos)), warning = wHandler, error = eHandler, message = mHandler)))
    where 8: evaluate_call(expr, parsed$src[[i]], envir = envir, enclos = enclos,
     debug = debug, last = i == length(out), use_try = stop_on_error !=
     2L, keep_warning = keep_warning, keep_message = keep_message,
     output_handler = output_handler, include_timing = include_timing)
    where 9: evaluate::evaluate(...)
    where 10: evaluate(code, envir = env, new_device = FALSE, keep_warning = !isFALSE(options$warning),
     keep_message = !isFALSE(options$message), stop_on_error = if (options$error &&
     options$include) 0L else 2L, output_handler = knit_handlers(options$render,
     options))
    where 11: in_dir(input_dir(), evaluate(code, envir = env, new_device = FALSE,
     keep_warning = !isFALSE(options$warning), keep_message = !isFALSE(options$message),
     stop_on_error = if (options$error && options$include) 0L else 2L,
     output_handler = knit_handlers(options$render, options)))
    where 12: block_exec(params)
    where 13: call_block(x)
    where 14: process_group.block(group)
    where 15: process_group(group)
    where 16: withCallingHandlers(if (tangle) process_tangle(group) else process_group(group),
     error = function(e) {
     setwd(wd)
     cat(res, sep = "\n", file = output %n% "")
     message("Quitting from lines ", paste(current_lines(i),
     collapse = "-"), " (", knit_concord$get("infile"),
     ") ")
     })
    where 17: process_file(text, output)
    where 18: (if (grepl("\\.[Rr]md$", file)) knit2html_v1 else if (grepl("\\.[Rr]rst$",
     file)) knit2pandoc else knit)(file, encoding = encoding,
     quiet = quiet, envir = globalenv(), ...)
    where 19: engine$weave(file, quiet = quiet, encoding = enc)
    where 20: doTryCatch(return(expr), name, parentenv, handler)
    where 21: tryCatchOne(expr, names, parentenv, handlers[[1L]])
    where 22: tryCatchList(expr, classes, parentenv, handlers)
    where 23: tryCatch({
     engine$weave(file, quiet = quiet, encoding = enc)
     setwd(startdir)
     output <- find_vignette_product(name, by = "weave", engine = engine)
     if (!have.makefile && vignette_is_tex(output)) {
     texi2pdf(file = output, clean = FALSE, quiet = quiet)
     output <- find_vignette_product(name, by = "texi2pdf",
     engine = engine)
     }
     outputs <- c(outputs, output)
    }, error = function(e) {
     thisOK <<- FALSE
     fails <<- c(fails, file)
     message(gettextf("Error: processing vignette '%s' failed with diagnostics:\n%s",
     file, conditionMessage(e)))
    })
    where 24: tools:::buildVignettes(dir = "/home/hornik/tmp/R.check/r-devel-clang/Work/PKGS/Crossover.Rcheck/vign_test/Crossover",
     ser_elibs = "/tmp/RtmpRiZD7m/file37bb6b634a3b.rds")
    
     --- value of length: 2 type: logical ---
    [1] FALSE FALSE
     --- function from context ---
    function (design, v = length(table(design)), model, ppp = 0.5,
     placebos = 1, contrasts)
    {
     if (class(design) == "CrossoverSearchResult") {
     if (missing(model)) {
     model <- design@model
     }
     else {
     if (model != design@model)
     warning("Model from object does not equal specified model")
     }
     design <- design@design
     }
     if (class(design) == "CrossoverDesign") {
     if (missing(model)) {
     model <- design@model
     }
     else {
     if (model != design@model)
     warning("Model from object does not equal specified model")
     }
     design <- design@design
     }
     model <- getModelNr(model)
     if (missing(contrasts)) {
     contrasts <- getPairwiseContrasts(model, v)
     }
     if (is.matrix(contrasts)) {
     contrasts <- list(contrasts)
     }
     H <- linkMatrix(model, v, ppp, placebos)
     p <- dim(design)[1]
     s <- dim(design)[2]
     rcDesign <- rcd(design, v = v, model = model)
     Xr <- rcdMatrix(rcDesign, v = v, model = model)
     Ar <- t(Xr) %*% (diag(s * p) - getPZ(s, p)) %*% Xr
     A <- t(H) %*% Ar %*% H
     result <- list()
     for (C in contrasts) {
     n <- sum(colSums(C == 0) < dim(C)[1])
     m <- matrix(0, n, n)
     if (!estimable(design, v, model, C)) {
     m[row(m) != col(m)] <- NA
     }
     else {
     m[lower.tri(m)] <- diag(C %*% ginv(A) %*% t(C))
     m[upper.tri(m)] <- t(m)[upper.tri(m)]
     }
     result <- c(result, list(m))
     }
     names(result)[1] <- "Var.trt.pair"
     if (length(result) == 2) {
     names(result)[2] <- "Var.car.pair"
     }
     if (length(result) == 3) {
     names(result)[2:3] <- c("Var.car.pair.1", "Var.car.pair.2")
     }
     result$model <- model
     return(result)
    }
    <bytecode: 0x126b2460>
    <environment: namespace:Crossover>
     --- function search by body ---
    Function general.carryover in namespace Crossover has this body.
     ----------- END OF FAILURE REPORT --------------
    Quitting from lines 243-247 (Crossover.Rnw)
    Error: processing vignette 'Crossover.Rnw' failed with diagnostics:
    the condition has length > 1
    --- failed re-building 'Crossover.Rnw'
    
    SUMMARY: processing the following file failed:
     'Crossover.Rnw'
    
    Error: Vignette re-building failed.
    Execution halted
Flavor: r-devel-linux-x86_64-debian-clang

Version: 0.1-18
Check: whether package can be installed
Result: ERROR
    Installation failed.
Flavors: r-devel-windows-ix86+x86_64, r-devel-windows-ix86+x86_64-gcc8

Version: 0.1-18
Check: examples
Result: ERROR
    Running examples in ‘Crossover-Ex.R’ failed
    The error most likely occurred in:
    
    > ### Name: CrossoverDesign-class
    > ### Title: Class CrossoverDesign
    > ### Aliases: CrossoverDesign-class CrossoverDesign
    > ### show,CrossoverDesign-method print,CrossoverDesign-method
    > ### Keywords: graphs
    >
    > ### ** Examples
    >
    >
    >
    > design <- t(rbind(c(1,1,2,2),
    + c(2,2,1,1),
    + c(1,1,2,2),
    + c(2,2,1,1),
    + c(1,2,2,1),
    + c(2,1,1,2)))
    >
    > new("CrossoverDesign", design)
     (s=6, p=4, v=2)
     [,1] [,2] [,3] [,4] [,5] [,6]
    [1,] 1 2 1 2 1 2
    [2,] 1 2 1 2 2 1
    [3,] 2 1 2 1 2 1
    [4,] 2 1 2 1 1 2
    
    Error in rcd(design, v = v, model = model) :
     function 'dataptr' not provided by package 'Rcpp'
    Calls: <Anonymous> ... <Anonymous> -> cat -> design.efficiency -> estimable -> rcd
    Execution halted
Flavor: r-patched-solaris-x86

Version: 0.1-18
Check: tests
Result: ERROR
     Running ‘testthat.R’ [0m/166m]
    Running the tests in ‘tests/testthat.R’ failed.
    Complete output:
     > library(testthat)
     > library(Crossover)
     Loading required package: rJava
     Loading required package: CommonJavaJars
     Loading required package: JavaGD
     Loading required package: ggplot2
     >
     > test_check("Crossover")
     Skipping design tests for v=2.
     ── 1. Error: (unknown) (@test-efficiency.R#217) ───────────────────────────────
     function 'dataptr' not provided by package 'Rcpp'
     Backtrace:
     1. Crossover:::test.eff()
     2. Crossover::design.efficiency(design)
     3. Crossover:::estimable(design, v, model, C)
     4. Crossover:::rcd(design, v = v, model = model)
Flavor: r-patched-solaris-x86

Version: 0.1-18
Check: re-building of vignette outputs
Result: WARN
    Error(s) in re-building vignettes:
     ...
    --- re-building ‘Crossover.Rnw’ using knitr
    Loading required package: mvtnorm
    Loading required package: survival
    Loading required package: TH.data
    
    Attaching package: 'TH.data'
    
    The following object is masked from 'package:MASS':
    
     geyser
    
    Quitting from lines 243-247 (Crossover.Rnw)
    Error: processing vignette 'Crossover.Rnw' failed with diagnostics:
    function 'dataptr' not provided by package 'Rcpp'
    --- failed re-building ‘Crossover.Rnw’
    
    SUMMARY: processing the following file failed:
     ‘Crossover.Rnw’
    
    Error: Vignette re-building failed.
    Execution halted
Flavor: r-patched-solaris-x86

Version: 0.1-18
Check: running examples for arch ‘i386’
Result: ERROR
    Running examples in 'Crossover-Ex.R' failed
    The error most likely occurred in:
    
    > ### Name: CrossoverDesign-class
    > ### Title: Class CrossoverDesign
    > ### Aliases: CrossoverDesign-class CrossoverDesign
    > ### show,CrossoverDesign-method print,CrossoverDesign-method
    > ### Keywords: graphs
    >
    > ### ** Examples
    >
    >
    >
    > design <- t(rbind(c(1,1,2,2),
    + c(2,2,1,1),
    + c(1,1,2,2),
    + c(2,2,1,1),
    + c(1,2,2,1),
    + c(2,1,1,2)))
    >
    > new("CrossoverDesign", design)
     (s=6, p=4, v=2)
     [,1] [,2] [,3] [,4] [,5] [,6]
    [1,] 1 2 1 2 1 2
    [2,] 1 2 1 2 2 1
    [3,] 2 1 2 1 2 1
    [4,] 2 1 2 1 1 2
    
    Error in rcd(design, v = v, model = model) :
     function 'dataptr' not provided by package 'Rcpp'
    Calls: <Anonymous> ... <Anonymous> -> cat -> design.efficiency -> estimable -> rcd
    Execution halted
Flavor: r-release-windows-ix86+x86_64

Version: 0.1-18
Check: running examples for arch ‘x64’
Result: ERROR
    Running examples in 'Crossover-Ex.R' failed
    The error most likely occurred in:
    
    > ### Name: CrossoverDesign-class
    > ### Title: Class CrossoverDesign
    > ### Aliases: CrossoverDesign-class CrossoverDesign
    > ### show,CrossoverDesign-method print,CrossoverDesign-method
    > ### Keywords: graphs
    >
    > ### ** Examples
    >
    >
    >
    > design <- t(rbind(c(1,1,2,2),
    + c(2,2,1,1),
    + c(1,1,2,2),
    + c(2,2,1,1),
    + c(1,2,2,1),
    + c(2,1,1,2)))
    >
    > new("CrossoverDesign", design)
     (s=6, p=4, v=2)
     [,1] [,2] [,3] [,4] [,5] [,6]
    [1,] 1 2 1 2 1 2
    [2,] 1 2 1 2 2 1
    [3,] 2 1 2 1 2 1
    [4,] 2 1 2 1 1 2
    
    Error in rcd(design, v = v, model = model) :
     function 'dataptr' not provided by package 'Rcpp'
    Calls: <Anonymous> ... <Anonymous> -> cat -> design.efficiency -> estimable -> rcd
    Execution halted
Flavor: r-release-windows-ix86+x86_64

Version: 0.1-18
Check: running tests for arch ‘i386’
Result: FAIL
    Check process probably crashed or hung up for 20 minutes ... killed
    Most likely this happened in the example checks (?),
    if not, ignore the following last lines of example output:
    
    ======== End of example output (where/before crash/hang up occured ?) ========
Flavor: r-release-windows-ix86+x86_64