Running 'testthat.R' [15s/17s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
  > library(testthat)
  > library(tradestatistics)
  > 
  > test_check("tradestatistics")
  -- 1. Failure: ots_country_code works properly for multiple matching (@test-ots_
  `str\(test_country_1\)` does not match "6 variables".
  Actual value: "tibble \[2 x 6\] \(S3: tbl_df/tbl/data\.frame\)\\n \$ country_iso             : chr \[1:2\] "ddr" "deu"\\n \$ country_name_english    : chr \[1:2\] "Fmr Dem\. Rep\. of Germany" "Germany"\\n \$ country_fullname_english: chr \[1:2\] "Fmr Dem\. Rep\. of Germany" "Germany \(former Federal Republic of Germany until 1990\)"\\n \$ continent_id            : int \[1:2\] 2 2\\n \$ continent               : chr \[1:2\] "Europe" "Europe"\\n \$ eu28_member             : int \[1:2\] 0 1"
  
  -- 2. Failure: ots_country_code works properly for multiple matching (@test-ots_
  `str\(test_country_2\)` does not match "6 variables".
  Actual value: "tibble \[2 x 6\] \(S3: tbl_df/tbl/data\.frame\)\\n \$ country_iso             : chr \[1:2\] "ddr" "deu"\\n \$ country_name_english    : chr \[1:2\] "Fmr Dem\. Rep\. of Germany" "Germany"\\n \$ country_fullname_english: chr \[1:2\] "Fmr Dem\. Rep\. of Germany" "Germany \(former Federal Republic of Germany until 1990\)"\\n \$ continent_id            : int \[1:2\] 2 2\\n \$ continent               : chr \[1:2\] "Europe" "Europe"\\n \$ eu28_member             : int \[1:2\] 0 1"
  
  -- 3. Failure: ots_country_code works properly for multiple matching (@test-ots_
  `str\(test_country_3\)` does not match "6 variables".
  Actual value: "tibble \[2 x 6\] \(S3: tbl_df/tbl/data\.frame\)\\n \$ country_iso             : chr \[1:2\] "mhl" "wlf"\\n \$ country_name_english    : chr \[1:2\] "Marshall Isds" "Wallis and Futuna Isds"\\n \$ country_fullname_english: chr \[1:2\] "Marshall Isds" "Wallis and Futuna Isds"\\n \$ continent_id            : int \[1:2\] 4 4\\n \$ continent               : chr \[1:2\] "Oceania" "Oceania"\\n \$ eu28_member             : int \[1:2\] 0 0"
  
  -- 4. Failure: ots_create_tidy_data connects to the API and returns valid tables
  `str\(test_data\)` does not match "11 variables".
  Actual value: "tibble \[266 x 11\] \(S3: tbl_df/tbl/data\.frame\)\\n \$ year                     : int \[1:266\] 1962 1962 1962 1962 1962 1962 1962 1962 1962 1962 \.\.\.\\n \$ reporter_iso             : chr \[1:266\] "chl" "chl" "chl" "chl" \.\.\.\\n \$ partner_iso              : chr \[1:266\] "arg" "arg" "arg" "arg" \.\.\.\\n \$ reporter_fullname_english: chr \[1:266\] "Chile" "Chile" "Chile" "Chile" \.\.\.\\n \$ partner_fullname_english : chr \[1:266\] "Argentina" "Argentina" "Argentina" "Argentina" \.\.\.\\n \$ product_code             : chr \[1:266\] "9701" "9609" "9608" "9508" \.\.\.\\n \$ product_fullname_english : chr \[1:266\] "Paintings, drawings, pastels, executed entirely by hand; not drawings of heading no\. 4906 and not hand-painted,"\| __truncated__ "Pencils \(not of heading no\. 9608\), crayons, pencil leads, pastels, drawing charcoals, writing or drawing chalks"\| __truncated__ "Pens; ball-point, felt tipped, other porous tipped pens; fountain pens, stylograph pens duplicating stylos, pro"\| __truncated__ "Roundabouts, swings, shooting galleries, other fairground amusements, travelling circuses, travelling menagerie"\| __truncated__ \.\.\.\\n \$ group_code               : chr \[1:266\] "97" "96" "96" "95" \.\.\.\\n \$ group_name               : chr \[1:266\] "Works of art; collectors' pieces and antiques" "Miscellaneous manufactured articles" "Miscellaneous manufactured articles" "Toys, games and sports requisites; parts and accessories thereof" \.\.\.\\n \$ import_value_usd         : int \[1:266\] 560 1116 1116 1023 2412 2412 560 3800 4360 1579 \.\.\.\\n \$ export_value_usd         : int \[1:266\] NA NA NA NA NA NA NA NA NA NA \.\.\."
  
  -- 5. Failure: ots_create_tidy_data connects to the API and returns valid tables
  `str\(test_data\)` does not match "15 variables".
  Actual value: "tibble \[266 x 15\] \(S3: tbl_df/tbl/data\.frame\)\\n \$ year                     : int \[1:266\] 1962 1962 1962 1962 1962 1962 1962 1962 1962 1962 \.\.\.\\n \$ product_code             : chr \[1:266\] "9701" "9609" "9608" "9508" \.\.\.\\n \$ product_fullname_english : chr \[1:266\] "Paintings, drawings, pastels, executed entirely by hand; not drawings of heading no\. 4906 and not hand-painted,"\| __truncated__ "Pencils \(not of heading no\. 9608\), crayons, pencil leads, pastels, drawing charcoals, writing or drawing chalks"\| __truncated__ "Pens; ball-point, felt tipped, other porous tipped pens; fountain pens, stylograph pens duplicating stylos, pro"\| __truncated__ "Roundabouts, swings, shooting galleries, other fairground amusements, travelling circuses, travelling menagerie"\| __truncated__ \.\.\.\\n \$ product_shortname_english: chr \[1:266\] "Paintings" "Pencils and Crayons" "Pens" "Fairground Amusements" \.\.\.\\n \$ group_code               : chr \[1:266\] "97" "96" "96" "95" \.\.\.\\n \$ group_name               : chr \[1:266\] "Works of art; collectors' pieces and antiques" "Miscellaneous manufactured articles" "Miscellaneous manufactured articles" "Toys, games and sports requisites; parts and accessories thereof" \.\.\.\\n \$ community_code           : chr \[1:266\] "21" "20" "20" "20" \.\.\.\\n \$ community_name           : chr \[1:266\] "Arts and Antiques" "Miscellaneous" "Miscellaneous" "Miscellaneous" \.\.\.\\n \$ community_color          : chr \[1:266\] "#7485aa" "#4d6fd0" "#4d6fd0" "#4d6fd0" \.\.\.\\n \$ reporter_iso             : chr \[1:266\] "chl" "chl" "chl" "chl" \.\.\.\\n \$ partner_iso              : chr \[1:266\] "arg" "arg" "arg" "arg" \.\.\.\\n \$ reporter_fullname_english: chr \[1:266\] "Chile" "Chile" "Chile" "Chile" \.\.\.\\n \$ partner_fullname_english : chr \[1:266\] "Argentina" "Argentina" "Argentina" "Argentina" \.\.\.\\n \$ import_value_usd         : int \[1:266\] 560 1116 1116 1023 2412 2412 560 3800 4360 1579 \.\.\.\\n \$ export_value_usd         : int \[1:266\] NA NA NA NA NA NA NA NA NA NA \.\.\."
  
  -- 6. Failure: ots_create_tidy_data connects to the API and returns valid tables
  `str\(test_data\)` does not match "7 variables".
  Actual value: "tibble \[1 x 7\] \(S3: tbl_df/tbl/data\.frame\)\\n \$ year                     : int 1962\\n \$ reporter_iso             : chr "chl"\\n \$ partner_iso              : chr "arg"\\n \$ reporter_fullname_english: chr "Chile"\\n \$ partner_fullname_english : chr "Argentina"\\n \$ export_value_usd         : int 23123604\\n \$ import_value_usd         : int 45084101"
  
  -- 7. Failure: ots_create_tidy_data connects to the API and returns valid tables
  `str\(test_data\)` does not match "11 variables".
  Actual value: "tibble \[912 x 11\] \(S3: tbl_df/tbl/data\.frame\)\\n \$ year                     : int \[1:912\] 1962 1962 1962 1962 1962 1962 1962 1962 1962 1962 \.\.\.\\n \$ reporter_iso             : chr \[1:912\] "chl" "chl" "chl" "chl" \.\.\.\\n \$ reporter_fullname_english: chr \[1:912\] "Chile" "Chile" "Chile" "Chile" \.\.\.\\n \$ product_code             : chr \[1:912\] "9999" "9706" "9705" "9704" \.\.\.\\n \$ product_fullname_english : chr \[1:912\] "Commodities not specified according to kind" "Antiques; of an age exceeding one hundred years" "Collections and collectors' pieces; of zoological, botanical, mineralogical, anatomical, historical, archaeolog"\| __truncated__ "Stamps, postage or revenue; stamp-postmarks, first-day covers, postal stationery \(stamped paper\) and like, used"\| __truncated__ \.\.\.\\n \$ group_code               : chr \[1:912\] "99" "97" "97" "97" \.\.\.\\n \$ group_name               : chr \[1:912\] "Commodities not specified according to kind" "Works of art; collectors' pieces and antiques" "Works of art; collectors' pieces and antiques" "Works of art; collectors' pieces and antiques" \.\.\.\\n \$ export_value_usd         : int \[1:912\] 869482 926 926 2778 0 5880 0 0 0 0 \.\.\.\\n \$ import_value_usd         : int \[1:912\] 8388138 1012 2183 1000 33635 74072 1000 110913 28485 3728 \.\.\.\\n \$ export_rca               : num \[1:912\] 1\.2127 0\.0076 0\.053 0\.0506 NA \.\.\.\\n \$ import_rca               : num \[1:912\] 11\.5458 0\.0082 0\.1233 0\.018 0\.9079 \.\.\."
  
  -- 8. Failure: ots_create_tidy_data connects to the API and returns valid tables
  `str\(test_data\)` does not match "15 variables".
  Actual value: "tibble \[1 x 15\] \(S3: tbl_df/tbl/data\.frame\)\\n \$ year                       : int 1962\\n \$ reporter_iso               : chr "chl"\\n \$ reporter_fullname_english  : chr "Chile"\\n \$ export_value_usd           : int 686689403\\n \$ import_value_usd           : int 695823377\\n \$ eci_fitness_method         : num 0\.0035\\n \$ eci_rank_fitness_method    : int 35\\n \$ eci_reflections_method     : num 0\.175\\n \$ eci_rank_reflections_method: int 36\\n \$ eci_eigenvalues_method     : num 0\.175\\n \$ eci_rank_eigenvalues_method: int 36\\n \$ top_export_product_code    : chr "7403"\\n \$ top_export_trade_value_usd : int 222651273\\n \$ top_import_product_code    : chr "8456"\\n \$ top_import_trade_value_usd : int 33230152"
  
  -- 9. Failure: ots_create_tidy_data connects to the API and returns valid tables
  `str\(test_data\)` does not match "17 variables".
  Actual value: "tibble \[991 x 17\] \(S3: tbl_df/tbl/data\.frame\)\\n \$ year                        : int \[1:991\] 1962 1962 1962 1962 1962 1962 1962 1962 1962 1962 \.\.\.\\n \$ product_code                : chr \[1:991\] "9999" "9706" "9705" "9704" \.\.\.\\n \$ product_fullname_english    : chr \[1:991\] "Commodities not specified according to kind" "Antiques; of an age exceeding one hundred years" "Collections and collectors' pieces; of zoological, botanical, mineralogical, anatomical, historical, archaeolog"\| __truncated__ "Stamps, postage or revenue; stamp-postmarks, first-day covers, postal stationery \(stamped paper\) and like, used"\| __truncated__ \.\.\.\\n \$ group_code                  : chr \[1:991\] "99" "97" "97" "97" \.\.\.\\n \$ group_name                  : chr \[1:991\] "Commodities not specified according to kind" "Works of art; collectors' pieces and antiques" "Works of art; collectors' pieces and antiques" "Works of art; collectors' pieces and antiques" \.\.\.\\n \$ export_value_usd            : num \[1:991\] 1\.32e\+08 2\.26e\+07 3\.23e\+06 1\.01e\+07 6\.75e\+06 \.\.\.\\n \$ import_value_usd            : num \[1:991\] 1\.32e\+08 2\.26e\+07 3\.23e\+06 1\.01e\+07 6\.75e\+06 \.\.\.\\n \$ pci_fitness_method          : num \[1:991\] 1\.84e-10 2\.00e-04 1\.00e-04 0\.00 1\.10e-03 \.\.\.\\n \$ pci_rank_fitness_method     : int \[1:991\] 989 778 825 887 643 197 823 108 731 670 \.\.\.\\n \$ pci_reflections_method      : num \[1:991\] -2\.393 -0\.285 -1\.13 -1\.034 0\.319 \.\.\.\\n \$ pci_rank_reflections_method : int \[1:991\] 967 668 834 815 464 129 802 121 665 491 \.\.\.\\n \$ pci_eigenvalues_method      : num \[1:991\] -2\.393 -0\.285 -1\.13 -1\.034 0\.319 \.\.\.\\n \$ pci_rank_eigenvalues_method : int \[1:991\] 967 668 834 815 464 129 802 121 665 491 \.\.\.\\n \$ top_exporter_iso            : chr \[1:991\] "usa" "fra" "deu" "fra" \.\.\.\\n \$ top_exporter_trade_value_usd: int \[1:991\] 20489064 6648726 633240 1912056 2660325 439777 41092499 1242504 15181101 16489216 \.\.\.\\n \$ top_importer_iso            : chr \[1:991\] "cub" "ita" "usa" "deu" \.\.\.\\n \$ top_importer_trade_value_usd: int \[1:991\] 15140030 4206030 807477 5517871 2198914 270895 57326519 614685 4848922 9896314 \.\.\."
  
  Error in tradestatistics::ots_country_code(reporters_no_iso[x]) : 
        There is no match for your search.
        Please check the spelling or explore the countries table provided within this package.
        
  Error in tradestatistics::ots_country_code(partners_no_iso[x]) : 
        There is no match for your search.
        Please check the spelling or explore the countries table provided within this package.
        
  -- 10. Failure: ots_inflation_adjustment adjusts the data (@test-ots_inflation_a
  `str\(test_data_adjusted\)` does not match "13 variables".
  Actual value: "tibble \[266 x 13\] \(S3: tbl_df/tbl/data\.frame\)\\n \$ year                     : int \[1:266\] 1962 1962 1962 1962 1962 1962 1962 1962 1962 1962 \.\.\.\\n \$ reporter_iso             : chr \[1:266\] "chl" "chl" "chl" "chl" \.\.\.\\n \$ partner_iso              : chr \[1:266\] "arg" "arg" "arg" "arg" \.\.\.\\n \$ reporter_fullname_english: chr \[1:266\] "Chile" "Chile" "Chile" "Chile" \.\.\.\\n \$ partner_fullname_english : chr \[1:266\] "Argentina" "Argentina" "Argentina" "Argentina" \.\.\.\\n \$ product_code             : chr \[1:266\] "9701" "9609" "9608" "9508" \.\.\.\\n \$ product_fullname_english : chr \[1:266\] "Paintings, drawings, pastels, executed entirely by hand; not drawings of heading no\. 4906 and not hand-painted,"\| __truncated__ "Pencils \(not of heading no\. 9608\), crayons, pencil leads, pastels, drawing charcoals, writing or drawing chalks"\| __truncated__ "Pens; ball-point, felt tipped, other porous tipped pens; fountain pens, stylograph pens duplicating stylos, pro"\| __truncated__ "Roundabouts, swings, shooting galleries, other fairground amusements, travelling circuses, travelling menagerie"\| __truncated__ \.\.\.\\n \$ group_code               : chr \[1:266\] "97" "96" "96" "95" \.\.\.\\n \$ group_name               : chr \[1:266\] "Works of art; collectors' pieces and antiques" "Miscellaneous manufactured articles" "Miscellaneous manufactured articles" "Toys, games and sports requisites; parts and accessories thereof" \.\.\.\\n \$ import_value_usd         : num \[1:266\] 14348 28594 28594 26211 61799 \.\.\.\\n \$ export_value_usd         : num \[1:266\] NA NA NA NA NA NA NA NA NA NA \.\.\.\\n \$ conversion_year          : num \[1:266\] 2000 2000 2000 2000 2000 2000 2000 2000 2000 2000 \.\.\.\\n \$ conversion_factor        : num \[1:266\] 25\.6 25\.6 25\.6 25\.6 25\.6 \.\.\."
  
  -- 11. Failure: ots_country_code works properly for a partial product string mat
  `str\(test_product\)` does not match "26 obs".
  Actual value: "tibble \[26 x 5\] \(S3: tbl_df/tbl/data\.frame\)\\n \$ product_code            : chr \[1:26\] "0403" "0810" "0805" "0811" \.\.\.\\n \$ product_fullname_english: chr \[1:26\] "Buttermilk, curdled milk and cream, yoghurt, kephir, fermented or acidified milk or cream, whether or not conce"\| __truncated__ "Fruit, fresh; n\.e\.c\. in chapter 8" "Citrus fruit; fresh or dried" "Fruit and nuts; uncooked or cooked by steaming or boiling in water, frozen, whether or not containing added sug"\| __truncated__ \.\.\.\\n \$ group_code              : chr \[1:26\] "04" "08" "08" "08" \.\.\.\\n \$ group_name              : chr \[1:26\] "Dairy produce; birds' eggs; natural honey; edible products of animal origin, not elsewhere specified or included" "Fruit and nuts, edible; peel of citrus fruit or melons" "Fruit and nuts, edible; peel of citrus fruit or melons" "Fruit and nuts, edible; peel of citrus fruit or melons" \.\.\.\\n \$ type_product            : chr \[1:26\] "fruit" "fruit" "fruit" "fruit" \.\.\."
  
  -- 12. Failure: ots_country_code works properly for a partial product string mat
  `str\(test_product\)` does not match "5 variables".
  Actual value: "tibble \[26 x 5\] \(S3: tbl_df/tbl/data\.frame\)\\n \$ product_code            : chr \[1:26\] "0403" "0810" "0805" "0811" \.\.\.\\n \$ product_fullname_english: chr \[1:26\] "Buttermilk, curdled milk and cream, yoghurt, kephir, fermented or acidified milk or cream, whether or not conce"\| __truncated__ "Fruit, fresh; n\.e\.c\. in chapter 8" "Citrus fruit; fresh or dried" "Fruit and nuts; uncooked or cooked by steaming or boiling in water, frozen, whether or not containing added sug"\| __truncated__ \.\.\.\\n \$ group_code              : chr \[1:26\] "04" "08" "08" "08" \.\.\.\\n \$ group_name              : chr \[1:26\] "Dairy produce; birds' eggs; natural honey; edible products of animal origin, not elsewhere specified or included" "Fruit and nuts, edible; peel of citrus fruit or melons" "Fruit and nuts, edible; peel of citrus fruit or melons" "Fruit and nuts, edible; peel of citrus fruit or melons" \.\.\.\\n \$ type_product            : chr \[1:26\] "fruit" "fruit" "fruit" "fruit" \.\.\."
  
  -- 13. Failure: ots_country_code works properly for a non-existing product match
  `str\(test_product\)` does not match "0 obs".
  Actual value: "tibble \[0 x 5\] \(S3: tbl_df/tbl/data\.frame\)\\n \$ product_code            : chr\(0\) \\n \$ product_fullname_english: chr\(0\) \\n \$ group_code              : chr\(0\) \\n \$ group_name              : chr\(0\) \\n \$ type_product            : chr\(0\) "
  
  -- 14. Failure: ots_country_code works properly for a non-existing product match
  `str\(test_product\)` does not match "5 variables".
  Actual value: "tibble \[0 x 5\] \(S3: tbl_df/tbl/data\.frame\)\\n \$ product_code            : chr\(0\) \\n \$ product_fullname_english: chr\(0\) \\n \$ group_code              : chr\(0\) \\n \$ group_name              : chr\(0\) \\n \$ type_product            : chr\(0\) "
  
  -- 15. Failure: ots_country_code works properly for a partial group string match
  `str\(test_group\)` does not match "58 obs".
  Actual value: "tibble \[58 x 5\] \(S3: tbl_df/tbl/data\.frame\)\\n \$ product_code            : chr \[1:58\] "0701" "0702" "0703" "0704" \.\.\.\\n \$ product_fullname_english: chr \[1:58\] "Potatoes; fresh or chilled" "Tomatoes; fresh or chilled" "Onions, shallots, garlic, leeks and other alliaceous vegetables; fresh or chilled" "Cabbages, cauliflowers, kohlrabi, kale and similar edible brassicas; fresh or chilled" \.\.\.\\n \$ group_code              : chr \[1:58\] "07" "07" "07" "07" \.\.\.\\n \$ group_name              : chr \[1:58\] "Vegetables and certain roots and tubers; edible" "Vegetables and certain roots and tubers; edible" "Vegetables and certain roots and tubers; edible" "Vegetables and certain roots and tubers; edible" \.\.\.\\n \$ type_group              : chr \[1:58\] "vegetable" "vegetable" "vegetable" "vegetable" \.\.\."
  
  -- 16. Failure: ots_country_code works properly for a partial group string match
  `str\(test_group\)` does not match "5 variables".
  Actual value: "tibble \[58 x 5\] \(S3: tbl_df/tbl/data\.frame\)\\n \$ product_code            : chr \[1:58\] "0701" "0702" "0703" "0704" \.\.\.\\n \$ product_fullname_english: chr \[1:58\] "Potatoes; fresh or chilled" "Tomatoes; fresh or chilled" "Onions, shallots, garlic, leeks and other alliaceous vegetables; fresh or chilled" "Cabbages, cauliflowers, kohlrabi, kale and similar edible brassicas; fresh or chilled" \.\.\.\\n \$ group_code              : chr \[1:58\] "07" "07" "07" "07" \.\.\.\\n \$ group_name              : chr \[1:58\] "Vegetables and certain roots and tubers; edible" "Vegetables and certain roots and tubers; edible" "Vegetables and certain roots and tubers; edible" "Vegetables and certain roots and tubers; edible" \.\.\.\\n \$ type_group              : chr \[1:58\] "vegetable" "vegetable" "vegetable" "vegetable" \.\.\."
  
  -- 17. Failure: ots_country_code works properly for a non-existing group match (
  `str\(test_group\)` does not match "0 obs".
  Actual value: "tibble \[0 x 5\] \(S3: tbl_df/tbl/data\.frame\)\\n \$ product_code            : chr\(0\) \\n \$ product_fullname_english: chr\(0\) \\n \$ group_code              : chr\(0\) \\n \$ group_name              : chr\(0\) \\n \$ type_group              : chr\(0\) "
  
  -- 18. Failure: ots_country_code works properly for a non-existing group match (
  `str\(test_group\)` does not match "5 variables".
  Actual value: "tibble \[0 x 5\] \(S3: tbl_df/tbl/data\.frame\)\\n \$ product_code            : chr\(0\) \\n \$ product_fullname_english: chr\(0\) \\n \$ group_code              : chr\(0\) \\n \$ group_name              : chr\(0\) \\n \$ type_group              : chr\(0\) "
  
  -- 19. Failure: ots_country_code works ok for both specified product and group (
  `str\(test_both\)` does not match "2 obs".
  Actual value: "tibble \[2 x 6\] \(S3: tbl_df/tbl/data\.frame\)\\n \$ product_code            : chr \[1:2\] "0701" "0714"\\n \$ product_fullname_english: chr \[1:2\] "Potatoes; fresh or chilled" "Manioc, arrowroot, salep, Jerusalem artichokes, sweet potatoes and similar roots and tubers with high starch or"\| __truncated__\\n \$ group_code              : chr \[1:2\] "07" "07"\\n \$ group_name              : chr \[1:2\] "Vegetables and certain roots and tubers; edible" "Vegetables and certain roots and tubers; edible"\\n \$ type_name               : chr \[1:2\] "potato" "potato"\\n \$ type_group              : chr \[1:2\] "vegetable" "vegetable""
  
  -- 20. Failure: ots_country_code works ok for both specified product and group (
  `str\(test_both\)` does not match "6 variables".
  Actual value: "tibble \[2 x 6\] \(S3: tbl_df/tbl/data\.frame\)\\n \$ product_code            : chr \[1:2\] "0701" "0714"\\n \$ product_fullname_english: chr \[1:2\] "Potatoes; fresh or chilled" "Manioc, arrowroot, salep, Jerusalem artichokes, sweet potatoes and similar roots and tubers with high starch or"\| __truncated__\\n \$ group_code              : chr \[1:2\] "07" "07"\\n \$ group_name              : chr \[1:2\] "Vegetables and certain roots and tubers; edible" "Vegetables and certain roots and tubers; edible"\\n \$ type_name               : chr \[1:2\] "potato" "potato"\\n \$ type_group              : chr \[1:2\] "vegetable" "vegetable""
  
  == testthat results  ===========================================================
  [ OK: 34 | SKIPPED: 0 | WARNINGS: 1 | FAILED: 20 ]
  1. Failure: ots_country_code works properly for multiple matching (@test-ots_country_code.R#22) 
  2. Failure: ots_country_code works properly for multiple matching (@test-ots_country_code.R#23) 
  3. Failure: ots_country_code works properly for multiple matching (@test-ots_country_code.R#24) 
  4. Failure: ots_create_tidy_data connects to the API and returns valid tables with a valid input (@test-ots_create_tidy_data.R#15) 
  5. Failure: ots_create_tidy_data connects to the API and returns valid tables with a valid input (@test-ots_create_tidy_data.R#22) 
  6. Failure: ots_create_tidy_data connects to the API and returns valid tables with a valid input (@test-ots_create_tidy_data.R#29) 
  7. Failure: ots_create_tidy_data connects to the API and returns valid tables with a valid input (@test-ots_create_tidy_data.R#36) 
  8. Failure: ots_create_tidy_data connects to the API and returns valid tables with a valid input (@test-ots_create_tidy_data.R#41) 
  9. Failure: ots_create_tidy_data connects to the API and returns valid tables with a valid input (@test-ots_create_tidy_data.R#46) 
  1. ...
  
  Error: testthat unit tests failed
  Execution halted