连老师，请教画图~

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

连老师我画了两幅图，但是每幅图倒最后都打不开，不知道是什么原因？
*第一个图的do文件
   use "d:\进析\TFP\zuihou.dta", clear
   #delimit ;
   twoway (scatter vnp_tiov IMP_PR || qfit vnp_tiov IMP_PR if TFP_gap<=.536126, lpattern(solid) lcolor(black*1.5))          ///
          (scatter vnp_tiov IMP_PR || qfit vnp_tiov IMP_PR, lpattern(dash) lcolor(black*1.5))           ///
                  ,                                                     ///                                    
                  scheme (s1mono)                                       ///     
                  ylabel(,angle(0))                                     ///
                  ytitle("企率")                              ///
                  xtitle("行率")                              ///
                  ymtick(##2, axis(1))                                  ///
                  xmtick(##2)                                           ///
          legend(label(1 "企率") label(2 "拟合值一") label(2 "拟合值二") rows(1) size(*1)) ///
                  ;
                  #delimit cr
   ********************************************************************
   *第二个图的do文件
    use "d:\进口竞争和产品创新\非平衡面板分析\TFP\zuihou.dta", clear
        #delimit ;
    twoway (scatter sum_vnpx IMP_PR || qfit sum_vnpx IMP_PR if TFP_gap<=.5361216, lpattern(solid) lcolor(black*1.5))   ///
               (scatter sum_vnpd IMP_PR || qfit sum_vnpd IMP_PR if TFP_gap>.5361216, lpattern(dash_dot) lcolor(black*1.5))    ///
                   ,                                                  ///
                   scheme (s1mono)                                    ///
                   ylabel(,angle(0))                                  ///
                   ytitle("行业新率")                           ///
                   xtitle("行业透率")                           ///
                   ymtick(##2, axis(1))                               ///
                   xmtick(##2)                                        ///
           legend(label(1 "行业新率") label(2 "拟合值一") label(2 "拟合值二") rows(1) size(*1))///
                   ;
           #delimit cr
—————————————————————————————————————————————————————                                   

另外学生还有两个请求：
一，每个图画完之后，请老师帮忙合并成并排两个的。
二，请老师把忙吧散点的颜色调整颜色变浅，回归线变粗，颜色变深。

麻烦您了·~数据我发您邮箱~~

扫码加我 拉你入群

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

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

分享0 收藏1 回帖

关键词：连老师 Scatter delimit twoway limit

既然用了 #delimit 就可以删除那些断行的 /// 了。

合并图形，参考 help graph combine ，视频中 A3_graph 有详细讲解；

arlionn 发表于 2013-9-30 17:06
既然用了 #delimit 就可以删除那些断行的 /// 了。

合并图形，参考 help graph combine ，视频中 A3_gra ...

连老师，如何把散点的颜色变浅啊？

arlionn 发表于 2013-9-30 17:06
既然用了 #delimit 就可以删除那些断行的 /// 了。

合并图形，参考 help graph combine ，视频中 A3_gra ...

>                    xmtick(##2)                                       
>            legend(label(1 "DDòμ2úÆ·′′DÂÂê") label(2 "ÄaoÏÖμò»") label(2 "ÄaoÏÖμ¶t") rows(1) size(*1))
>                    ;
| invalid name
r(198
连老师，我删除断行线之后，依然不能运行·~

如下程序可以运行处图形：

global path "C:\Documents and Settings\Administrator\桌面\gr\"
cd "$path"

use "C:\Documents and Settings\Administrator\桌面\zuihou.dta", clear

  preserve
  duplicates drop vnp_tiov IMP_PR, force //删除重复值
    
#delimit ;
   twoway (scatter vnp_tiov IMP_PR)
          (qfit vnp_tiov IMP_PR if TFP_gap<=.536126,
                   lpattern(solid) lcolor(black*1.5))
                  (qfit vnp_tiov IMP_PR, lpattern(dash) lcolor(black*1.5))
                  ,                                                                                         
                  scheme (s1mono)                                            
                  ylabel(,angle(0))                                    
                  ytitle("企率")                              
                  xtitle("行率")                              
                  ymtick(##2, axis(1))                                 
                  xmtick(##2)                                          
          legend(label(1 "企率") label(2 "拟合值一")
                         label(2 "拟合值二") rows(1) size(*1))
                  ;
                  #delimit cr
  
   *-输出图片
   graph export gr_1.wmf, replace
  restore

问题在于，即使使用 duplicates 删除重复值后，你的样本中仍然有 62967 个观察值。这么多个观察值绘制的散点图，根本看出不任何规律。

建议你现在年度或者某个类别变量的基础上计算出平均值，然后再绘制散点图。

观察值的个数控制在 500 以内才会有比较直观的效果。

感谢连老师，图终于弄好了。最后我虽然还是用了自己的方法，但是还是要谢谢您的指导和关心~~

搞定就好。stata 绘图需要长期积累，多做笔记，选项太多。

如果我那篇文章发个好杂志的话，我觉得我应该请您吃顿饭~至少给您邮寄些特产~~天天麻烦你，实在太不好意思了·~

不必客气，祝顺利！