有没有办法修复R中的映射错误？ b<-str_c(url,'&pageNumber=',seq(1,11,1)) b<-if_else(str_detect(b,"ie=UTF8&pageNumber=1")

有没有办法修复R中的映射错误？

b<-str_c(url,'&pageNumber=',seq(1,11,1))
b<-if_else(str_detect(b,"ie=UTF8&pageNumber=1")==TRUE,"https://www.amazon.com/Skin-Like-Mine-Kids/product-reviews/0997157984/ref=cm_cr_dp_d_show_all_btm?ie=UTF8&reviewerType=all_reviews",b)
b

get_reviews<-function(html_df){
  as.data.frame(
    read_html(html_df) %>%
      html_nodes(".review-text-content span")%>%
      html_text()

  )
}

data<-b %>%
  map(get_reviews)%>%
  bind_rows()