tests/testthat/data/escape-a.R

In pmcharrison/ppm: Prediction by Partial Matching

x <- list(
list(
c(
a = 0.19999999,
b = 0.19999999,
c = 0.19999999,
d = 0.19999999,
r = 0.19999999),
c(
a = 0.59999996,
b = 0.09999999,
c = 0.09999999,
d = 0.09999999,
r = 0.09999999),
c(
a = 0.3846154,
b = 0.3846154,
c = 0.076923065,
d = 0.076923065,
r = 0.076923065),
c(
a = 0.2857143,
b = 0.2857143,
c = 0.071428575,
d = 0.071428575,
r = 0.2857143),
c(
a = 0.2413793,
b = 0.5517242,
c = 0.034482762,
d = 0.034482762,
r = 0.13793105),
c(
a = 0.33333334,
b = 0.2,
c = 0.2,
d = 0.06666668,
r = 0.2),
c(
a = 0.1891892,
b = 0.35135135,
c = 0.35135135,
d = 0.027027022,
r = 0.08108108),
c(
a = 0.33333334,
b = 0.16666667,
c = 0.16666667,
d = 0.16666667,
r = 0.16666667),
c(
a = 0.16129033,
b = 0.2580645,
c = 0.2580645,
d = 0.2580645,
r = 0.06451614),
c(
a = 0.2173913,
b = 0.13043477,
c = 0.08695651,
d = 0.08695651,
r = 0.47826087),
c(
a = 0.54545456,
b = 0.13636366,
c = 0.09090909,
d = 0.09090909,
r = 0.13636366)))