Подсчет вхождения NULL в списке в R

Question

Я хочу сосчитать вхождения NULL в моем списке с именем ->

wallet_to_tx_text_json$txs$outputs

. Для этого я попытался length(is.NULL(wallet_to_tx_text_json$txs$outputs)), но он возвращает 1, даже если есть 7 NULL

MWE

install.packages('httr')
require(httr)
install.packages('jsonlite')
require(jsonlite)

caller <- "myemail@add"
i<-"091bc8fe2f7aa8fd"
baseurl1<-"http://www.walletexplorer.com/api/1/wallet?wallet="
end1<-"&from=0&count=100&caller="

call1 <- paste(baseurl1,i,end1,caller,sep="")
wallet_to_tx_address <- GET(call1)
wallet_to_tx_text <- content(wallet_to_tx_address, "text")
wallet_to_tx_text_json <- fromJSON(wallet_to_tx_text, flatten = TRUE)
wallet_to_tx_text_json[["total_coinbase"]] <- length(is.NULL(wallet_to_tx_text_json$txs$outputs)) 

как это сделать в R

Answer 1

wallet_to_tx_text_json$txs$outputs - это список, вы не можете напрямую использовать is.null в списке. Выполните итерацию по списку (используя sapply или любой другой метод), сравните с is.null и посчитайте вхождение, используя sum.

sum(sapply(wallet_to_tx_text_json$txs$outputs, is.null))

Answer 2

Мы можем использовать

sum(unlist(lapply(wallet_to_tx_text_json$txs$outputs, is.null)))