Create footprints.R