设为首页收藏本站

爱吱声

 找回密码
 注册
搜索
楼主: awer
打印 上一主题 下一主题

[经济] 一个用stata 计算股票成本的小程序

    [复制链接]

该用户从未签到

61#
发表于 2013-1-25 13:15:49 | 只看该作者
如果我想看最近 一个月,三个月 六个月 的成本,怎么修改程序啊,谢谢大师了

该用户从未签到

62#
发表于 2013-1-25 13:18:55 | 只看该作者
我用同样的方法导出数据,发现有的能生成,有的就不行,不知道问题在哪儿,比如300236就生成不了,我的邮箱是19860225gaoyuan@163.com,麻烦大师了

点评

能告诉我stata报错显示的是什么么?  发表于 2013-1-27 21:37

该用户从未签到

63#
发表于 2013-1-28 13:13:51 | 只看该作者
. hello 3002363 ?% P0 q- m4 |  w7 u. {
statement out of context. D, _6 b$ N6 J& O- f
r(119);
6 ]' i: G8 o3 i: g# o( I# j' s
) J& @5 t0 F. L4 [  N大师 就是这个

该用户从未签到

64#
发表于 2013-1-28 21:11:43 | 只看该作者
这贴实在!

该用户从未签到

65#
 楼主| 发表于 2013-2-5 14:40:59 | 只看该作者
maodeng 发表于 2013-1-28 13:13 8 J" ?3 ~" ]& D! r3 `  g( T1 ^* ^
. hello 300236, Z0 X, W6 n& ]% E3 r
statement out of context
# G" n; o" Z9 w( Hr(119);
2 b, B/ E0 d, |9 [
抱歉,最近太忙了
8 J- y4 c3 D+ |3 g8 B8 ~1 Z' Y
5 p$ x. B! _4 e5 T/ ^300236 我用下面的程序试过,没问题( f+ i: A# o; [; H2 E* ~$ ]
$ }3 C  v) r4 W4 z
你把 D:\stock\test\source 改成你导出的数据存放的目录,再试一试1 p8 C4 X8 _8 R
  k) {" f* ?( @# U4 |. ^
capture program drop hello
" Q& T4 h  e; ?% `
1 T" b0 o3 K* r# n9 Aprogram hello* _4 G- N* Z# z2 p% D8 i6 a" N

7 W/ v& M- V5 \! d/ g quietly {
" R, |7 M6 v6 D+ }, D2 ?/ F9 c% L9 S4 R0 V% H% g5 s' E2 ~
clear
5 |/ f( q  e9 W% P6 C6 X! H2 R, i' S. \$ m. G8 M
cd D:\stock\test\source
, n# e( |* [. J2 K$ q+ ?$ S* J) h$ p% U% @# p
insheet using `1'.txt  d( T  T' r/ ?

& g: D% B. _9 e: [# u! M   keep if v5>0
" w$ M; u8 _1 e8 N& h   
  `) A  L, `8 i0 @  \* F. p8 |; z   gen vt=_n' ^$ q9 @5 P7 e& S$ |& `
   : ]: u, R  G( [( B0 l
   tsset vt
% R; i# @, H5 K9 g/ Q4 H( o, ?; }9 O1 b+ M, W* d" `- E- E
   gen zf=D1.v5( W# D; n- Z/ w
) W  ]7 k2 c# n$ \6 x* s
   gsort -v1
# N! D8 W. i2 N
, e- x& U3 Z: D$ K! Q   gen avol=v7/v5
1 W! n) w3 {5 _( o   
! U2 Z5 e3 N& r# o   keep if avol>0
: f5 {1 M6 m: |5 C+ l3 G, D7 c   0 i; A, u2 `0 j9 b* A& z4 z  Z3 a8 g
   drop vt% T5 Z: M: m# C- V! T7 o
  
5 @8 s, X; v' Y: Y% C+ Y   gen vt=_n! n) p: `: u% \, O) M, m! i' [
   
1 A) ]4 c6 o9 P   tsset vt
! T: Z- W/ {; F" i   
) A/ }; d: P! U" }8 V+ g2 ^- b& @# ~    sum v5 [aw =avol]6 k& j6 y0 I: G# m5 M3 i

