RTF基本命令(一)
Stata
中的运算结果常常需要导出到RTF,DOC
文档中,不同操作界面之间的切换会给我们带来许多不便,rtfopen,rtfappend等一系列命令可以实现在Stata界面直接进行RTF文件
(Word文档)的建立、合并以及直接修改其中信息和图表信息的直接导入等功能。这么强大又好用的功能,小编已经迫不及待要介绍给大家啦。
1
创建和打开RTF文档
首先,我们先介绍使用rtfopen命令创建一个RTF文档的方法。
!taskkill /F /IM WINWORD.EXE /T //强制关闭word
(提醒:如果 word中有正在编辑的文档要先保存好,强制关闭后文档可能无法恢复)
clear all
set more off
tempname handle //临时设置一个文件句柄,即用于指明系统当前正在处理的文档)
rtfopen `handle' using d:/mytable.rtf, replace
可以发现,路径d盘rtf文件夹下生成了一个名为mytable的RTF文档
打开已有的RTF文档,可以使用rtfappend命令
rtfappend `handle’ using d:/mytable.rtf
即可打开已创建的mytable文档
2
编辑RTF文档文字内容
我们可以使用file write命令对RTF文档进行编辑,比如:
file write `handle' "{\pard\b \qc \fs80 Empirical Resutls \par}" _n
file write `handle' "{\pard\b \qc \fs60 Prof. Chuntao Lee \par}" _n
文档中就出现了如图字样:
1) \pard 作用是令新建段落恢复至系统默认格式
2) \qc 为段落居中
3) \b 为加粗
4) \fsN 设置字体大小
5) \par 标示该段结束
3
RTF文档添加超链接
rtfhyper命令可以用来在文档中添加链接,比如添加(http://richdata.zuel.edu.cn)爬虫俱乐部网页链接,名为my wonderful website。
file write `handle' "{\pard\b \qc "
rtfhyper `handle', hyper("http://richdata.zuel.edu.cn") text("{\ul Our Wonderful website}")
file write `handle' "\par}"
1) rtfhyper命令的hyper()里放入链接网页地址,text()可以定义链接的名称。
2) 第一行file write `handle' "{\pard\b \qc "和最后一行file write `handle' "\par}"是成对出现的,大括号里定义了中间rtfhyper命令链接内容的段落格式。
如图所示:
类似地,我们还可以添加邮箱地址的链接:
file write `handle' _n "\line" _n //用于换页
file write `handle' "{\pard\b \qc \fs40 Email: "
rtfhyper `handle', hyper("{\ul chtl@zuel.edu.cn}")
file write `handle' "\par}"
4
RTF文档导入绘图
我们可以使用graph export + rtflink命令将绘图插入RTF文档:
sysuse auto, clear
scatter mpg weight, by(foreign)
graph export c:/rtf/myplot3.eps, replace
(以stata auto数据为例,绘制 mpg和weight的散点图)
tempname handle
rtfappend `handle' using c:/rtf/mytable.rtf,replace
file write `handle' _n "\page" _n
file write `handle' "{\pard\b This is a graph output \par}" _n
(打开mytable.rtf文档,file write编辑好导入的散点图的名称)
rtflink命令可以在RTF文档中添加绘制的图表,用法如下:
rtflink `handle' using c:/rtf/myplot3.eps
file write `handle' "\line"
rtfclose `handle'
结果如图所示:
stata中绘制的图表都可以使用graph export+ rtflink 导入到rtf文档中。
RTF 文档编辑完毕后rtfclose `handle' 即可,以上是rtf系列命令基本用法。 rtfopen创建RTF文档,rtfappend打开已有的RTF文档,rtfhyper添加超链接以及 rtflink在RTF文档中添加图表,举例的具体程序如下:
!taskkill /F /IM WINWORD.EXE /T
clear all
set more off
tempname handle
rtfopen `handle' using c:/rtf/mytable.rtf, replace
file write `handle' "{\pard\b \qc \fs80 Empirical Resutls \par}" _n
file write `handle' "{\pard\b \qc \fs60 Prof. Chuntao Lee \par}" _n
file write `handle' "{\pard\b \qc "
rtfhyper `handle', hyper("http://richdata.zuel.edu.cn") ///
text("{\ul Our Wonderful website}")
file write `handle' "\par}"
file write `handle' _n "\line" _n
file write `handle' "{\pard\b \qc \fs40 Email: "
rtfhyper `handle', hyper("{\ul chtl@zuel.edu.cn}")
file write `handle' "\par}"
rtfclose `handle'
sysuse auto, clear
rtfappend `handle' using c:/rtf/mytable.rtf,replace
scatter mpg weight, by(foreign)
graph export c:/rtf/myplot3.eps, replace
file write `handle' _n "\page" _n
file write `handle' "{\pard\b This is a graph output \par}" _n
rtflink `handle' using c:/rtf/myplot3.eps
file write `handle' "\line"
rtfclose `handle'
RTF基本命令的介绍暂时告一段落,之后的推文中还会介绍RTF好用的命令,锁定爬虫酱的公众号哟~接下来让我们关注一下空气质量情况。
全国空气质量如下
河南的朋友,你们还好么?
以上就是今天给大家分享的内容了,说得好就赏个铜板呗!有钱的捧个钱场,有人的捧个人场~,点赞打赏随您心意,么么哒~
应广大粉丝要求,爬虫俱乐部的推文公众号打赏功能可以开发票啦,累计打赏超过1000元我们即可给您开具发票,发票类别为“咨询费”。用心做事,只为做您更贴心的小爬虫。第一批发票已经寄到各位小主的手中,大家快来给小爬虫打赏呀~
编辑 by 徐苾雯
往期推文推荐:
1.火锅和肥羊,啤酒和炸鸡,cnstock和chinafin
关于我们
微信公众号“爬虫俱乐部”分享实用的stata命令,欢迎转载、打赏。爬虫俱乐部是由李春涛教授领导下的研究生及本科生组成的大数据分析和数据挖掘团队。
此外,欢迎大家踊跃投稿,介绍一些关于stata的数据处理和分析技巧。
投稿邮箱:xueyuan19920310@163.com
投稿要求:
1)必须原创,禁止抄袭;
2)必须准确,详细,有例子,有截图;
注意事项:
1)所有投稿都会经过本公众号运营团队成员的审核,审核通过才可录用,一经录用,会在该推文里为作者署名,并有赏金分成。
2)邮件请注明投稿,邮件名称为“投稿”+“推文名称”。
3)应广大读者要求,现开通有偿问答服务,如果大家遇到关于stata分析数据的问题,可以在公众号中提出,只需支付少量赏金,我们会在后期的推文里给予解答。
欢迎关注爬虫俱乐部
微信扫一扫
关注该公众号