其实没有R好看，不过还好，如果你熟悉各个选项的话

  这当然没错，Stata比像Excel , eviews这些“傻瓜式”软件强的地方就是他代码的“可重复利用性”上，但是我总感觉对于一些“即时可见”的图表，Excel可能更方便，比如我想修改标题的字体、大小，直接改就可以了，再比如我想修改图例的位置，直接拖曳就可以了（在stata里面还有设置legend(,pos())）。而且，作为图标来说，到底有多少可复制性而言也是个问题：设置好的同一套option, 显示出来的效果对一套新的数据来说可能就不合适了，还要从头搞起，没效率啊。
  吐槽完了，还是要虚心请教@蓝色 版主，N.Cox那篇FAQ里面的问题现在有更好的解决办法吗？

stata作图，只需要改do文件里面的相关内容就可以
http://www.ats.ucla.edu/stat/stata/library/GraphExamples/code/twospike.htm
sysuse sp500, clear
#delimit ;
twoway line close date, yaxis(1) || spike change date, yaxis(2) ||,
  yscale(axis(1) r(700  1400)) ylabel(1000(100)1400, axis(1))
  yscale(axis(2) r(-50 300))   ylabel(-50 0 50, axis(2))
  ytick(-50(25)50, axis(2) grid)
  legend(off)
  title("S&P 500")
  subtitle("January - December 2001")
  note("Source:  Yahoo!Finance and Commodity Systems, Inc.")
  yline(950, axis(1) lstyle(foreground))
  ;
#delimit cr

你如果不想标题在上面
sysuse sp500, clear
#delimit ;
twoway line close date, yaxis(1) || spike change date, yaxis(2) ||,
  yscale(axis(1) r(700  1400)) ylabel(1000(100)1400, axis(1))
  yscale(axis(2) r(-50 300))   ylabel(-50 0 50, axis(2))
  ytick(-50(25)50, axis(2) grid)
  legend(off)
  title("Figure1. S&P 500" ,positon(6))
  subtitle("January - December 2001")
  note("Source:  Yahoo!Finance and Commodity Systems, Inc.")
  yline(950, axis(1) lstyle(foreground))
  ;
#delimit cr

你如果不想显示时间
只需要设置
format  date  %9.0f
显示为数字，作图直接就是数字
ucla这里许多时间序列的图，没有见那么麻烦的啊
http://www.ats.ucla.edu/stat/stata/library/GraphExamples/default.htm

   问题是，还是想显示时间啊，比如说固定显示每一年的1月份和7月份，写成xlabel（2006m1(6)2014m12）肯定是不行的，那就需要手工（或者近似手工的用--forval--）寻找到每一个月份对应的elapsed time value, 在我的例子中就是
552 558 564 570 576 582 588 594 600 606 612 618 624 630 636 642 648 654
   这一堆怪怪的数字，然后手工输入到xlabel选项中，我觉得这个过程极其蛋疼。

我给你的链接
和程序上的例子，很明显直接就显示
不需要xlabel

format date %tm
就可以啊

如果只想显示特定的月份呢？我的时间变量已经format 了

我的code

twoway (line new70_index time2)(line CREIS100_hpi time2) ///
  ,                                                      ///
   xlabel(552 558 564 570 576 582 588 594 600 606 612 618 624 630 636 642 648 654   ///
   ,angle(45)) ///
   title("住宅价格指数(全国)")                           ///
   ytitle("月度数据，基期为2005年7月")                   ///
   xtitle("")                                            ///
   legend (label(1 "NBS70个大中城市房价指数") label(2 "百城住宅价格指数") ///
   region(lcolor(white)) col(1) size(small) position(6) ring(0))

clear
input ///
str10 date y
"1960m1" 1
"1960m2" 1.3
"1960m3" 3.5
"1960m4" 4
"1960m5" 4
end

gen ym=monthly(date,"YM")
list
tw (line y ym),saving(f1,replace)


format ym %tm
tw (line y ym),saving(f2,replace)

graph combine f1.gph f2.gph

clear
input ///
str10 date y
"1960m1" 1
"1960m2" 1.3
"1960m3" 3.5
"1960m4" 4
"1960m5" 4
end

gen ym=monthly(date,"YM")
list
tw (line y ym),saving(f1,replace)


format ym %tm
tw (line y ym),saving(f2,replace)

graph combine f1.gph f2.gph

clear
input ///
str10 date y
"1960m1" 1
"1960m2" 1.3
"1960m3" 3.5
"1960m4" 4
"1960m5" 4
end

gen ym=monthly(date,"YM")
list
tw (line y ym),saving(f1,replace)


format ym %tm
tw (line y ym),saving(f2,replace)

graph combine f1.gph f2.gph

Brewing color schemes in Stata:Making it easier for end users to customize Stata graphs
_

Compared to the graphs that R can do,the main impediment is probably that stata graphics is not programmable by MOST USERS!!!

@蓝色 @BlackHawk123  多谢二位的回复

通常不会用的人，都喜欢bb说不好

请问有没有关于不同类型图表的STATA命令模板？这样方便初学者类比学习和了解。
毕竟命令里面的option并不是很直观，不容易理解。

谢谢~

您好。这个x抽时间对应的数字，是怎么算出来的？？麻烦您告知下啊。我画时间的图，横轴也想显示一些指定的时间，时间对应的数字是怎么算出来的。非常感谢啊。552 558 564 570 576 582 588 594 600 606 612 618 624 630 636 642 648 654 。这一串数字，怎么得来的？？

http://www.ats.ucla.edu/stat/stata/library/GraphExamples/code/twospike.htm点进去是ucla的主页，请问作图相关的程序是在哪里点进去的？

ucla网页调整了
找不到了

您好。向您请教啊。我想作图，横轴是年份，但是想把所有的年份都显示出来，而不是stata自动选取的某几年。我直接输入横轴xlabel为所有年份，不认可。
1、好像需要年份对应的数字，把年份转换为对应1961年的数字，但是不知道怎么转换，好像有一个函数。转换为数字后，一个一个数字输入对应相应的年份。
2、另外，您有什么办法吗？作图时，把所有年份都显示出来，而不是显示几个年份。
谢谢。折腾很久了，没有解决。请您赐教啊。