/ J+ l8 b% a7 L4 E' [1 N' d   gen amean=r(mean) in 1
  j# W: w" y, W) e$ d& \5 Y   7 a9 K' S" i1 q; w+ g
   * 总加权平均值 amean
: [9 q- m: l2 X/ C   # N% p- X' ~4 F' |; f: x9 B
   
; J7 D; m7 }" h   keep in 1/240
, b! x) @1 S1 H/ w% @
7 L6 C& T. O) t' a5 Q% S& W   sum v5 [aw =avol]  z4 N0 u1 o2 |# S$ F
% ~4 x9 d! |; U( u8 s
   gen mean240=r(mean) in 1
9 ~, H/ b" M/ H# A' @- B   
1 J$ y$ `3 c2 R# I) }: ?# ?   *240加权平均值 mean240
  c& D! c+ ?5 A4 w5 V" E   / b% B* m; r1 {6 F
   set obs 500 ; w; |$ |$ i1 {; ^, m
   : b  j1 i1 R4 }, c5 E' Y
   kdensity v5 [aw =avol],gaussian n(500) generate(dx240 dy240) nograph1 I1 n$ L& M! l2 h0 P
   9 l. ^! J- Z# ~, q
   *240 kdensity(dx240 dy240)
1 r9 r+ {7 T1 ^& ^- E4 N+ p   
( i" h2 S* L8 t) _6 |   sum dy240  m6 r/ {3 `: G9 `# z
   9 ^! p  D9 I7 E- }
   gen yxis=r(max) in 1. i; k: n& e" H* j+ {0 t# W1 S
   
2 b# Y2 K! ^+ H* x* B; {( W/ m   gen yxis2=yxis/2
1 p+ m% H% `- E" m3 u2 m- y   % U; }9 `$ d! `3 }* X7 k
   *yxis! {! ]) d0 T! o' Z) E3 D
   4 ^# U, [0 C1 P9 q6 r" z. Y1 n; f8 J6 ?
   gen dy240max=r(max)
' f$ ]3 H, K, Z, P   * z7 o) n% u9 W) \7 S; z
   gen dy240minp=r(min)
- I: p+ b, }8 ?5 W% |2 z: d3 c5 @ # Z% ^! U* }2 P$ G
    gen vtt=_n
