r - 如何允许新 R 用户将信息发送到 Google 表单？

Question

如何允许新的 R 用户将信息发送到 Google 表单？(RSelenium 需要进行一些设置，至少对于 headless 浏览而言如此，因此在我看来，它不是最佳候选，但我可能会这样做)缺少一些使其成为最佳选择的东西)。

我有一些新的 R 用户，我希望以交互方式获取响应并将其发送到安全位置。我选择 Google 表单来传递信息，因为它允许以一种方式发送信息，但不允许用户访问从表单创建的电子表格。

这是一个url of this form :

url <- "https://docs.google.com/forms/d/1tz2RPftOLRCQrGSvgJTRELrd9sdIrSZ_kxfoFdHiqD4/viewform"

下面是我如何使用 R 与用户交互的上下文:

question <- function(message, opts = c("Yes", "No")){
    message(message)
    ans <- menu(opts)
    if (ans == "2") FALSE else TRUE
}

question("Was this information helpful?")

然后我想将 TRUE/FALSE 发送到上面的 Google 表单。如何从 R 中以嵌入用户将与之交互的代码中的方式向上面的 Google 表单发送响应，并且不需要用户进行困难的设置？

如果可以完成任务，添加 R 包就可以了。

Answer 1

您可以发送 POST 查询。这是使用 httr 包的示例:

例如:

library(httr)
send_response<- 
  function(response){
    form_url <- "https://docs.google.com/forms/d/1tz2RPftOLRCQrGSvgJTRELrd9sdIrSZ_kxfoFdHiqD4/formResponse"
    POST(form_url,
         query = list(`entry.1651773982`=response)
    )
  }

然后你可以调用它:

send_response(question("Was this information helpful?"))