Get most recent data

[gexijin]

The most recent data from 2019 to 2021 is also available at the OpenPayment website.

[jennathor]

just submitted a pull request adding 2 updated csv files, one partially clean and one raw

[gexijin]

Thanks Jenna. We need other people to update their own data.

[gexijin]

Caleb's data is causing errors, because there are additional rows in Jenna's data now if we use her updated data.

##Caleb
### for box plot
df <- read_csv("calebpayment.csv") # only making payment country & payment total

# merge with jenna's df
df2 <- cbind(df, payment)