" c) U8 r: ^+ Z9 C# Z$ v: P
. Z- z* P* E5 ^. i2 ~3 P0 c( m: l    tsset vtt
  Z( e4 g- d0 n% G' b/ o6 X8 g$ i: d
   gen ddy240=D1.dy240/D1.dx240
  _  S; R# f& Q" e& w7 K2 ^   * X& c- g5 O3 ~/ l9 `4 e
   sum ddy240
( C! l* a, k9 D5 ?/ g# n   . c# v/ i! R4 R$ a! r
   gen ddy240max=r(max)* d. T" l8 [5 G8 \+ Y$ c, p7 f
   
6 N+ T2 B  s$ K8 o3 B   gen ddy240min=r(min)9 ]% N/ A+ F4 G9 U- ?  y1 U1 u7 ^
     
) I4 Z1 g6 T3 B. {   gen ddy240g=ddy240*(dy240max-dy240min)/(ddy240max-ddy240min)
, n% V  _* b+ r' }; x7 K3 [7 A   8 m+ j2 Y8 ?$ t4 h5 k1 N9 W
   sum ddy240g5 w$ ]0 _- b( f1 f$ x6 m: v, x
   
' M, }( i/ r2 o! s2 r  U" y/ {   gen yxis3=r(min) in 10 b! O& x/ F! T: e9 N; I  t  A
   / \3 R. z3 R  |
   gen yxis4=0 in 1
; N/ @' n6 ]; \* w; }' j  
: V: f# \4 [6 ]+ K+ ?  *ddy240g 6 L+ ]# @* C8 Z5 z* j9 [
   
3 d% H& y2 v2 Q' A# Y   
( o# ^# z& `8 W$ Y$ Q( Z  preserve ) }4 D: F3 B* P
  
& l% {! p; ~& C  sum v5 [aw =avol]
+ X( D+ a" Y4 {1 y- G9 s2 T1 K' y  
' ^) F  ]) w+ |* n  keep if dx240<r(mean)
  _, M/ l0 p: D9 q. Y) g3 y  4 i4 z9 g/ l3 Y; D4 x
  sum ddy240! h8 b8 x5 B7 H5 q- G: ]
  * U0 X% w# u2 O6 J# S
  if r(min)<0 {1 V. K" J+ O( R3 i) n
        
2 D1 c6 p+ _5 p7 ?                keep if ddy240<=0
: i: Q2 X; |9 e. T3 }* ^9 ^                3 k* c- G- D3 W1 D7 A4 Q4 K
                count2 ~  r% I7 _; B' F8 r* _& f
                0 W' I# w8 U+ ?# B) s( ^( E
                if r(N)>2 {
; H) \4 G1 [1 Q$ X/ u0 ^                 
. @$ d- A  b, o9 o, J                 pkexamine dx240 dy240  t( [  }* B; N# \3 G
               
! h7 @0 J5 K$ ^* }+ m8 b                local tempminp=r(tomc)
2 X& W) o# g( M# s3 G                restore & S+ X. M, r5 b1 `
                 }$ K! B) @- h& s8 P
                 
  Y( q! i! B5 f5 n        else {
* |. V1 z( I; j, \+ T5 P                + N& P' A% q0 Z6 V( G5 ]
                 di "cannot find minp": r: u; r' p( R& H% G
                 . p& a- o, |, G# x
                restore
, X  _% L% J; f" P" P. b  P                 sum dx240
3 X9 K5 \( |' |' }& m: R, Y                 local tempminp=r(mean)  p1 W: _  D) A+ V! w3 U
                 
8 u( D, |0 H2 r3 f9 n3 u                 }0 F1 [# l' t6 E" r. k0 w7 o
                }
; v$ H9 j1 t% Q4 I; q   else {% i$ b4 [( n6 }
                 
" c" v5 _8 V, Z8 B5 B                 keep if ddy240<=r(min)3 n: f6 G/ O2 [- _3 O% D
                 ) ]" P& T. `, \% w7 s) ^/ Q: X; j
                 sum dx240) ]" m& v* O4 e- G
                 
6 K0 q) [- B7 Y3 q9 A, Y                 local tempminp=r(min)
0 J) T; Q- U% d                 restore ' q; W3 o- Q% V( R
                 }. `6 H4 a$ d: o) D
6 _- @* @  I, d4 g& A; F8 b
( f' t; U6 p1 X+ }( l
; E' Q1 c6 f) c) k
   gen minp=`tempminp' in 1
! X# f# P! a' P1 t   *240 minp' K+ G8 Z+ m$ l8 `# U
* ]$ B" T+ @. H  }9 t4 o3 X, e. m
: Y6 K/ ?5 a& g3 W- R
   ! J5 q6 F# n/ ?5 a
   preserve
, C0 L  v' O, |# o& c   
  u! S( d+ ?6 o6 x# h- ^   sum v5 [aw =avol]
! L; ?, A) ?4 G   
5 b- M3 O$ k8 ?, C% o" l: g' W/ D   keep if dx240>r(mean)
) ?( ]) g& g3 L) W& x   
/ T+ ]0 P" m& c+ T& X. l* o5 q   sum ddy240
# Q* V2 v7 Y1 v( i$ h9 u   
- N% h) c  u' e9 U   if r(max)>0 {
' p$ p6 j. f" _0 b               
. J* ~6 w# Y: O( X6 ~                keep if ddy240>=0
! U7 l$ K" q6 r               
6 _( k; z% K0 V7 T. [8 T/ X                count
3 c2 H8 i3 v% _               
* j- ]7 q- w8 N! T                if r(N)>2 {
4 j1 Q7 g% e& l# s* f2 _' Q  A                 8 y# I* ?. J  B# Z8 U
                 pkexamine dx240 dy240
( Z5 F9 m  D0 w( k6 @                " [& |" A  r0 r+ a* E* Y; Z
                local tempmaxp=r(tomc)
8 h0 m2 f1 w) ]: A8 D                restore
2 P( c; C/ ]) i9 V; X; ]  q                 }- _& C0 Z0 U) |+ Q; t; N& Y
                 $ t9 Z/ |2 C9 ^" y6 n+ m0 ^
                 
