如何创建用户代理?

How to create user agent?

我正在试用包 edgarwebR 中的这个功能

x <- paste0("https://www.sec.gov/Archives/edgar/data/",
            "933691/000119312517247698/0001193125-17-247698-index.htm")
try(filing_information(x))

但它returns我以下

No encoding supplied: defaulting to UTF-8.
Error in check_result(res) : 
  EDGAR request blocked from Undeclared Automated Tool.
Please visit https://www.sec.gov/developer for best practices.
See https://mwaldstein.github.io/edgarWebR/index.html#ethical-use--fair-access for your responsibilities
Consider also setting the environment variable 'EDGARWEBR_USER_AGENT

所以我去了 SEC,信息告诉我在请求中声明我的用户代理 headers。我对此很陌生。如何创建用户代理?

我使用的是 edgar 包,所以我不确定这是否有用。但这就是我使用 edgar package

的方式
library("edgar")    
useragent = "Your Name Contact@domain.com"
info <- getFilingInfo('933691', 2021, quarter = c(1,2,3,4), form.type = 'ALL', useragent)