到底青岛的数据分析师待遇如何?在青岛企业招聘数据分析师月薪应该给多少?基于以上启发 在业余时间做简单分析,希望对招聘定薪有所帮助。
通过网络爬虫,爬取智联招聘青岛数据分析岗的数据,爬虫略过,直接上数据!爬取的数据如下所示: 包含了招聘的企业,提供的岗位最低月薪及最高月薪。
datatable(data,filter = 'top',rownames = FALSE,
extensions = 'Buttons', options = list(
dom = 'Bfrtip',
buttons = c( 'excel', 'pdf', 'print',I('colvis'))
)) %>%
formatStyle('招聘月薪', fontWeight = styleInterval(0.05, c('normal', 'bold'))) %>%
formatStyle(
'最低月薪',
color = styleInterval(c(1.0, 1.3), c('white', 'blue', 'red')),
backgroundColor = styleInterval(0.9, c('gray', 'yellow'))
) %>%
formatStyle(
'最高月薪',
background = styleColorBar(data$最高月薪, 'yellow'),
backgroundSize = '100% 90%',
backgroundRepeat = 'no-repeat',
backgroundPosition = 'center'
) %>%
formatStyle(
'最低月薪',
background = styleColorBar(data$最低月薪, "pink" ),
backgroundSize = '100% 90%',
backgroundRepeat = 'no-repeat',
backgroundPosition = 'center'
)
基于以上数据在薪资层面上做简单分析,如下图所示:
p<-ggplot(data,aes(1:nrow(data),最高月薪))+geom_point(aes(1:nrow(data),最高月薪),color="gold4",size=5)+
geom_point(aes(1:nrow(data),最低月薪),shape=1,alpha=0.8,color="blue",size=3)+
geom_linerange(aes(ymin = 最低月薪, ymax = 最高月薪),linetype=3,alpha=0.3,color="red",size=1)+
#geom_pointrange(aes(ymin = 最低月薪, ymax = 最高月薪),linetype=3)+
#geom_crossbar(aes(ymin = 最低月薪, ymax = 最高月薪), width = 0.5)+
geom_errorbar(aes(ymin = 最低月薪, ymax = 最高月薪), width = 0.5,linetype=1)+
labs(x="分公司编号",y="职位月薪(RMB)",title="青岛数据分析师职位月薪分析",
subtitle="数据来源:智联招聘(青岛)",caption='@联信策咯中心')+
theme(title=element_text(face='bold',size=12),
plot.title=element_text(face='bold',size=16),
plot.subtitle=element_text(face='bold',size=12),
axis.text=element_text(face='bold',colour="blue"))+
scale_y_continuous(breaks=c(3000,4000,5000,6000,7000,8000,10000,20000,30000))
print(p)
结论已在第3部分了(呵呵。。。。。。),个人认为:不足之处在于目前数据来源平台单一(可以多爬几个平台像58同城,boss直聘,前程无忧,51job,中华英才,猎聘。。。。。。),但从侧面来说智联招聘在众多招聘 网站中份额占比很重,数据有代表性,此外作为企业来说发布招聘信息往往是在不同平台发布同类信息,所以数据来源 具有一定代表性。
最后希望我的分析能给决策带来帮助,辅助您的决策。
Copyright © 2017 Qingdao Inter-Credit Services Pte Co., Ltd.