, i' @) v3 B, B; A" o# Y8 f! t        else {
  w: u& E' y5 G# D: ~' L                restore
: @5 G- n; S0 y3 ?! t                 di "cannot find maxp"
3 \! @3 w: l9 B3 \               
% d% ^1 N5 Y5 E9 O# b                . o; K" f0 l& S2 y. a
                 sum dx240
: L7 F  [$ @: o  q! F& r3 e                 local tempmaxp=r(mean)
" I% O2 |- o! h: F( c                 
$ c& N3 o$ @/ p) v( z& p; m                 }5 _& J1 x! {) A8 A5 U
                 6 n' X, B; v4 D
                 }
6 {3 H& V9 O% ~. ^1 N+ _) t                 
  i9 ^1 Z2 b6 q3 x" x    else {
7 E6 N$ X3 j8 ^3 i! F        6 w* D0 w8 W; O' A1 c
           keep if ddy240>=r(max)
5 v0 g4 M4 `2 B4 t: h, O           3 b. T1 w4 l* v0 h
           sum dx240$ D. W/ y, m3 [1 p
          
8 [. Z# u' s6 d+ m           local tempmaxp=r(max) ; F4 H0 d# K* C
           restore ) D. [7 f  C) Z
           }
6 F! S6 l. s; v8 k, r       
6 U- r1 r& I( k+ p4 H; v4 {8 o
! i: a6 H5 y+ R5 g& |5 k  # x+ m: f6 H4 P2 ]8 P! C" i) m, u6 O
+ C! \. P0 G2 U- R: \8 o6 L# y
   gen maxp=`tempmaxp' in 1
. s# [; O/ q0 F   5 N; f# t6 l% Z  l
   *240maxp
