data-raw/suffices.R

In ERICNorthEast/ERIC_Data_Proc: Functions for data processing and validation

#Suffix mappings for grid refs
suffices <- tibble::tribble(~Letter,	~E,	~N,
                    "a",	1000,	1000,
                    "b",	1000,	3000,
                    "c",	1000,	5000,
                    "d",	1000,	7000,
                    "e",	1000,	9000,
                    "f",	3000,	1000,
                    "g",	3000,	3000,
                    "h",	3000,	5000,
                    "i",	3000,	7000,
                    "j",	3000,	9000,
                    "k",	5000,	1000,
                    "l",	5000,	3000,
                    "m",	5000,	5000,
                    "n",	5000,	7000,
                    "p",	5000,	9000,
                    "q",	7000,	1000,
                    "r",	7000,	3000,
                    "s",	7000,	5000,
                    "t",	7000,	7000,
                    "u",	7000,	9000,
                    "v",	9000,	1000,
                    "w",	9000,	3000,
                    "x",	9000,	5000,
                    "y",	9000,	7000,
                    "z",	9000,	9000)

sysdata_filenames <- load("R/sysdata.rda")
save(list = c(sysdata_filenames, "suffices"),file = "R/sysdata.rda")