This function creates an Excel file with each dataframe in a list as a separate sheet.
Value
No return value. The function prints a message indicating the completion of the Excel file writing.
Examples
# \donttest{
tox_dat <- extr_tox("50-00-0")
#> ℹ Checking Internet Connection...
#> ℹ Internet connection OK...
#> ℹ Getting PubChem IDS...
#> Querying 50-00-0.
#> OK (HTTP 200).
#>
#>
#> Querying 712.
#> OK (HTTP 200).
#>
#>
#> ℹ Sending request to CompTox...
#> Request succeeded with status code: 202
#> ℹ Getting info from CompTox...
#> Request succeeded with status code: 200
#> ℹ Checking Internet Connection...
#> ℹ Internet connection OK...
#> Sending request to ICE database...
#> Request succeeded with status code: 200
#> ℹ Checking Internet Connection...
#> ℹ Internet connection OK...
#> Quering 50-00-0 to EPA IRIS database...
#> Request succeeded with status code: 200
temp_file <- tempfile(fileext = ".xlsx")
write_dataframes_to_excel(tox_dat, filename = temp_file)
#> ℹ Excell file written in /var/folders/bp/fpwcfq1563l21rz5gdcsfcsw0000gn/T//RtmpIRcQQu/file6d0a1c5b3d90.xlsx...
# }