请选择 进入手机版 | 继续访问电脑版
楼主: raysinpalm
602 1

[stata资源分享] 【独家发布】统计学思考e [推广有奖]

  • 0关注
  • 0粉丝

高中生

0%

还不是VIP/贵宾

-

TA的文库  其他...

stata

威望
0
论坛币
2280 个
通用积分
68.7908
学术水平
0 点
热心指数
0 点
信用等级
0 点
经验
90 点
帖子
6
精华
0
在线时间
21 小时
注册时间
2014-4-11
最后登录
2023-3-4

raysinpalm 发表于 2022-1-8 03:02:00 |显示全部楼层 |坛友微信交流群
相似文件 换一批

+2 论坛币
k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群
赵安豆老师微信:zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

感谢您参与论坛问题回答

经管之家送您两个论坛币!

+2 论坛币
/*杨海宁毕业论文数据分析程序 V.20211211*/

clear all
set more off
cap log use

/*导入数据*/
import excel "C:\Users\raysi\Desktop\yhn.xlsx", sheet("原始数据") cellrange(A1:AW41) firstrow

/*数据清洗*/
/*数据格式调整*/
drop in 1
destring, replace

split 作答时长秒, p("秒")
drop 作答时长秒
rename 作答时长秒1 作答时长秒
order 作答时长秒, first
destring 作答时长秒, replace

split 请选择你的生日, p("-")
drop 请选择你的生日2 请选择你的生日3 请选择你的生日
rename 请选择你的生日1 出生年份
order 出生年, before("入职时间入职年月即可" )
destring 出生年, replace
gen age=2021-出生年
order age, after(出生年)
label variable age "年龄"

split 入职时间入职年月即可, p("-")
drop 入职时间入职年月即可2 入职时间入职年月即可3 入职时间入职年月即可
rename 入职时间入职年月即可1 入职年份
order 入职年份, after("出生年份" )
destring 入职年份, replace
gen 工作年限=2021-入职年份
order 工作年限, after(入职年份)

replace 城市="北京市" if 省份==""
replace 省份="北京市" if 城市=="北京市"

/*删除无效样本*/
/*注意力检查问题清洗*/
gen 我不能够充分完成布置的任务1=5- 我不能够充分完成布置的任务
gen diff= abs(我能够充分完成布置的任务-我不能够充分完成布置的任务1)
drop if diff>1
drop 我不能够充分完成布置的任务 我不能够充分完成布置的任务1 diff

/*问题重命名*/
rename 算法智能地分配我的工作任务 pac1
rename 算法按照平台标准对我的工作做出了规范指示 pac2
rename 算法向我提供大量与完成工作任务相关的信息支持 pac3
rename 算法向我实时动态地反馈与工作绩效相关的信息 pac4
rename 算法实时追踪定位我的地理位置 pac5
rename 算法持续地跟进我的工作进度 pac6
rename 算法实时地监控我的工作态度 pac7
rename 算法自动地评估我的工作完成质量 pac8
rename 算法根据我的工作表现划分等级并在平台内进行排名 pac9
rename 算法在特定时段或时期提供现金奖励激励我努力工作 pac10
rename 当我工作未能满足平台要求时算法会对我进行罚款 pac11
rename 当我为将来的工作做好规划时我可以实现 se1
rename 我的问题之一是我不能该工作的时候认真工作 se2
rename 当我在工作中为自己设定目标时我很少实现它们 se3
rename 工作中出现意外问题时我处理得不是很好 se4
rename 在工作中当新东西对我来说太难的时候我会避免尝试去学习 se5
rename 当工作中有些事不能立即起作用时我只会更加努力 se6
rename 我对自己的专业能力没有信心 se7
rename 在工作中我是一个相当自立的人 se8
rename 当工作中出现问题时我很容易就放弃 se9
rename 我似乎不能处理工作中出现的大多数问题 se10
rename 如果我尽力去做的话我总能解决工作中的问题 se11
rename 以我的才智我定能应付意料之外的情况 se12
rename 如果我在工作中遇到麻烦我通常会想办法去做 se13
rename 我能冷静地面对工作中的困难因为我信赖自己处理问题的能力 se14
rename 面对一个工作中遇到的问题时我通常能找到几个解决方法 se15
rename 我自信能够有效地应付任何工作中突如其来的事情 se16
rename 无论工作中遇到什么情况我通常都能应付 se17
rename 我过去的工作经验为我未来的职业发展做好了准备 se18
rename 我在工作中达到了自己设定的目标 se19
rename 我觉得我已经准备好满足工作中的大部分要求了 se20
rename 我能够充分完成布置的任务 tp1
rename 我能够完成对自己期望的工作任务要求 tp2
rename 我能够履行其工作描述中规定的职责 tp3
rename 我能够达到该工作正式规定的标准要求 tp4

/*反向积分*/
gen se2_1=7-se2
gen se3_1=7-se3
gen se4_1=7-se4
gen se5_1=7-se5
gen se7_1=7-se7
gen se9_1=7-se9
gen se10_1=7-se10   

drop se2
drop se3
drop se4
drop se5
drop se7
drop se9
drop se10

rename se2_1 se2
rename se3_1 se3
rename se4_1 se4
rename se5_1 se5
rename se7_1 se7
rename se9_1 se9
rename se10_1 se10

forvalue i=1/20{
gen se_`i'=7-se`i'
drop se`i'
rename se_`i' se`i'
}

alpha pac1- pac11, a c d i
alpha tp1- tp4, a c d i
alpha se1- se20, a c d i

gen pac=(pac1+pac2+pac3+pac4+pac5+pac6+pac7+pac8+pac9+pac10+pac11)/11
gen tp=(tp1+tp2+tp3+tp4)/4
gen se=(se1+se2+se3+se4+se5+se6+se7+se8+se9+se10+se11+se12+se13+se14+se15+se16+se17+se18+se19+se20)/20

/*初步中介效应检验*/
reg tp pac,r
reg se pac,r
reg tp pac se,r

/*模型调整*/
reg tp pac age 工作年限  i.请选择您的性别 i.您是兼职还是全职从事这份工作 i.您的婚姻状况 ,r
reg se pac age 工作年限  i.请选择您的性别 i.您是兼职还是全职从事这份工作 i.您的婚姻状况 ,r
reg tp pac se age 工作年限  i.请选择您的性别 i.您是兼职还是全职从事这份工作 i.您的婚姻状况 ,r


二维码

扫码加我 拉你入群

请注明:姓名-公司-职位

以便审核进群资格,未注明则拒绝

关键词:统计学 destring Variable forvalue replace

Stata简明讲义.pdf

810.64 KB

本帖被以下文库推荐

  • · stata|主题: 4, 订阅: 0
三重虫 发表于 2022-1-9 12:17:53 |显示全部楼层 |坛友微信交流群

使用道具

您需要登录后才可以回帖 登录 | 我要注册

本版微信群
加好友,备注jltj
拉您入交流群

京ICP备16021002-2号 京B2-20170662号 京公网安备 11010802022788号 论坛法律顾问:王进律师 知识产权保护声明   免责及隐私声明

GMT+8, 2024-3-29 20:08