Create data-structure.R