Fraser-Suzuki mixture model
fs_mixture(
temp,
height_1,
skew_1,
position_1,
width_1,
height_2,
skew_2,
position_2,
width_2,
height_3,
skew_3,
position_3,
width_3,
height_0 = NULL,
skew_0 = NULL,
position_0 = NULL,
width_0 = NULL
)
temperature values
height value for hemicellulose
shape value for hemicellulose
position value for hemicellulose
width value for hemicellulose
height value for cellulose
shape value for cellulose
position value for cellulose
width value for cellulose
height value for lignin
shape value for lignin
position value for lignin
width value for lignin
height value for second hemicellulose curve, if present
shape value for second hemicellulose curve, if present
position value for second hemicellulose curve, if present
width value for second hemicellulose curve, if present
Fraser-Suzuki model output
temp <- 150:600
fs_mixture_output <- fs_mixture(temp,
height_1 = 0.003, skew_1 = -0.15, position_1 = 250, width_1 = 50,
height_2 = 0.006, skew_2 = -0.15, position_2 = 320, width_2 = 30,
height_3 = 0.001, skew_3 = -0.15, position_3 = 390, width_3 = 200)