extr_iris

[c1au6i0]

For multiple casrn, extr_iris, extracts all the casrn info multiple times (x number of casrn).
It is looping twice...

dat <- extractox::extr_iris(c("50-00-0", "100-99-0"))
#> ℹ Checking Internet Connection...
#> ℹ Internet connection OK...
#> Quering 50-00-0 to EPA IRIS database...
#> Request succeeded with status code: 200
#> Quering 100-99-0 to EPA IRIS database...
#> Request succeeded with status code: 200

dat
#> # A tibble: 6 × 8
#>   chemical_name casrn   exposure_route assessment_type critical_effect_or_tumo…¹
#>   <chr>         <chr>   <chr>          <chr>           <chr>                    
#> 1 Formaldehyde  50-00-0 Oral           Noncancer       Reduced weight gain, his…
#> 2 Formaldehyde  50-00-0 Inhalation     Cancer          Nasopharyngeal cancer, s…
#> 3 Formaldehyde  50-00-0 Inhalation     Noncancer       Decreased pulmonary func…
#> 4 Formaldehyde  50-00-0 Inhalation     Cancer          Nasopharyngeal cancer, s…
#> 5 Formaldehyde  50-00-0 Inhalation     Noncancer       Decreased pulmonary func…
#> 6 Formaldehyde  50-00-0 Oral           Noncancer       Reduced weight gain, his…
#> # ℹ abbreviated name: ¹​critical_effect_or_tumor_type
#> # ℹ 3 more variables: woe_characterization <chr>, toxicity_value_type <chr>,
#> #   toxicity_value <chr>