PHP和R语言交互,使用R语言绘制各种好玩的交互图

本文分享了使用R语言进行数据分析并创建四种可视化图表的过程:1)云图展示了新闻热点词汇;2)饼图描绘了不同城市的职位构成;3)条形图显示各城市招聘职位数量;4)分布地图则呈现了IT职位在地图上的分布情况。这些图表有助于理解和比较数据的分布特征。
摘要由CSDN通过智能技术生成

最近做数据分析时,入坑了R语言,画了一些感觉很有趣的交互图,现在把它分享出来,方便大家参考,毕竟独乐乐不如众乐乐。在此做个记录,也方便日后自己查找!

1.云图-----显示的是我本地数据库所有新闻共同提到的热点词汇

(注:需要数据分析与挖掘的部分知识,可以参考我之前写的文章)

5e282ce360e2?utm_campaign=maleskine&utm_content=note&utm_medium=seo_notes&utm_source=recommendation

R代码部分:

library(wordcloud2)

library(stringr)

library(plyr)

f

words

for(i in 1:length(f))

{

words[i]

}

words

words

tableWord

tableWord = tableWord[c(16:4000),]

letterCloud(tableWord,word="LCB",size = 10)

2.饼图----展示的是各大城市职位的组成

5e282ce360e2?utm_campaign=maleskine&utm_content=note&utm_medium=seo_notes&utm_source=recommendation

代码部分:

library(RODBC)

par(mfrow=c(2,3))

myconn=odbcConnect("MySQLODBC","root","")

works

city

recruits

recruits

recruits

city

city

pct

lbls2

pie(recruits,labels=lbls2,col=rainbow(length(lbls2)),radius=1,main = "北京")

works

city

recruits

recruits

recruits

city

city

pct

lbls2

pie(recruits,labels=lbls2,col=rainbow(length(lbls2)),radius=1,main = "深圳")

works

city

recruits

recruits

recruits

city

city

pct

lbls2

pie(recruits,labels=lbls2,col=rainbow(length(lbls2)),radius=1,main = "上海")

works

city

recruits

recruits

recruits

city

city

pct

lbls2

pie(recruits,labels=lbls2,col=rainbow(length(lbls2)),radius=1,main = "成都")

works

city

recruits

recruits

recruits

city

city

pct

lbls2

pie(recruits,labels=lbls2,col=rainbow(length(lbls2)),radius=1,main = "广州")

works

odbcClose(myconn)

city

recruits

recruits

recruits

city

city

pct

lbls2

pie(recruits,labels=lbls2,col=rainbow(length(lbls2)),radius=1,main = "杭州")

3.条形图----展示的是每个城市的所有招聘职位数

5e282ce360e2?utm_campaign=maleskine&utm_content=note&utm_medium=seo_notes&utm_source=recommendation

代码部分:

library(RODBC)

library(ggplot2)

library(plotly)

library(dplyr)

myconn=odbcConnect("MySQLODBC","root","")

city

count

city

city$workLocation

city

#取前10名

City

Works

p

p

p

4.分布地图----展示的IT类职位在地图各大版块的分布

5e282ce360e2?utm_campaign=maleskine&utm_content=note&utm_medium=seo_notes&utm_source=recommendation

代码部分:

library(RODBC)

library(leaflet)

myconn=odbcConnect("MySQLODBC","root","")

city1

city2

city3

odbcClose(myconn)

city4

city5

m

m

addMarkers(m,city5$lon,lat=city5$lat,popup=paste('',"",city5$name,"",'',city5$catalog,":",city5$sum))

好了就分享这些了。

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值