" J. U% ?  P5 z4 C3 B( S   
, O) P9 M2 O4 R( o   7 k- l( U; q/ ~9 X) `- s9 S
   *-------------ddy240pminp左侧高峰值-----
& z+ \  R8 ~2 y: d( z5 c4 Z& \- Z   
1 h; T1 ^+ c# r+ ~    preserve
4 i. \5 i0 t/ F. B   
$ S" j3 S( }$ y2 `+ f   keep if dx240<`tempminp'% }' P4 i* {5 I3 T: a/ p
   
' S5 f. S/ |  O   keep if ddy240>0
9 M, F4 s  J1 y% j* A$ {6 a   
: U: y& e- O8 E# P   count* P  Q6 _3 W% D2 C
                ) M" d& M+ S. @9 a; w$ ~& M
                if r(N)>2 {
+ f  L/ q; q! N, I                 
; E* q. L. E# \- X4 G% J# X                pkexamine dx240 ddy240
# e2 o2 q5 Q: c               
6 Q+ Z% ]3 d2 u                local tempminphddy240=r(tomc)
* X: C  h; q! h: n                restore" ~1 U8 @" u+ ?9 e$ X. A+ Q
                 }! I; x  z9 R+ Z* R0 B
                 + f- O! r! S) B# W7 w+ X2 \  T
        else {
: L8 O& j( S. A' h; f# L                restore
& A! x3 i) P/ G: l                 di "cannot find pminphddy240"/ l/ Z5 C4 \9 I& e
                 : b* e" ?! j4 ^; |- ?
               
& d  x7 |9 s& q3 R                 sum dx240$ }8 S6 d7 y; \% C; {
                 local tempminphddy240=r(mean) # x9 D5 C% O( y( l. I! Z
               
, r4 |1 E9 X! M3 W& @8 K; q8 c2 r                 % X9 i* J5 W) Q1 f  L" P
                 }& \. B5 _: @: J6 d/ M1 F: i
                 8 d5 k% p% N6 j1 U: S3 I
   1 a# ?% G9 z* ~9 H2 V: M
    % z: N& g1 ^' m
   , f1 `4 [, l% d9 k5 n# r/ z
   9 Q- [' s' n2 r- Y0 O$ @
   
. P- a# f) [7 P, [) s4 m        gen pminphddy240=`tempminphddy240' in 1) q# f# j4 `, H% V( `' o/ W7 M
       
6 r- j7 T$ E7 n        & Z4 [9 P. X( L
        *-------------ddy240pminp右侧低峰值 -----------------
6 F0 |+ a  x4 q' P& K    preserve ' G  {( ]7 \3 |3 {0 V; l

" u- u; j: @6 ^5 q  }   keep if dx240>`tempminp'6 n: N) k/ J, \( Q8 k
   * h5 Z' `& b' W# m
   keep if dx240<`tempmaxp'4 N! X! W" T, N& P7 d, x* r
   - M( u& U- G  u- Z3 w- W2 u
   keep if ddy240<0
; {9 A' E$ K/ h. R   
$ o7 F  x1 f1 K3 I   gen temddy240=-ddy240
: a7 i5 r' X. c7 o4 k" c- k# z" F" x   
% k% x- W. a! Y( ^    count( g  \: ^# H! X2 b
               
/ l2 s' S, ~8 G4 @: e( d0 p                if r(N)>2 {4 Q3 \3 x% x3 e) K# z. ^; F& \
                 # s$ a' `) a- _, |; H8 m
                 pkexamine dx240 temddy240
7 b" \8 v9 p1 J- `: _8 v0 M+ ?   ; ~% P+ @7 Z2 Y9 ~) ^
  local tempminplddy240=r(tomc)5 b2 g/ X$ D4 g) q0 u
                restore9 [5 V/ \  P: P5 c1 n! r, j
                 }
5 ?  v0 z5 `1 B. ~& D" _+ Z                 % }, t) _: L1 t! I. s* C, S# q
        else {& T+ t" m2 P) ]; b. P6 M/ u. P
                ! J) k4 p3 W6 T: K/ F, H3 s/ k
                 di "cannot find pminplddy240"
) s* i$ k' T8 l, v- H% G3 e6 E                restore' c3 L2 y) X" [- h/ [8 W% U; S
                 
9 Y8 {" N* D9 p                  sum dx240
3 m$ n* N4 C) D  u% ^                 local tempminplddy240=r(mean)
! D/ r, [/ s- K) H4 @* C                 
; B  K6 x+ }0 [( Z                 ) _6 r& }) k4 y) k
                 }
  r/ g. H* i. m$ v7 _; L   
+ F3 u) e; ?: D2 y- D5 q   
2 g5 s- }" y6 b+ y4 j. s   
* j6 b* e1 _4 Y' |   $ X' K- S4 i6 v7 ~* L9 Q
   
0 W" u8 J: O0 Y$ E  Z, D, P        gen pminplddy240=`tempminplddy240' in 17 m5 l5 r# S: @
        * m  H" [1 V7 k! }$ }) I
        *-------------ddy240pmaxp左侧高峰值 -------------------/ w5 Q0 W" I+ s
       
7 e+ Y/ Z  T$ e* f3 w; }5 b         preserve
& z, Y  K1 H1 Q   3 y- c! c& R) |/ ?. [( q
   keep if dx240>`tempminp'
" r. Q4 T# E+ u! \1 R" d   
6 ~# i" d3 E! a  x0 [   keep if dx240<`tempmaxp'# u; p$ |( G+ W& k' k
   % b* a# w9 s: l
   keep if ddy240>0: ]+ D0 S3 `3 G: n" c3 x
   count3 p& z8 k! r+ e0 {7 a; q* c
                  b' Z! [, o4 E9 N
                if r(N)>2 {' s% t; u7 e, g( r& u& C
                 
+ t+ S: j9 B- I, K, U) i; C2 s                 pkexamine dx240 ddy240
& }0 W) Z: i7 k9 q$ |0 v4 m   # ?4 W% R4 I, V9 [5 t% z
   local tempmaxphddy240=r(tomc)
! p; x' z$ e7 g! N! O   
1 O2 n6 D, t8 L+ K* e" u* s   restore
9 ~) g3 w  l( l1 ]                 }
* N# [) V; v' v2 G# C" k; T                 
2 D/ q9 p8 C6 }- h  p" w        else {, ?5 I* M% \5 o( O2 J
                4 n& H) s" o$ h& A8 ~
                 di "cannot find pmaxphddy240"
+ Y; h0 D* k% o7 b8 w6 P                 restore1 e/ ?# k" N9 A# `. A
                0 E, r5 C2 W& w: e6 B* J5 [* ^) F
                 sum dx240' }: A1 _+ ~7 |' _: r0 B, G
                 local tempmaxphddy240=r(mean) 4 T; @7 t+ {/ X2 @4 I9 t, g% T
                 
. ^6 F- w+ j2 N1 k; V4 N                 
! p) a. n  `$ @; N7 H                 }+ y, t3 b, a# o8 r( N
   
0 h; T5 H/ P$ C' y* w   
! [. {6 X. Z( l3 [. h    3 U) ]$ a6 G! q# m
   
2 t8 C. d) {& J; f   ! b( L5 q3 B- o$ W
   
. n  t% l* D2 {' K        gen pmaxphddy240=`tempmaxphddy240' in 1
1 I+ q2 @( Z, n: _3 ?        $ \6 f- P$ ~! u& p+ u2 \) E! p
       
1 ]) S  A( C" q/ y, `- [2 j- n        *-------------ddy240pmaxp右侧低峰值 -------------------( q" o  k1 B% [3 z' i( n7 r
       
0 w$ |0 h% D- O& n& E8 j0 a         preserve
& u* H  j9 v8 a  ) q; g: |4 K/ Z' G) ~
   keep if dx240>`tempmaxp'
! a" t' ^, S, o, p. ?   
0 h6 _! m% i% p* g0 K   gen temddy240=-ddy240" Q7 h8 u- h, K4 ]! [5 j& P
   
0 e2 T+ |2 X' A   keep if temddy240>0
, ^3 T$ b) y7 b8 ~  _   2 ^7 e9 P& [  g
   count% E; H. L/ i6 [4 ^
               
7 U! ~+ \+ j* b) q; `" N: L                if r(N)>2 {
) j, B: S1 y* z3 o  {* j                 
" s5 d! ^! M# f/ }# X2 `" z                pkexamine dx240 temddy240
3 ]/ A- A* q. K% v3 T. r* \  H) m- P   
, ?( q  h$ x+ [   local tempmaxplddy240=r(tomc)
8 t$ d, U' y) q, `$ p   restore
$ h) t3 P1 G/ h( N: t                 }6 c9 a+ F% B& \4 W- V8 f9 p
                 
% N2 t# [# V# E; B* H        else {
, W/ {4 |, M- y6 c6 A3 o& y                restore
. S' m7 L8 o: D( S( w# l                 di "cannot find pmaxlhddy240"
. k+ b. N! w& Q5 w* N# L9 L                 
2 Y# m! ~5 T  Y! L) h# A               
8 q2 ^8 j: K; L" x8 f                           sum dx240
6 j& g$ {  N5 q7 I                 local tempmaxplddy240=r(mean) in 1
) U3 E, j8 W2 N' \8 o2 h( H3 B                ; ~" z/ x( Y6 M2 o6 V
                 ) q4 {' c+ `* r! X) h
                 }
2 N. }$ j* B' R; U' ~! R   
' [3 e) [$ T4 i4 H   
" D) n, y& \- w; K2 ^8 g# h2 s: v' q1 `   
& f( z2 W  D; o4 p   
7 ?" H% i! n# T9 W6 N   
. k. s: N- O7 g/ n  k6 s   
$ J/ ]4 _2 h  v" i- j: j        gen pmaxplddy240=`tempmaxphddy240' in 1
' h8 H  V/ y' |8 J        ; n5 z0 ]3 l5 N5 c( L
        *-------------------------------------' G0 \, T( h6 a9 o3 o* P. N
   
! M% m' V/ V% l! @; c   gen price5d=v5 in 1/201 w; o' {& z! y' Y" K' _! i
      
, R; `, n  K' M. f- v   gen price5yy=_n in 1/20
/ {3 v4 T8 @* D+ E5 {, A2 ^   ; R) {" v4 J. ~( _& X6 ^
   gen price5y=price5yy*(dy240max-dy240min)/208 u: p) N! A( w! Z
   : I8 R! J) B5 I' F* g
   *price5y &price5d
  `3 Q$ s' F( g   9 S+ Y7 o& l& C% {5 q, [
   gen priceny=price5y in 1
0 h& D& a: [" q# _+ s$ N   
2 G3 v- t$ \) y   gen pricen=v5 in 19 e6 @' O" V# a; S. Y0 d
7 t  M8 ~% i9 o3 Y; ^6 e! P# R
     
9 L7 W- M5 ]% x4 l6 k" G! c7 v' J& B   *priceny &pricen
$ C( l3 v& C% x6 j' _   9 H& T2 U: u3 J, {
   
3 M) a: R$ v1 I   *-------------------------graph------------------+ E* i% B) V* r/ K' h
  * K: q/ i# h, b
  tw(line dy240 ddy240g dx240)(spike yxis mean240, lc(red))(spike yxis maxp, lp(-) lc(black))(spike yxis minp, lc(black)) (scatter yxis2 mean240,lc(red) msymbol(+) mlabel(mean240) lc(red))(scatter yxis maxp,msymbol(+) mlabel(maxp) lc(black))(scatter yxis minp, msymbol(+) mlabel(minp) lc(black))(scatter yxis4 pminphddy240, msymbol(O) c(l[-]) mlabel(pminphddy240))(scatter yxis3 pminplddy240, msymbol(O) c(l[-]) mlabel(pminplddy240))(scatter yxis4 pmaxphddy240, msymbol(O) c(l[-]) mlabel(pmaxphddy240))(scatter yxis3 pmaxplddy240, msymbol(O) c(l[-]) mlabel(pmaxplddy240))(scatter price5y price5d, msymbol(O) mfc(black) mlc(black) c(l[-])) (scatter priceny pricen, msymbol(O) mfc(red) mlc(red)), title("`f'") xtitle("`1'") ytitle("density") legend(off)1 ^8 _6 s. w# L4 x

