如何记录和应用Graph editor 中的操作命令？

相似文件 换一批

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

[Stata]如何记录和应用Graph editor 中的操作命令？

通过Stata Graph editor 可以很方便地对图形加以美化修改，但手动操作相应 的代码并未自动生成，这时可以借助Stata graph editor recorder来加以记录， 再将gr_edit添加在所记录语句前，这样操作代码便应用到了整幅图形的编辑中。 1.生成图像 sysuse auto,clear histogram mpg 复制代码 2. (1)首先右键点击start graph editor (2)然后点击功能区中的小红点(Start recording) (3)以修改直方柱颜色为例(选择lime),完毕后再次点击小红点(End recording)，此时在自动弹出的对话框中命令保存即可（此     处暂记为1.grec)。 (4) 方法一： sysuse auto,clear histogram mpg,play("1.grec") 复制代码 方法二：           在Do-file Editor中打开1.grec: StataFileTM:00001:01100:GREC:                          : 00004:00004:00001: *! classname: twowaygraph_g *! family: twoway *! date: 31 Dec 2015 *! time: 19:25:31 *! graph_scheme: s1color *! naturallywhite: 1 *! end // File created by Graph Editor Recorder. // Edit only if you know what you are doing. .plotregion1.plot1.style.editstyle area(shadestyle(color(lime))) editcopy .plotregion1.plot1.style.editstyle area(linestyle(color(lime))) editcopy // plot1 color // <end> 复制代码      然后在上面所记录的语句前添加加gr_edit即可(去掉editcopy)。 sysuse auto,clear histogram mpg gr_edit plotregion1.plot1.style.editstyle area(shadestyle(color(lime))) 复制代码

扫码加我 拉你入群

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

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

关键词：editor GRAPH GRAP Edit Ito command 如何

Stata tip 81: A table of graphs

---

1. set scheme sj
   
2. sysuse auto, clear
   
3. fillin rep78 foreign
   
4. twoway scatter price mpg, by(foreign rep78, cols(5) compact)

复制代码

1. egen group = group(foreign rep78)
   
2. label define group     ///
   
3.         1  "Poor"          ///
   
4.         2  "Fair"          ///
   
5.         3  "Average"       ///
   
6.         4  "Good"          ///
   
7.         5  "Excellent"     ///
   
8.         6  " "             ///
   
9.         7  " "             ///
   
10.         8  " "             ///
    
11.         9  " "             ///
    
12.         10 " "
    
13. label value group group
    
14. twoway scatter price mpg,     ///
    
15.         by(group, cols(5)         ///
    
16.         r1title("Car type",       ///
    
17.         orientation(rvertical)    ///
    
18.         size(medsmall))           ///
    
19.         t1title("Repair status",  ///
    
20.         size(medsmall))           ///
    
21.         note("") compact)

复制代码

启动Graph Editor,点击小红点(Start Recording),右侧Object Browser:

双击r1title[5]---填入Domestic-->依次调整Box和Format选项卡下内容完成修改

类似双击r1title[10]---填入Domestic-->依次调整Box和Format选项卡下内容完成修改，保存1.grec:在Do-file Editor中打开：

1. StataFileTM:00001:01100:GREC:                          :
   
2. 00004:00004:00001:
   
3. *! classname: bygraph_g
   
4. *! family: by
   
5. *! date:  1 Jan 2016
   
6. *! time: 17:42:16
   
7. *! graph_scheme: sj
   
8. *! naturallywhite: 1
   
9. *! end
   
10. 
    
11. // File created by Graph Editor Recorder.
    
12. // Edit only if you know what you are doing.
    
13. 
    
14. .plotregion1.r1title[5].style.editstyle drawbox(yes) editcopy
    
15. .plotregion1.r1title[5]._set_orientation rvertical
    
16. .plotregion1.r1title[5].text = {}
    
17. .plotregion1.r1title[5].text.Arrpush Domestic
    
18. .plotregion1.r1title[5].as_textbox.setstyle, style(yes)
    
19. // r1title[5] edits
    
20. 
    
21. // r1title[5] edits
    
22. 
    
23. .plotregion1.r1title[10].as_textbox.setstyle, style(yes)
    
24. .plotregion1.r1title[10].text = {}
    
25. .plotregion1.r1title[10].text.Arrpush Foreign
    
26. // r1title[10] edits
    
27. 
    
28. // r1title[10] edits
    
29. 
    
30. 
    
31. // <end>

复制代码

包含以上手工操作的完整代码如下所述：

1. set scheme sj
   
2. sysuse auto, clear
   
3. fillin rep78 foreign
   
4. twoway scatter price mpg, by(foreign rep78, cols(5) compact)
   
5. egen group = group(foreign rep78)
   
6. label define group     ///
   
7.         1  "Poor"          ///
   
8.         2  "Fair"          ///
   
9.         3  "Average"       ///
   
10.         4  "Good"          ///
    
11.         5  "Excellent"     ///
    
12.         6  " "             ///
    
13.         7  " "             ///
    
14.         8  " "             ///
    
15.         9  " "             ///
    
16.         10 " "
    
17. label value group group
    
18. twoway scatter price mpg,     ///
    
19.         by(group, cols(5)         ///
    
20.         r1title("Car type",       ///
    
21.         orientation(rvertical)    ///
    
22.         size(medsmall))           ///
    
23.         t1title("Repair status",  ///
    
24.         size(medsmall))           ///
    
25.         note("") compact)
    
26. gr_edit plotregion1.r1title[5].style.editstyle drawbox(yes) editcopy
    
27. gr_edit plotregion1.r1title[5]._set_orientation rvertical
    
28. gr_edit plotregion1.r1title[5].text = {}
    
29. gr_edit plotregion1.r1title[5].text.Arrpush Domestic
    
30. gr_edit plotregion1.r1title[5].as_textbox.setstyle, style(yes)
    
31. 
    
32. gr_edit plotregion1.r1title[10].as_textbox.setstyle, style(yes)
    
33. gr_edit plotregion1.r1title[10].text = {}
    
34. gr_edit plotregion1.r1title[10].text.Arrpush Foreign

复制代码

感谢师弟回来多分享好东西啊~

xddlovejiao1314 发表于 2016-1-3 10:03
感谢师弟回来多分享好东西啊~

祝师兄一切都好!

谢谢分享

撒花感谢~~

很好很好，太好了