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

In pmcharrison/ppm: Prediction by Partial Matching

x <- list(
list(
c(
i = 0.25,
m = 0.25,
p = 0.25,
s = 0.25),
c(
i = 0.125,
m = 0.625,
p = 0.125,
s = 0.125),
c(
i = 0.35714287,
m = 0.35714287,
p = 0.14285715,
s = 0.14285715),
c(
i = 0.2777778,
m = 0.2777778,
p = 0.16666667,
s = 0.2777778),
c(
i = 0.16666667,
m = 0.16666667,
p = 0.10000001,
s = 0.5666667),
c(
i = 0.20588236,
m = 0.14705881,
p = 0.08823529,
s = 0.5588235),
c(
i = 0.25,
m = 0.11363636,
p = 0.06818181,
s = 0.5681818),
c(
i = 0.5,
m = 0.0925926,
p = 0.055555556,
s = 0.35185185),
c(
i = 0.16071428,
m = 0.08928572,
p = 0.053571425,
s = 0.6964286),
c(
i = 0.28000003,
m = 0.2,
p = 0.2,
s = 0.32),
c(
i = 0.18421052,
m = 0.13157895,
p = 0.47368425,
s = 0.21052632)))