刚开始学习R语言，对着炼数成金的《R语言七种武器之网络爬虫RCurl》学习网络爬

虫，晕倒一个问题，使用getForm函数时出现了Error in function (type, msg,

asError = TRUE)  : SSL certificate problem: unable to get local issuer

certificate的问题。捣鼓了一天也没有解决，向各位大侠求助。万分感谢！
具体问题如下：
运行代码
sq=c("https://www.baidu.com/s?wd=北京房价2015走势

&rsv_spt=1&rsv_iqid=0xc727bffd0002316f&issp=1&f=8&rsv_bp=0&rsv_idx=2&ie=

utf-

8&tn=baiduhome_pg&rsv_enter=1&rsv_sug3=1&rsv_sug1=1&jmp=jsver&_vr=0.6230

232738889754")
getFormParams(sq)
根据结果运行代码
url=getForm("https://www.baidu.com/s",
"wd"="北京房价2015走势",
rsv_spt="1",
rsv_iqid="0xc727bffd0002316f",
issp="1",
f="8",
rsv_bp="0",
rsv_idx="2",
ie="utf-8",
tn="baiduhome_pg",
rsv_enter="1",
rsv_sug3="1",
rsv_sug1="1",
jmp="jsver",
vr="0.6230232738889754")
出现的问题是：
Error in function (type, msg, asError = TRUE)  :
  SSL certificate problem: unable to get local issuer certificate