# Visualise the best climate window from the datasets Mass and MassClimate
data(MassOutput)
data(Mass)
data(MassClimate)
single <- singlewin(xvar = list(Temp = MassClimate$Temp),
cdate = MassClimate$Date, bdate = Mass$Date,
baseline = lm(Mass ~ 1, data = Mass),
furthest = 72, closest = 15,
stat = "mean", func = "lin",
type = "fixed", cutoff.day = 20, cutoff.month = 5,
cmissing = FALSE, cinterval = "day")
plotbest(dataset = MassOutput, bestmodel = single$BestModel,
bestmodeldata = single$BestModelData)Run the code above in your browser using DataLab