to understand wdpa by visualising in r