找不到函数“ str_extract”错误

Question

我正在尝试通过抓取的html字符串搜索电子邮件地址格式的任何内容。但是，我收到一条错误消息，指出在计算机上找不到str_extract。我的代码或R安装有问题吗？

scrape <- function(x){
doc <- read_html(x) 
    just_scripts <- html_nodes(doc, "script") %>% html_text()
    email_extracts <- str_extract(just_scripts, "[a-zA-Z0-9-_.]+@[a-zA-Z0-9-_.]+")
    email<- email_extracts[!is.na(email_extracts)]

这是我尝试在示例页面上运行完整功能时收到的确切错误消息。

  

str_extract中的错误（just_scripts，“ [a-zA-Z0-9- 。] + @ [a-zA-Z0-9-。] +”）   ：找不到函数“ str_extract”''''