我在R中使用rvest包时遇到了真正的困难。我试图在第一个网页上点击“我同意”按钮后导航到特定的网页。这是我开始的网页的the link。下面的代码尝试获取下一个网页，其中包含要填写的表单以获取我需要提取的数据。
url <- "http://wonder.cdc.gov/mcd-icd10.html"
pgsession <- html_session(url)
pgform <- html_form(pgsession)[[3]]
new_session <- html_session(submit_form(pgsession,pgform)$url)
pgform_new <- html_form(new_session)
最后一行没有获取下一个网页的html表单，并在R中给出了以下错误。
Error in read_xml.response(x$response, ..., as_html = as_html) :
server error: (500) Internal Server Error
非常感谢我在访问下一个网页并提交表单以获取数据时可以获得的任何帮助。非常感谢您的时间！