Question

我有一个脚本将HTTP请求发送到网站以获取文档，文档ID保存在一个数组中。我想发送每个数组元素的请求，并根据HEAD的状态返回一条消息（例如200 OK）。

我遇到的问题是，当我遍历URL数组时，仅使用最后一个数组元素发送多个请求，不使用其他元素。

代码：

urlArray.length

输出（74是数组中最后一个元素的值）：
此控制台消息生成Failed to load: https://www.adsa.co.uk/library.dr/docs.aspx?id=74次：

# Data
set.seed(1)
x <- runif(20) - 0.5

# Parameters
signs <- c("neg", "pos")
n <- c(4, 12)
pars <- expand.grid(n=n, sign=signs, stringsAsFactors = FALSE)
pars$name <- paste(pars$sign, pars$n, sep="_")
pars
#   n sign   name
#1  4  neg  neg_4
#2 12  neg neg_12
#3  4  pos  pos_4
#4 12  pos pos_12

# Function
f <- function(n, sign)rollapplyr(x, n, var_sums, sign = sign, fill = NA)
y <- mapply(f, pars$n, pars$sign)
colnames(m) <- pars$name
#             neg_4    neg_12     pos_4   pos_12
# [1,]           NA        NA        NA       NA
# [2,]           NA        NA        NA       NA
# [3,]           NA        NA        NA       NA
# [4,] -0.362367437        NA 0.4810612       NA
# [5,] -0.426194169        NA 0.4810612       NA
# [6,] -0.298318069        NA 0.8794508       NA
# [7,] -0.298318069        NA 1.2512727       NA
# [8,] -0.298318069        NA 1.0038627       NA
# [9,]  0.000000000        NA 1.1329768       NA
#[10,] -0.438213730        NA 0.7345871       NA
#[11,] -0.732239155        NA 0.2899118       NA
#[12,] -1.055682402 -1.716368 0.1291140 1.614038
#[13,] -1.055682402 -1.481877 0.1870228 1.801061
#[14,] -0.733364954 -1.469897 0.1870228 1.801061
#[15,] -0.439339529 -1.469897 0.4568643 1.998049
#[16,] -0.118197040 -1.472198 0.4568643 1.589841
#[17,] -0.118197040 -1.173879 0.4874599 1.807460
#[18,] -0.002300758 -1.173879 0.9793660 1.900976
#[19,] -0.122265578 -1.293844 0.7095246 1.456301
#[20,] -0.119964821 -1.293844 0.9869698 1.572948

为什么不为每个数组元素发送sendRequest（）的任何想法？

Answer 1

Chrome（和Firefox）抱怨SSL证书无效，因此无法连接：

Failed to load resource: net::ERR_INSECURE_RESPONSE

Answer 2

感谢@Chris在评论中提醒我尝试jsfiddle。

上面的代码按原样执行，它遍历数组并为每个数组元素发送HTTP请求。问题出在repl.it，read-eval-print-loop编码环境。切换到jsbin和jsfiddle产生了预期的结果。

Read about REPL

JavaScript - 数组中每个元素的HTTP请求

2 个答案: