library(diversedata)

globalrights <- globalrights

head(globalrights)