最近做数据分析时,入坑了R语言,画了一些感觉很有趣的交互图,现在把它分享出来,方便大家参考,毕竟独乐乐不如众乐乐。在此做个记录,也方便日后自己查找!
1.云图-----显示的是我本地数据库所有新闻共同提到的热点词汇
(注:需要数据分析与挖掘的部分知识,可以参考我之前写的文章)
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.饼图----展示的是各大城市职位的组成
代码部分:
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.条形图----展示的是每个城市的所有招聘职位数
代码部分:
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类职位在地图各大版块的分布
代码部分:
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))
好了就分享这些了。