source("data.R")

data <- load_data_cached("input")
print(data)