我正在使用ebay API使用R和GET函数调用API来检索有关当前价格的一些数据。
res <- GET(paste0("http://svcs.ebay.com/services/search/FindingService/v1?",
"SECURITY-APPNAME=XXXXXXXXXXXXXXXX&",
...
"OPERATION-NAME=findItemsByProduct&",
"paginationInput.entriesPerPage=100"))
EbayResult <- content(res, "parsed")
我得到的回复如下:
> EbayResult
{xml_document}
<findItemsByProductResponse xmlns="http://www.ebay.com/marketplace/search/v1/services">
[1] <ack>Success</ack>
[2] <version>1.13.0</version>
[3] <timestamp>2019-06-05T07:59:38.940Z</timestamp>
[4] <searchResult count="3">n <item>n <itemId>264249591631</itemId>n <title>ER2315539 Refrigerator Evaporator Motor ...
[5] <paginationOutput>n <pageNumber>1</pageNumber>n <entriesPerPage>100</entriesPerPage>n <totalPages>1</totalPages>n ...
[6] <itemSearchURL>http://www.ebay.com/sch/?LH_ItemCondition=1&_ddo=1&_ipg=100&_pgn=1&_productid=1242038032</ ...
我想提取 [4] 行中的所有"itemId",在本例中,有 3 个不同的 itemId。我想使用列表或其他有效方法执行此操作。谢谢!
@DS_UNI 谢谢!它对我帮助很大。从您的解决方案中,我只需要遍历不同的 itemId 即可获得它们:
test$searchResult[1]$item$itemId
test$searchResult[2]$item$itemId
...