tests/testthat/data/ppm-mix-2.R

In pmcharrison/ppm: Prediction by Partial Matching

x <- list(
list(
c(
e = 0.25,
l = 0.25,
r = 0.25,
t = 0.25),
c(
e = 0.125,
l = 0.625,
r = 0.125,
t = 0.125),
c(
e = 0.35714287,
l = 0.35714287,
r = 0.14285715,
t = 0.14285715),
c(
e = 0.2777778,
l = 0.2777778,
r = 0.16666667,
t = 0.2777778),
c(
e = 0.53125,
l = 0.21875001,
r = 0.09375,
t = 0.15625),
c(
e = 0.19444443,
l = 0.19444443,
r = 0.08333332,
t = 0.5277778),
c(
e = 0.18421054,
l = 0.5526316,
r = 0.07894737,
t = 0.18421054),
c(
e = 0.19444445,
l = 0.3333333,
r = 0.08333333,
t = 0.3888889),
c(
e = 0.14999999,
l = 0.11666667,
r = 0.049999997,
t = 0.68333334),
c(
e = 0.28,
l = 0.23999998,
r = 0.19999999,
t = 0.28),
c(
e = 0.27956992,
l = 0.24731185,
r = 0.16129033,
t = 0.311828),
c(
e = 0.12903225,
l = 0.0967742,
r = 0.48387095,
t = 0.29032257),
c(
e = 0.6153847,
l = 0.13461538,
r = 0.09615384,
t = 0.15384616)))