写有代码底部含有“复制代码”的框框是怎么做出来的？

[code]
这样？
［/code］

1. 感谢分享

复制代码

1. 学习了求问，如何将R中的有格式的代码复制出来，我复制出来的都没有格式

复制代码

1. 求问，如何将R中的有格式的代码复制出来，我复制出来的都没有格式

复制代码

复制代码

1. *===============计算投资效率=======================
   
2. *===================================================
   
3. use "C:\Users\lenovo\Desktop\Richardson 合并数据.dta",clear
   
4. 
   
5. * 缩尾处理
   
6. *ssc install winsor2
   
7. winsor2 RDSpendSum Growth Debt Size ROA Cash Age, cuts(1 99) by(Enddate) replace
   
8. 
   
9. * 系统GMM回归
   
10. * 需要安装外部命令
    
11. *ssc install xtabond2
    
12. destring Symbol,replace
    
13. xtset Symbol Enddate
    
14. xi: xtabond2 RDSpendSum c.Growth c.Debt c.Size c.ROA c.Cash c.Age c.RDSpendSum i.IndustryCode i.Enddate, gmm( Debt Size ROA, lag(2 4)) iv(i.Enddate) robust
    
15. 
    
16. predict 残差，resid
    
17. 
    
18. ssc install estout
    
19. esttab, nogap replace star(* 0.1 ** 0.05 *** 0.05)  indicate("IndustryCode=*IndustryCode*" "Enddate=*enddate*") b(3) t(3) scalar(chi2 p)
    
20. esttab using 回归结果.rtf, nogap replace star(*0.1**0.5***0.5) indicate("Industry=*IndustryCode*""Enddate=*enddate*") b(3) t(3) scalar(chi2 p)
    
21. 
    
22. gen 投资效率=abs(残差)
    
23. gen 过度投资=abs(残差) if 残差>0
    
24. gen 投资不足=abs(残差) if 残差<0

复制代码

复制代码

复制代码

allain 发表于 2017-12-18 15:04

1. 1

复制代码