Question

我希望你能帮助我。我尝试在R（httr包）中调用API。 API的地址是： https://apiv3.mojepanstwo.pl/dane/krs_podmioty

我试图让R获得与此类地址中列出的相同的信息：

https://apiv3.mojepanstwo.pl/dane/krs_podmioty?conditions[krs_podmioty.nip]=6321880539

如何在R中书写？我尝试如下：

URL <- "https://apiv3.mojepanstwo.pl/dane/krs_podmioty?"
ndsu_req <- GET(URL, query = list(condition[krs_podmioty.nip] = 6321880539))
ndsu_data <- content(ndsu_req)
nsdu_data

但是我收到了一些错误。具体来说，我的目的是得到3个数字（nip）并列出他们的整个信息。有人可以帮忙吗？

Answer 1

我的问题得到了答案。我为一些咬合数字编写了函数+ sapply。但我有另一个问题：对于一个案例，我收到错误：

＆＃34;索引超出范围。＆＃34;

我把这个案子放在下面的代码中。这是因为API不返回该对象的值（DAtaObject [[1]]）。任何人都知道如何帮助并为此写一个NULL值？还是其他任何解决方案？

URL <- "https://api-v3.mojepanstwo.pl/dane/krs_podmioty?"



abc=c(
7822088970)

KAP<-function (abc){
DANE<- GET(URL, query=list("conditions[krs_podmioty.nip][]"= abc, limit = 1500 ))
DANE2<- content(DANE)
DANE3<- DANE2$Dataobject[[1]]$data$krs_podmioty.wartosc_kapital_zakladowy
DANE4<- DANE2$Dataobject[[1]]$data$krs_podmioty.nip
c(DANE3, DANE4)
}

sapply(abc,KAP)

在R中调用API（httr）

1 个答案: