Downloading by states includes plots outside the state

[nerutenbeck]

I'm getting some surprising results querying the FIA DB. I want to pull in all the FIA data for the SRS states, so am passing a string of state ABBs to tidyFIA, but it is returning data to me from neighboring states that I have not specified.

library(tidyFIA)
library(tidyverse)
library(sf)

srs_states <- c(
  "AL", "AR", "FL", "GA", "KY", "LA", "MS", "NC", "OK",
  "SC", "TN", "TX", "VA"
)

fia_data <- tidy_fia(states = srs_states)

count(sf::st_drop_geometry(fia_data[["plot"]]), statecd)

Result:

   statecd     n
1        1 38082
2        5 38583
3       12 58891
4       13 64212
5       17    28
6       18   123
7       20    52
8       21 19251
9       22 22719
10      24    16
11      28 27709
12      29    47
13      37 47950
14      39    20
15      40 14705
16      45 40816
17      47 27278
18      48 55721
19      51 40220
20      54    87

where the states with few plots are neighboring states to the ones passed as args. I think we must be either:

1. Getting plots that have been fuzzed / swapped into neighboring states
2. Pulling in plots on the edge of state lines due to spatial imprecision in the query