R2-04-第二阶段第二次作业

blanking 2018-02-10 02:37:14 阅读: 1494

library(DBI)

library(RMySQL)

任务一：完全按照R2-14 Lucy大美女的方法安装测试，非常感谢！

任务二/三

library(RISmed)

con <- dbConnect(MySQL(),dbname="practice",username="root",password="")

cell2017<-EUtilsSummary("cell[TA] AND 2017[DP]")

data<-QueryId(cell2017)

pmid<- as.numeric(data)

mylist<-data.frame(id=1:562,pmid=pmid,title=ArticleTitle(records),abstract=AbstractText(records))

dbWriteTable(con,"article",mylist,append=T,row.names=F)

邀请讨论

{{f.title}} 大小 {{f.file_size}} 下载 {{f.count_download}} 金币 {{f.count_gold}}

切换到完整评论

受邀请回答

{{f.title}} 大小 {{f.file_size}} 下载 {{f.count_download}} 金币 {{f.count_gold}}

切换到完整回复

发送回复

赞({{item.count_zan}})

踩({{item.count_cai}})

删除

回复关闭