( ^$ }. g, w9 l! f: x8 w( N0 g* ---------可选项目----------------------
& U  w# F* k% Q) m- V*(spike yxis amean,lc(blue))(scatter yxis2 amean, lc(blue) msymbol(+) mlabel(amean))% A: w; }& N( R( K7 _  K" l
}, {# M* T! B* I2 h8 }* U, R' D
end
( R, }* ^( T8 A

该用户从未签到

66#
发表于 2013-2-7 00:03:44 | 只看该作者
awer 发表于 2013-2-5 14:40
9 S8 P* v" X2 Q+ ]6 v抱歉,最近太忙了
  ~9 _  T$ ]) l4 Y% e- f1 b+ [. B4 u! P* ]
300236 我用下面的程序试过,没问题
0 W4 K2 m; [0 N1 U( h6 {
哇,谢谢,我仔细看看,这些字母数字代码晕了- B- M! y. a3 ~5 h" h) }& _/ Z

该用户从未签到

67#
发表于 2013-2-7 04:05:03 | 只看该作者
stata是不是商用的,R里应该有类似的东西吧

点评

老虎推荐的一个处理数据的软件,很小,只有10m左右,很好用  发表于 2013-2-8 01:27

该用户从未签到

68#
发表于 2013-2-8 07:16:33 | 只看该作者
awer  老虎推荐的一个处理数据的软件,很小,只有10m左右,很好用  发表于 5 小时前
  i! O: v* {3 A# Q
' \- {* b: h* `% i8 F2 R
这东西是开源的?知道有个统计软件叫stata,不过要收钱。

点评

就是那个,找破解版  发表于 2013-2-8 09:15
  • TA的每日心情
    郁闷
    2018-10-21 12:19
  • 签到天数: 7 天

    [LV.3]辟谷

    69#
    发表于 2013-4-17 17:14:44 | 只看该作者
    准备试一试
    5 ?4 K4 l% b4 y0 W1 k先找Stata软件
  • TA的每日心情
    郁闷
    2018-10-21 12:19
  • 签到天数: 7 天

    [LV.3]辟谷

    70#
    发表于 2013-4-17 22:21:02 | 只看该作者
    本帖最后由 汉水云潇 于 2013-4-17 22:27 编辑 " Q( G2 b' E& }, N0 O4 {; N$ _
    & y. L' y  w9 X+ T0 n( m. K7 `
    晕呀1 D# c5 r! ~5 V6 A1 w- H
    论坛复制程序代码
    , z/ c- q4 c) e" y2 W乱码夹杂在其中. J6 h& Z( x2 @/ M: K9 ]
    很烦  [( k6 s: d) V4 p8 v0 u* F
    对了两次+ J8 E' ~" f5 e" d* a8 u$ h
    以为没问题了
    % W+ P1 Y. l' h' _( P4 y' W, Z
    2 I, i, ^7 n8 k! E! S3 b结果/ x: F$ s: K) Q* j6 W, g0 }
    执行后, I: m( w/ A$ `9 M. z
    还是出现  k2 j4 a+ `. Z, b# ^/ n
    r 199
    4 S) S2 R7 U, U: Y5 K4 q, f4 P1 W的错误
    ! c* J. }3 @# }$ }) ~& v; X9 N
  • TA的每日心情
    郁闷
    2018-10-21 12:19
  • 签到天数: 7 天

    [LV.3]辟谷

    71#
    发表于 2013-4-18 07:50:56 | 只看该作者
    试验成功,下面是三一重工的图1 C8 w! W( H3 N% ]5 q' _- T5 R8 T

    0 q( }* p9 V1 }* T

    点评

    我的怎么没有红点? 三一上市以来的成本才1.8元  发表于 2013-4-18 08:02
  • TA的每日心情
    开心
    2018-8-27 15:57
  • 签到天数: 2 天

    [LV.1]炼气

    72#
    发表于 2013-4-26 12:46:50 | 只看该作者
    先用用试一试,不知道准确不

    该用户从未签到

    73#
    发表于 2016-3-12 15:46:06 | 只看该作者
    噢。。。这个帖子好,比较直观。
  • TA的每日心情
    开心
    2018-10-15 15:53
  • 签到天数: 80 天

    [LV.6]出窍

    74#
    发表于 2016-3-21 23:51:14 | 只看该作者
    这个帖子值得学习。
  • TA的每日心情
    开心
    2016-1-11 12:47
  • 签到天数: 2 天

    [LV.1]炼气

    75#
    发表于 2016-3-22 10:41:13 | 只看该作者
    感谢!!!
    回复

    使用道具 举报

    该用户从未签到

    76#
    发表于 2016-3-23 10:23:05 | 只看该作者
    明月回春 发表于 2011-8-13 20:17) A) U6 O% ~/ O; ?  x" l5 r
    程序写的不错.
    ' M5 F7 v7 ]+ W+ X+ Q& [不过有一点要注意.通达信导出的数据,只对价格复权,并没有对成交量复权.所以数据需要手工处理 ...

    9 t: r) N! D$ U& U& a# @  [4 q老哥,也是山寨这篇文章找不到了,不知为何?

    点评

    日久年深,早就忘了。见谅  发表于 2016-3-24 09:24
  • TA的每日心情
    慵懒
    2019-4-17 22:04
  • 签到天数: 633 天

    [LV.9]渡劫

    77#
    发表于 2016-8-3 13:28:29 | 只看该作者
    提示: 该帖被管理员或版主屏蔽

    手机版|小黑屋|Archiver|网站错误报告|爱吱声   

    GMT+8, 2025-2-19 06:18 , Processed in 0.043758 second(s), 21 queries , Gzip On.

    Powered by Discuz! X3.2

    © 2001-2013 Comsenz Inc.

    快速回复 返回顶部 返回列表