Last updated on 2021-10-31 05:49:53 CET.
Flavor | Version | Tinstall | Tcheck | Ttotal | Status | Flags |
---|---|---|---|---|---|---|
r-devel-linux-x86_64-debian-clang | 0.1.0 | 2.59 | 35.47 | 38.06 | OK | |
r-devel-linux-x86_64-debian-gcc | 0.1.0 | 2.04 | 28.00 | 30.04 | OK | |
r-devel-linux-x86_64-fedora-clang | 0.1.0 | 56.01 | NOTE | |||
r-devel-linux-x86_64-fedora-gcc | 0.1.0 | 44.53 | NOTE | |||
r-devel-windows-x86_64 | 0.1.0 | 5.00 | 224.00 | 229.00 | ERROR | |
r-devel-windows-x86_64-gcc10-UCRT | 0.1.0 | ERROR | ||||
r-patched-linux-x86_64 | 0.1.0 | 2.66 | 34.26 | 36.92 | OK | |
r-patched-solaris-x86 | 0.1.0 | 68.90 | NOTE | |||
r-release-linux-x86_64 | 0.1.0 | 2.50 | 34.54 | 37.04 | OK | |
r-release-macos-arm64 | 0.1.0 | NOTE | ||||
r-release-macos-x86_64 | 0.1.0 | NOTE | ||||
r-release-windows-ix86+x86_64 | 0.1.0 | 6.00 | 44.00 | 50.00 | ERROR | |
r-oldrel-macos-x86_64 | 0.1.0 | NOTE | ||||
r-oldrel-windows-ix86+x86_64 | 0.1.0 | 6.00 | 58.00 | 64.00 | ERROR |
Version: 0.1.0
Check: dependencies in R code
Result: NOTE
Namespace in Imports field not imported from: ‘rjson’
All declared Imports should be used.
Flavors: r-devel-linux-x86_64-fedora-clang, r-devel-linux-x86_64-fedora-gcc, r-devel-windows-x86_64-gcc10-UCRT, r-patched-solaris-x86, r-release-macos-arm64, r-release-macos-x86_64, r-oldrel-macos-x86_64
Version: 0.1.0
Check: data for non-ASCII characters
Result: NOTE
Note: found 4 marked UTF-8 strings
Flavors: r-devel-linux-x86_64-fedora-clang, r-devel-linux-x86_64-fedora-gcc, r-devel-windows-x86_64-gcc10-UCRT, r-patched-solaris-x86, r-release-macos-arm64, r-release-macos-x86_64, r-oldrel-macos-x86_64
Version: 0.1.0
Check: examples
Result: ERROR
Running examples in 'TNRS-Ex.R' failed
The error most likely occurred in:
> ### Name: TNRS
> ### Title: Resolve plant taxonomic names
> ### Aliases: TNRS
>
> ### ** Examples
>
> {
+ #Take a subset of the testfile to speed up runtime
+ tnrs_testfile <- tnrs_testfile[1:20,]
+
+ results <- TNRS(taxonomic_names = tnrs_testfile)
+
+ # Inspect the results
+ head(results, 10)
+ }
Error in function (type, msg, asError = TRUE) :
error:1407742E:SSL routines:SSL23_GET_SERVER_HELLO:tlsv1 alert protocol version
Calls: TNRS ... .TNRS_base -> postForm -> .postForm -> <Anonymous> -> fun
Execution halted
Flavors: r-devel-windows-x86_64, r-release-windows-ix86+x86_64, r-oldrel-windows-ix86+x86_64
Version: 0.1.0
Check: tests
Result: ERROR
Running 'testthat.R' [13s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
> library(testthat)
> library(TNRS)
>
>
> test_check("TNRS")
== Failed tests ================================================================
-- Error (test-TNRS.R:7:3): example works --------------------------------------
<SSL_CONNECT_ERROR/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(35L, "error:1407742E:SSL routines:SSL23_GET_SERVER_HELLO:tlsv1 alert protocol version",
TRUE)`: error:1407742E:SSL routines:SSL23_GET_SERVER_HELLO:tlsv1 alert protocol version
Backtrace:
x
1. +-TNRS::TNRS(taxonomic_names = tnrs_testfile) test-TNRS.R:7:2
2. | \-TNRS:::.TNRS_base(...)
3. | \-RCurl::postForm(url, .opts = list(postfields = input_json, httpheader = headers))
4. | \-RCurl::.postForm(curl, .opts, .params, style)
5. \-(function (type, msg, asError = TRUE) ...
-- Error (test-TNRS.R:19:3): character vector returns results ------------------
<SSL_CONNECT_ERROR/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(35L, "error:1407742E:SSL routines:SSL23_GET_SERVER_HELLO:tlsv1 alert protocol version",
TRUE)`: error:1407742E:SSL routines:SSL23_GET_SERVER_HELLO:tlsv1 alert protocol version
Backtrace:
x
1. +-TNRS::TNRS(...) test-TNRS.R:19:2
2. | \-TNRS:::.TNRS_base(...)
3. | \-RCurl::postForm(url, .opts = list(postfields = input_json, httpheader = headers))
4. | \-RCurl::.postForm(curl, .opts, .params, style)
5. \-(function (type, msg, asError = TRUE) ...
-- Error (test-TNRS.R:28:3): character returns results -------------------------
<SSL_CONNECT_ERROR/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(35L, "error:1407742E:SSL routines:SSL23_GET_SERVER_HELLO:tlsv1 alert protocol version",
TRUE)`: error:1407742E:SSL routines:SSL23_GET_SERVER_HELLO:tlsv1 alert protocol version
Backtrace:
x
1. +-TNRS::TNRS(taxonomic_names = c("Epidendrum boyleii")) test-TNRS.R:28:2
2. | \-TNRS:::.TNRS_base(...)
3. | \-RCurl::postForm(url, .opts = list(postfields = input_json, httpheader = headers))
4. | \-RCurl::.postForm(curl, .opts, .params, style)
5. \-(function (type, msg, asError = TRUE) ...
-- Error (test-TNRS.R:40:3): all sources work ----------------------------------
<SSL_CONNECT_ERROR/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(35L, "error:1407742E:SSL routines:SSL23_GET_SERVER_HELLO:tlsv1 alert protocol version",
TRUE)`: error:1407742E:SSL routines:SSL23_GET_SERVER_HELLO:tlsv1 alert protocol version
Backtrace:
x
1. +-TNRS::TNRS(taxonomic_names = species, sources = "tpl") test-TNRS.R:40:2
2. | \-TNRS:::.TNRS_base(...)
3. | \-RCurl::postForm(url, .opts = list(postfields = input_json, httpheader = headers))
4. | \-RCurl::.postForm(curl, .opts, .params, style)
5. \-(function (type, msg, asError = TRUE) ...
-- Error (test-TNRS.R:64:3): matches all returns more rows than best -----------
<SSL_CONNECT_ERROR/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(35L, "error:1407742E:SSL routines:SSL23_GET_SERVER_HELLO:tlsv1 alert protocol version",
TRUE)`: error:1407742E:SSL routines:SSL23_GET_SERVER_HELLO:tlsv1 alert protocol version
Backtrace:
x
1. +-TNRS::TNRS(taxonomic_names = "Epidendon boyleii", matches = "all") test-TNRS.R:64:2
2. | \-TNRS:::.TNRS_base(...)
3. | \-RCurl::postForm(url, .opts = list(postfields = input_json, httpheader = headers))
4. | \-RCurl::.postForm(curl, .opts, .params, style)
5. \-(function (type, msg, asError = TRUE) ...
-- Error (test-TNRS.R:74:3): parsing returns matches ---------------------------
<SSL_CONNECT_ERROR/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(35L, "error:1407742E:SSL routines:SSL23_GET_SERVER_HELLO:tlsv1 alert protocol version",
TRUE)`: error:1407742E:SSL routines:SSL23_GET_SERVER_HELLO:tlsv1 alert protocol version
Backtrace:
x
1. +-TNRS::TNRS(taxonomic_names = "Epidentrum boyleii", mode = "parse") test-TNRS.R:74:2
2. | \-TNRS:::.TNRS_base(...)
3. | \-RCurl::postForm(url, .opts = list(postfields = input_json, httpheader = headers))
4. | \-RCurl::.postForm(curl, .opts, .params, style)
5. \-(function (type, msg, asError = TRUE) ...
-- Error (test-TNRS_base.R:7:3): example works ---------------------------------
<SSL_CONNECT_ERROR/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(35L, "error:1407742E:SSL routines:SSL23_GET_SERVER_HELLO:tlsv1 alert protocol version",
TRUE)`: error:1407742E:SSL routines:SSL23_GET_SERVER_HELLO:tlsv1 alert protocol version
Backtrace:
x
1. +-TNRS:::.TNRS_base(taxonomic_names = tnrs_testfile) test-TNRS_base.R:7:2
2. | \-RCurl::postForm(url, .opts = list(postfields = input_json, httpheader = headers))
3. | \-RCurl::.postForm(curl, .opts, .params, style)
4. \-(function (type, msg, asError = TRUE) ...
-- Error (test-TNRS_citations.R:6:3): example works ----------------------------
<SSL_CONNECT_ERROR/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(35L, "error:1407742E:SSL routines:SSL23_GET_SERVER_HELLO:tlsv1 alert protocol version",
TRUE)`: error:1407742E:SSL routines:SSL23_GET_SERVER_HELLO:tlsv1 alert protocol version
Backtrace:
x
1. +-TNRS::TNRS_citations() test-TNRS_citations.R:6:2
2. | \-RCurl::postForm(url, .opts = list(postfields = input_json, httpheader = headers))
3. | \-RCurl::.postForm(curl, .opts, .params, style)
4. \-(function (type, msg, asError = TRUE) ...
-- Error (test-TNRS_metadata.R:6:3): example works -----------------------------
<SSL_CONNECT_ERROR/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(35L, "error:1407742E:SSL routines:SSL23_GET_SERVER_HELLO:tlsv1 alert protocol version",
TRUE)`: error:1407742E:SSL routines:SSL23_GET_SERVER_HELLO:tlsv1 alert protocol version
Backtrace:
x
1. +-TNRS::TNRS_metadata() test-TNRS_metadata.R:6:2
2. | \-TNRS::TNRS_citations()
3. | \-RCurl::postForm(url, .opts = list(postfields = input_json, httpheader = headers))
4. | \-RCurl::.postForm(curl, .opts, .params, style)
5. \-(function (type, msg, asError = TRUE) ...
-- Error (test-TNRS_sources.R:6:3): example works ------------------------------
<SSL_CONNECT_ERROR/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(35L, "error:1407742E:SSL routines:SSL23_GET_SERVER_HELLO:tlsv1 alert protocol version",
TRUE)`: error:1407742E:SSL routines:SSL23_GET_SERVER_HELLO:tlsv1 alert protocol version
Backtrace:
x
1. +-TNRS::TNRS_sources() test-TNRS_sources.R:6:2
2. | \-RCurl::postForm(url, .opts = list(postfields = input_json, httpheader = headers))
3. | \-RCurl::.postForm(curl, .opts, .params, style)
4. \-(function (type, msg, asError = TRUE) ...
-- Error (test-TNRS_version.R:6:3): example works ------------------------------
<SSL_CONNECT_ERROR/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(35L, "error:1407742E:SSL routines:SSL23_GET_SERVER_HELLO:tlsv1 alert protocol version",
TRUE)`: error:1407742E:SSL routines:SSL23_GET_SERVER_HELLO:tlsv1 alert protocol version
Backtrace:
x
1. +-TNRS::TNRS_version() test-TNRS_version.R:6:2
2. | \-RCurl::postForm(url, .opts = list(postfields = input_json, httpheader = headers))
3. | \-RCurl::.postForm(curl, .opts, .params, style)
4. \-(function (type, msg, asError = TRUE) ...
[ FAIL 11 | WARN 0 | SKIP 0 | PASS 1 ]
Error: Test failures
Execution halted
Flavor: r-devel-windows-x86_64
Version: 0.1.0
Check: re-building of vignette outputs
Result: WARN
Error(s) in re-building vignettes:
--- re-building 'TNRS_vignette.Rmd' using rmarkdown
Quitting from lines 30-50 (TNRS_vignette.Rmd)
Error: processing vignette 'TNRS_vignette.Rmd' failed with diagnostics:
error:1407742E:SSL routines:SSL23_GET_SERVER_HELLO:tlsv1 alert protocol version
--- failed re-building 'TNRS_vignette.Rmd'
SUMMARY: processing the following file failed:
'TNRS_vignette.Rmd'
Error: Vignette re-building failed.
Execution halted
Flavors: r-devel-windows-x86_64, r-release-windows-ix86+x86_64, r-oldrel-windows-ix86+x86_64
Version: 0.1.0
Check: examples
Result: ERROR
Running examples in 'TNRS-Ex.R' failed
The error most likely occurred in:
> ### Name: TNRS
> ### Title: Resolve plant taxonomic names
> ### Aliases: TNRS
>
> ### ** Examples
>
> {
+ #Take a subset of the testfile to speed up runtime
+ tnrs_testfile <- tnrs_testfile[1:20,]
+
+ results <- TNRS(taxonomic_names = tnrs_testfile)
+
+ # Inspect the results
+ head(results, 10)
+ }
Error in function (type, msg, asError = TRUE) :
SSL certificate problem: certificate has expired
Calls: TNRS ... .TNRS_base -> postForm -> .postForm -> <Anonymous> -> fun
Execution halted
Flavor: r-devel-windows-x86_64-gcc10-UCRT
Version: 0.1.0
Check: tests
Result: ERROR
Running 'testthat.R'
Running the tests in 'tests/testthat.R' failed.
Complete output:
> library(testthat)
> library(TNRS)
>
>
> test_check("TNRS")
══ Failed tests ════════════════════════════════════════════════════════════════
── Error (test-TNRS.R:7:3): example works ──────────────────────────────────────
<SSL_CACERT/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(60L, "SSL certificate problem: certificate has expired", TRUE)`: SSL certificate problem: certificate has expired
Backtrace:
█
1. ├─TNRS::TNRS(taxonomic_names = tnrs_testfile) test-TNRS.R:7:2
2. │ └─TNRS:::.TNRS_base(...)
3. │ └─RCurl::postForm(url, .opts = list(postfields = input_json, httpheader = headers))
4. │ └─RCurl::.postForm(curl, .opts, .params, style)
5. └─(function (type, msg, asError = TRUE) ...
── Error (test-TNRS.R:19:3): character vector returns results ──────────────────
<SSL_CACERT/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(60L, "SSL certificate problem: certificate has expired", TRUE)`: SSL certificate problem: certificate has expired
Backtrace:
█
1. ├─TNRS::TNRS(...) test-TNRS.R:19:2
2. │ └─TNRS:::.TNRS_base(...)
3. │ └─RCurl::postForm(url, .opts = list(postfields = input_json, httpheader = headers))
4. │ └─RCurl::.postForm(curl, .opts, .params, style)
5. └─(function (type, msg, asError = TRUE) ...
── Error (test-TNRS.R:28:3): character returns results ─────────────────────────
<SSL_CACERT/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(60L, "SSL certificate problem: certificate has expired", TRUE)`: SSL certificate problem: certificate has expired
Backtrace:
█
1. ├─TNRS::TNRS(taxonomic_names = c("Epidendrum boyleii")) test-TNRS.R:28:2
2. │ └─TNRS:::.TNRS_base(...)
3. │ └─RCurl::postForm(url, .opts = list(postfields = input_json, httpheader = headers))
4. │ └─RCurl::.postForm(curl, .opts, .params, style)
5. └─(function (type, msg, asError = TRUE) ...
── Error (test-TNRS.R:40:3): all sources work ──────────────────────────────────
<SSL_CACERT/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(60L, "SSL certificate problem: certificate has expired", TRUE)`: SSL certificate problem: certificate has expired
Backtrace:
█
1. ├─TNRS::TNRS(taxonomic_names = species, sources = "tpl") test-TNRS.R:40:2
2. │ └─TNRS:::.TNRS_base(...)
3. │ └─RCurl::postForm(url, .opts = list(postfields = input_json, httpheader = headers))
4. │ └─RCurl::.postForm(curl, .opts, .params, style)
5. └─(function (type, msg, asError = TRUE) ...
── Error (test-TNRS.R:64:3): matches all returns more rows than best ───────────
<SSL_CACERT/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(60L, "SSL certificate problem: certificate has expired", TRUE)`: SSL certificate problem: certificate has expired
Backtrace:
█
1. ├─TNRS::TNRS(taxonomic_names = "Epidendon boyleii", matches = "all") test-TNRS.R:64:2
2. │ └─TNRS:::.TNRS_base(...)
3. │ └─RCurl::postForm(url, .opts = list(postfields = input_json, httpheader = headers))
4. │ └─RCurl::.postForm(curl, .opts, .params, style)
5. └─(function (type, msg, asError = TRUE) ...
── Error (test-TNRS.R:74:3): parsing returns matches ───────────────────────────
<SSL_CACERT/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(60L, "SSL certificate problem: certificate has expired", TRUE)`: SSL certificate problem: certificate has expired
Backtrace:
█
1. ├─TNRS::TNRS(taxonomic_names = "Epidentrum boyleii", mode = "parse") test-TNRS.R:74:2
2. │ └─TNRS:::.TNRS_base(...)
3. │ └─RCurl::postForm(url, .opts = list(postfields = input_json, httpheader = headers))
4. │ └─RCurl::.postForm(curl, .opts, .params, style)
5. └─(function (type, msg, asError = TRUE) ...
── Error (test-TNRS_base.R:7:3): example works ─────────────────────────────────
<SSL_CACERT/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(60L, "SSL certificate problem: certificate has expired", TRUE)`: SSL certificate problem: certificate has expired
Backtrace:
█
1. ├─TNRS:::.TNRS_base(taxonomic_names = tnrs_testfile) test-TNRS_base.R:7:2
2. │ └─RCurl::postForm(url, .opts = list(postfields = input_json, httpheader = headers))
3. │ └─RCurl::.postForm(curl, .opts, .params, style)
4. └─(function (type, msg, asError = TRUE) ...
── Error (test-TNRS_citations.R:6:3): example works ────────────────────────────
<SSL_CACERT/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(60L, "SSL certificate problem: certificate has expired", TRUE)`: SSL certificate problem: certificate has expired
Backtrace:
█
1. ├─TNRS::TNRS_citations() test-TNRS_citations.R:6:2
2. │ └─RCurl::postForm(url, .opts = list(postfields = input_json, httpheader = headers))
3. │ └─RCurl::.postForm(curl, .opts, .params, style)
4. └─(function (type, msg, asError = TRUE) ...
── Error (test-TNRS_metadata.R:6:3): example works ─────────────────────────────
<SSL_CACERT/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(60L, "SSL certificate problem: certificate has expired", TRUE)`: SSL certificate problem: certificate has expired
Backtrace:
█
1. ├─TNRS::TNRS_metadata() test-TNRS_metadata.R:6:2
2. │ └─TNRS::TNRS_citations()
3. │ └─RCurl::postForm(url, .opts = list(postfields = input_json, httpheader = headers))
4. │ └─RCurl::.postForm(curl, .opts, .params, style)
5. └─(function (type, msg, asError = TRUE) ...
── Error (test-TNRS_sources.R:6:3): example works ──────────────────────────────
<SSL_CACERT/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(60L, "SSL certificate problem: certificate has expired", TRUE)`: SSL certificate problem: certificate has expired
Backtrace:
█
1. ├─TNRS::TNRS_sources() test-TNRS_sources.R:6:2
2. │ └─RCurl::postForm(url, .opts = list(postfields = input_json, httpheader = headers))
3. │ └─RCurl::.postForm(curl, .opts, .params, style)
4. └─(function (type, msg, asError = TRUE) ...
── Error (test-TNRS_version.R:6:3): example works ──────────────────────────────
<SSL_CACERT/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(60L, "SSL certificate problem: certificate has expired", TRUE)`: SSL certificate problem: certificate has expired
Backtrace:
█
1. ├─TNRS::TNRS_version() test-TNRS_version.R:6:2
2. │ └─RCurl::postForm(url, .opts = list(postfields = input_json, httpheader = headers))
3. │ └─RCurl::.postForm(curl, .opts, .params, style)
4. └─(function (type, msg, asError = TRUE) ...
[ FAIL 11 | WARN 0 | SKIP 0 | PASS 1 ]
Error: Test failures
Execution halted
Flavor: r-devel-windows-x86_64-gcc10-UCRT
Version: 0.1.0
Check: re-building of vignette outputs
Result: WARN
Error(s) in re-building vignettes:
--- re-building 'TNRS_vignette.Rmd' using rmarkdown
Quitting from lines 30-50 (TNRS_vignette.Rmd)
Error: processing vignette 'TNRS_vignette.Rmd' failed with diagnostics:
SSL certificate problem: certificate has expired
--- failed re-building 'TNRS_vignette.Rmd'
SUMMARY: processing the following file failed:
'TNRS_vignette.Rmd'
Error: Vignette re-building failed.
Execution halted
Flavor: r-devel-windows-x86_64-gcc10-UCRT
Version: 0.1.0
Check: tests
Result: ERROR
Running 'testthat.R' [6s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
> library(testthat)
> library(TNRS)
>
>
> test_check("TNRS")
== Failed tests ================================================================
-- Error (test-TNRS.R:7:3): example works --------------------------------------
<SSL_CONNECT_ERROR/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(35L, "error:1407742E:SSL routines:SSL23_GET_SERVER_HELLO:tlsv1 alert protocol version",
TRUE)`: error:1407742E:SSL routines:SSL23_GET_SERVER_HELLO:tlsv1 alert protocol version
Backtrace:
x
1. +-TNRS::TNRS(taxonomic_names = tnrs_testfile) test-TNRS.R:7:2
2. | \-TNRS:::.TNRS_base(...)
3. | \-RCurl::postForm(url, .opts = list(postfields = input_json, httpheader = headers))
4. | \-RCurl::.postForm(curl, .opts, .params, style)
5. \-(function (type, msg, asError = TRUE) ...
-- Error (test-TNRS.R:19:3): character vector returns results ------------------
<SSL_CONNECT_ERROR/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(35L, "error:1407742E:SSL routines:SSL23_GET_SERVER_HELLO:tlsv1 alert protocol version",
TRUE)`: error:1407742E:SSL routines:SSL23_GET_SERVER_HELLO:tlsv1 alert protocol version
Backtrace:
x
1. +-TNRS::TNRS(...) test-TNRS.R:19:2
2. | \-TNRS:::.TNRS_base(...)
3. | \-RCurl::postForm(url, .opts = list(postfields = input_json, httpheader = headers))
4. | \-RCurl::.postForm(curl, .opts, .params, style)
5. \-(function (type, msg, asError = TRUE) ...
-- Error (test-TNRS.R:28:3): character returns results -------------------------
<SSL_CONNECT_ERROR/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(35L, "error:1407742E:SSL routines:SSL23_GET_SERVER_HELLO:tlsv1 alert protocol version",
TRUE)`: error:1407742E:SSL routines:SSL23_GET_SERVER_HELLO:tlsv1 alert protocol version
Backtrace:
x
1. +-TNRS::TNRS(taxonomic_names = c("Epidendrum boyleii")) test-TNRS.R:28:2
2. | \-TNRS:::.TNRS_base(...)
3. | \-RCurl::postForm(url, .opts = list(postfields = input_json, httpheader = headers))
4. | \-RCurl::.postForm(curl, .opts, .params, style)
5. \-(function (type, msg, asError = TRUE) ...
-- Error (test-TNRS.R:40:3): all sources work ----------------------------------
<SSL_CONNECT_ERROR/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(35L, "error:1407742E:SSL routines:SSL23_GET_SERVER_HELLO:tlsv1 alert protocol version",
TRUE)`: error:1407742E:SSL routines:SSL23_GET_SERVER_HELLO:tlsv1 alert protocol version
Backtrace:
x
1. +-TNRS::TNRS(taxonomic_names = species, sources = "tpl") test-TNRS.R:40:2
2. | \-TNRS:::.TNRS_base(...)
3. | \-RCurl::postForm(url, .opts = list(postfields = input_json, httpheader = headers))
4. | \-RCurl::.postForm(curl, .opts, .params, style)
5. \-(function (type, msg, asError = TRUE) ...
-- Error (test-TNRS.R:64:3): matches all returns more rows than best -----------
<SSL_CONNECT_ERROR/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(35L, "error:1407742E:SSL routines:SSL23_GET_SERVER_HELLO:tlsv1 alert protocol version",
TRUE)`: error:1407742E:SSL routines:SSL23_GET_SERVER_HELLO:tlsv1 alert protocol version
Backtrace:
x
1. +-TNRS::TNRS(taxonomic_names = "Epidendon boyleii", matches = "all") test-TNRS.R:64:2
2. | \-TNRS:::.TNRS_base(...)
3. | \-RCurl::postForm(url, .opts = list(postfields = input_json, httpheader = headers))
4. | \-RCurl::.postForm(curl, .opts, .params, style)
5. \-(function (type, msg, asError = TRUE) ...
-- Error (test-TNRS.R:74:3): parsing returns matches ---------------------------
<SSL_CONNECT_ERROR/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(35L, "error:1407742E:SSL routines:SSL23_GET_SERVER_HELLO:tlsv1 alert protocol version",
TRUE)`: error:1407742E:SSL routines:SSL23_GET_SERVER_HELLO:tlsv1 alert protocol version
Backtrace:
x
1. +-TNRS::TNRS(taxonomic_names = "Epidentrum boyleii", mode = "parse") test-TNRS.R:74:2
2. | \-TNRS:::.TNRS_base(...)
3. | \-RCurl::postForm(url, .opts = list(postfields = input_json, httpheader = headers))
4. | \-RCurl::.postForm(curl, .opts, .params, style)
5. \-(function (type, msg, asError = TRUE) ...
-- Error (test-TNRS_base.R:7:3): example works ---------------------------------
<SSL_CONNECT_ERROR/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(35L, "error:1407742E:SSL routines:SSL23_GET_SERVER_HELLO:tlsv1 alert protocol version",
TRUE)`: error:1407742E:SSL routines:SSL23_GET_SERVER_HELLO:tlsv1 alert protocol version
Backtrace:
x
1. +-TNRS:::.TNRS_base(taxonomic_names = tnrs_testfile) test-TNRS_base.R:7:2
2. | \-RCurl::postForm(url, .opts = list(postfields = input_json, httpheader = headers))
3. | \-RCurl::.postForm(curl, .opts, .params, style)
4. \-(function (type, msg, asError = TRUE) ...
-- Error (test-TNRS_citations.R:6:3): example works ----------------------------
<SSL_CONNECT_ERROR/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(35L, "error:1407742E:SSL routines:SSL23_GET_SERVER_HELLO:tlsv1 alert protocol version",
TRUE)`: error:1407742E:SSL routines:SSL23_GET_SERVER_HELLO:tlsv1 alert protocol version
Backtrace:
x
1. +-TNRS::TNRS_citations() test-TNRS_citations.R:6:2
2. | \-RCurl::postForm(url, .opts = list(postfields = input_json, httpheader = headers))
3. | \-RCurl::.postForm(curl, .opts, .params, style)
4. \-(function (type, msg, asError = TRUE) ...
-- Error (test-TNRS_metadata.R:6:3): example works -----------------------------
<SSL_CONNECT_ERROR/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(35L, "error:1407742E:SSL routines:SSL23_GET_SERVER_HELLO:tlsv1 alert protocol version",
TRUE)`: error:1407742E:SSL routines:SSL23_GET_SERVER_HELLO:tlsv1 alert protocol version
Backtrace:
x
1. +-TNRS::TNRS_metadata() test-TNRS_metadata.R:6:2
2. | \-TNRS::TNRS_citations()
3. | \-RCurl::postForm(url, .opts = list(postfields = input_json, httpheader = headers))
4. | \-RCurl::.postForm(curl, .opts, .params, style)
5. \-(function (type, msg, asError = TRUE) ...
-- Error (test-TNRS_sources.R:6:3): example works ------------------------------
<SSL_CONNECT_ERROR/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(35L, "error:1407742E:SSL routines:SSL23_GET_SERVER_HELLO:tlsv1 alert protocol version",
TRUE)`: error:1407742E:SSL routines:SSL23_GET_SERVER_HELLO:tlsv1 alert protocol version
Backtrace:
x
1. +-TNRS::TNRS_sources() test-TNRS_sources.R:6:2
2. | \-RCurl::postForm(url, .opts = list(postfields = input_json, httpheader = headers))
3. | \-RCurl::.postForm(curl, .opts, .params, style)
4. \-(function (type, msg, asError = TRUE) ...
-- Error (test-TNRS_version.R:6:3): example works ------------------------------
<SSL_CONNECT_ERROR/GenericCurlError/error/condition>
Error in `function (type, msg, asError = TRUE)
{
if (!is.character(type)) {
i = match(type, CURLcodeValues)
typeName = if (is.na(i))
character()
else names(CURLcodeValues)[i]
}
typeName = gsub("^CURLE_", "", typeName)
fun = (if (asError)
stop
else warning)
fun(structure(list(message = msg, call = sys.call()), class = c(typeName,
"GenericCurlError", "error", "condition")))
}(35L, "error:1407742E:SSL routines:SSL23_GET_SERVER_HELLO:tlsv1 alert protocol version",
TRUE)`: error:1407742E:SSL routines:SSL23_GET_SERVER_HELLO:tlsv1 alert protocol version
Backtrace:
x
1. +-TNRS::TNRS_version() test-TNRS_version.R:6:2
2. | \-RCurl::postForm(url, .opts = list(postfields = input_json, httpheader = headers))
3. | \-RCurl::.postForm(curl, .opts, .params, style)
4. \-(function (type, msg, asError = TRUE) ...
[ FAIL 11 | WARN 0 | SKIP 0 | PASS 1 ]
Error: Test failures
Execution halted
Flavors: r-release-windows-ix86+x86_64, r-oldrel-windows-ix86+x86_64