locate: Add direction annations to tidyxl data frame
In ianmoran11/locatr: Easier Tidying of Data from Spreadsheets

This function adds direction annations to tidyxl data frame. The resulting data frame will contain the following columns: .value, .direction, and .header_label. These columns indicate the value, direction and name of the header columns that will be produced in the tidy data frame produced by migrate.

The header cells for which annotations are the outermost. For example, if "left" of "W" is used for the direction argument, cells furthest to the left in your spreadsheet will have location information added.

1 2	locate(cells, direction, name, values = NULL, types = data_type, formatters = list(), drop_na = TRUE)

`cells`	a tidyxl data frame
`direction`	direction of new headers
`name`	of variable associated with header
`values`	values
`types`	types
`formatters`	formatters
`drop_na`	drop_na

## Not run: 

library(tidyverse)

xl_df <-
locatr_example("worked-examples.xlsx") %>%
 xlsx_cells_fmt(sheets = "pivot-annotations")

# Identfy which cells are data cells using `locate_data`

 xl_df <- xl_df %>% locate_data(data_type == "numeric")

 # Identify header cells, indicating their direction with respect to the data and a name for
 their column in the final tidy data frame.
 xl_df <-
  xl_df %>%
   locate(direction = "WNW", name = subject_type) %>%
   locate(direction = "W", name = subject) %>%
   locate(direction = "NNW", name = gender) %>%
   locate(direction = "N", name = name)

 # Use `migrate` to reshape the data frame such that each data cells has its own row and each
 header variable has its own column.
 xl_df %>% migrate()

## End(Not run)