Processing PoMS data

UK Pollinator Monitoring Scheme (PoMS) Map to TFs (within 5k) Need to convert OS Grid to lat longs

needs(tidyverse, googledrive, reticulate, sf, broom.mixed, gtsummary, kableExtra)
Sys.setenv(RETICULATE_PYTHON = "/Users/julianflowers/.virtualenvs/tinyforest/bin/python")
use_virtualenv("tinyforest")
py_install("OSGridConverter", envname = "tinyforest")

## Using virtual environment 'tinyforest' ...

## + /Users/julianflowers/.virtualenvs/tinyforest/bin/python -m pip install --upgrade --no-user OSGridConverter

osng <- import("OSGridConverter")

googledrive::drive_auth()

## ! Using an auto-discovered, cached token.

##   To suppress this message, modify your code or options to clearly consent to
##   the use of a cached token.

##   See gargle's "Non-interactive auth" vignette for more details:

##   <https://gargle.r-lib.org/articles/non-interactive-auth.html>

## ℹ The googledrive package is using a cached token for
##   'julian.flowers12@gmail.com'.

## download and unzip data from googledrive
poms <- drive_download("dissertation/13aed7ac-334f-4bb7-b476-4f1c3da45a13.zip", overwrite = TRUE)

## File downloaded:

## • '13aed7ac-334f-4bb7-b476-4f1c3da45a13.zip'
##   <id: 10WJxqZqWJOWY83gQHAVawCZSjNrSqhMX>

## Saved locally as:

## • '13aed7ac-334f-4bb7-b476-4f1c3da45a13.zip'

unzip("13aed7ac-334f-4bb7-b476-4f1c3da45a13.zip")


poms1 <-list.files("13aed7ac-334f-4bb7-b476-4f1c3da45a13/data", "csv", full.names = TRUE)

## read in data and extract filenames
poms_csv <- map(poms1, read_csv)

## Rows: 1384 Columns: 40

``` ## ── Column specification ───────────

Process POMS data

Processing PoMS data