In ald_demo, column id_company should be unique by name_company and sector

[jdhoffa]

See reprex below:

library(dplyr)
#> 
#> Attaching package: 'dplyr'
#> The following objects are masked from 'package:stats':
#> 
#>     filter, lag
#> The following objects are masked from 'package:base':
#> 
#>     intersect, setdiff, setequal, union
library(r2dii.data)

ald_demo %>% 
  dplyr::select(id_company, name_company, sector) %>% 
  unique() %>% 
  dplyr::filter(duplicated(id_company))
#> # A tibble: 89 x 3
#>    id_company name_company                  sector     
#>    <chr>      <chr>                         <chr>      
#>  1 30         beijing energy holding co ltd power      
#>  2 52         centrica plc                  power      
#>  3 53         cercl mining bv               oil and gas
#>  4 56         china shenhua energy co ltd   power      
#>  5 60         cias asociadas petroleras sa  power      
#>  6 85         drummond co inc               power      
#>  7 90         ecopetrol sa                  power      
#>  8 99         essar energy ltd              power      
#>  9 99         essar energy ltd              oil and gas
#> 10 102        federation of malaysia        oil and gas
#> # … with 79 more rows

^{Created on 2021-06-10 by the reprex package (v2.0.0)}