1、首先需要导入专门连接Mysql用的R包：RMySQL、dplyr、DBI；这三个包
3、我们用：DBI::dbConnect(MySQL()来连接数据库，并且植入好刚刚创建好的 用户名密码，详情看图片
5、接下来我们就可以用SQL语言对数据库的数据进行查询到R语言中了，下面我写出了一个简单代码提取数据到R中：a <- DBI::dbGetQuery(Laputa,"SELE潮贾篡绐CTa.id 工单id,a.apply_time 提交时间,a.estimate_status 状态,a.puzu_price 普租价格,a.community_id 小区ID,b.city 城市名称,b.district 行政区,b.block 商圈,b.name 小区名字FROM Forecast.house_pricing aLEFT JOIN Laputa.xiaoqus b on a.community_id=b.idWHERE a.estimate_status ='评估通过'and a.community_id >0and a.puzu_price >0LIMIT 100 ") %>% mutate(提交时间 = as.Date(提交时间))
7、接下来导出数据到新表，导入包openxlsx烂瘀佐栾这个包是专门导出数据到新表的包，我们用到函数：a <- openx造婷用痃lsx::write.xlsx(a,'C:/Users/Administrator/Desktop/城市数据.xlsx')；把数据导出到桌面，且命名城市数据；
