3

我是脚本和 R 的新手。

在 Windows cmd.exe 中,我可以通过以下方式在域上执行 NSLOOKUP:

nslookup www.google.com

我有一个域名数据集,我想在 R 中的分组过程中验证它是有效还是无效。有没有办法在基础 R 或其中一个包中执行 NSLOOKUP?

Edit1:我使用建议的系统调用对循环 3 个域进行了一些更改。该调用有效,但输出不会直接保存到向量中(下面的第 7 行)。我需要如何修改这条线才能捕获输出?

domains <- c('www.google.com','www.badtestdomainnotvalid.com','www.yahoo.com')
dns <- vector()
dnsreturn <-vector()
for(i in 1:length(domains)){
  dns[i] <- paste('nslookup ',domains[i],sep='')
  dnsreturn[i] <- system(dns[i],intern=TRUE)}
}
4

1 回答 1

5

如果你无能为力

system("nslookup www.google.com", intern=TRUE)

回应您的编辑:

domains = c('www.google.com','www.badtestdomainnotvalid.com','www.yahoo.com')
sapply(domains, function(x) system(paste("nslookup", x), intern=TRUE))

这将返回一个向量列表,您可以根据需要进行操作

于 2013-08-05T15:17:57.273 回答