## ---- include = FALSE----------------------------------------------------
knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>"
)

## ----setup---------------------------------------------------------------
library(ccostr)

## ------------------------------------------------------------------------
head(hcost)

## ----hcost---------------------------------------------------------------
est <- ccmean(hcost, L = 1461, addInterPol = 1)
est

## ----fig.height=3, fig.width=7-------------------------------------------
plot(est)