设为首页收藏本站

爱吱声

 找回密码
 注册
搜索
楼主: 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 3002369 r2 j- |) J( R) z% x* h' E" u$ O
statement out of context
* X" _" a. z* S+ I) ^, j3 h; C" xr(119);' H- e( o# d3 t- X

( d9 g2 h/ H. \  x& Z% p5 O大师 就是这个

该用户从未签到

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

该用户从未签到

65#
 楼主| 发表于 2013-2-5 14:40:59 | 只看该作者
maodeng 发表于 2013-1-28 13:13 " L6 Q7 l; l6 m' ]
. hello 300236
9 I) b# r* s! |0 |" qstatement out of context
+ v* F( a0 m" g$ G0 _0 tr(119);
; R: l/ J( y; x& |) _3 P- p7 N2 O
抱歉,最近太忙了
6 t, O  E  T: P9 n. W# m; P3 P/ o0 E
0 w' e) a( {. x7 }4 P% y300236 我用下面的程序试过,没问题
" s+ T* \& E( m, X& i, a% N; Y3 _  D8 u
你把 D:\stock\test\source 改成你导出的数据存放的目录,再试一试
1 J" J$ I  ]0 \, V( n: S
% r6 c3 W$ n8 t9 Y+ _capture program drop hello
4 ?9 |& I& R& x) q! M/ s! u+ [' H* s2 t( ?
program hello
; h* b' K7 u. u% u& @5 k" q# R" Z( N1 p
quietly {
/ i! [! t/ E' J
- O* U6 [; D# \0 a+ c, `" t% ]clear  q- S% j# A" P

, H7 A& f0 b+ T- e" ^cd D:\stock\test\source
5 g$ q9 f0 W. R  x( \4 \: P5 {; j  A; B  t/ e
insheet using `1'.txt/ p' M1 W2 j" D' C/ X
. L; U: N8 g* h
   keep if v5>0
6 }; {" w7 K+ S* b% }   
8 {( W! N' F  v! _3 m& `   gen vt=_n
1 r; B* Y, \( x. a% M1 O   " }  r% k: p5 W( {3 u$ k4 Z
   tsset vt$ u$ ?8 p0 r+ x: y3 V% A6 x% B5 r
) g% {; |4 m# f: v
   gen zf=D1.v5! v& c/ X& |% h5 o* n
, M) c/ @: o5 e0 l/ l
   gsort -v1
/ o# ~; t: z" A3 T( m5 X- R4 H/ _9 i# H
   gen avol=v7/v5; U8 H1 [' u5 Q  B1 m. v. u
   
+ U7 ^7 j3 r8 A! x6 i5 x   keep if avol>0
0 l: ?  R" ^) C6 I3 j/ M   
, C; Y+ L$ K9 g# ^% D/ h# m   drop vt
4 t$ \* d  T$ S" H# r  . N) {* s/ I1 K$ S& I
   gen vt=_n
6 ?1 a, U; Q/ X! k   $ x* k9 g- L7 z+ b& S' g
   tsset vt7 J1 g9 X) t2 T7 J
     {+ @) q$ d. e
    sum v5 [aw =avol]  Q! {0 F% T& e- M8 o/ Z

9 z% t  Y4 n; B4 _   gen amean=r(mean) in 1
0 v2 A9 c7 }( ]. A   & Z; Y) K/ t! Y, }% u( T5 L
   * 总加权平均值 amean# X- a7 V: I9 G7 d  i& g' g
   6 s, E4 ?! I) _, `: _
   $ G( L) _' E" ?( Z* X
   keep in 1/240! l& f$ ~0 C) {) D2 {7 I3 |
' a8 e: r4 T7 E; `* E
   sum v5 [aw =avol]4 p4 d8 U: b3 C" G* k2 h5 E
1 G! S* o' _) [: y# ]
   gen mean240=r(mean) in 1+ o0 `* R& `( X! J
   
: M. B# j7 F1 p   *240加权平均值 mean240- {% w1 n, j6 p# c# `
   & W0 X: o+ F3 f7 r/ R. F1 {- R
   set obs 500
4 p. o- ?/ K, n& K4 S; B/ r& r   
$ X( m+ {6 Z; Y. K: D   kdensity v5 [aw =avol],gaussian n(500) generate(dx240 dy240) nograph6 e% b' i2 h7 l4 Y7 C' L7 L
   
5 Y' Q7 W8 R" o   *240 kdensity(dx240 dy240)% A4 y. y9 ~; |: v) Z, v: J" `* n  q0 ]
   3 d: e; |* b  R; k: g! O
   sum dy240
( k+ M3 O% q" `( V$ M& O& @   ! C# S* L0 p  q
   gen yxis=r(max) in 1. H5 p- ]5 |; V$ }
   ' l! r& i+ |& Y
   gen yxis2=yxis/28 @& O1 _! F9 w1 b3 Q3 `( b
   
, H' A/ x0 |0 u   *yxis$ _( d; M: K3 Y$ G4 A8 a# n
   
. {4 S2 J9 ^9 K   gen dy240max=r(max)" S4 [+ I- O) q$ Z% l
   
3 X9 z7 v0 C  c+ n; Z8 I   gen dy240minp=r(min)
/ @' T& |/ r" x; O
, Y8 t  s# K. I2 {) o0 ~$ L    gen vtt=_n" s( s& q& ]8 E/ U* w

, z: Y  b8 [9 l5 Y* j( ?    tsset vtt
; |: d$ H, p5 p( E
: s& d  K8 c1 _- u9 ~' y6 ~, i0 R* a* u   gen ddy240=D1.dy240/D1.dx240
0 B2 M+ t5 m% ^: C& |# V( [   + f% M! T+ b$ P8 v
   sum ddy240
: v) @* K0 c  ]% x1 K( `7 g   5 T( ^  Q& x! R
   gen ddy240max=r(max)  a) a" t# V2 B& h7 B7 Z7 w+ U
   
! e& o4 J* T% M# p( H" d" A. A4 v   gen ddy240min=r(min)* F. U* k& B1 G! y1 g
     
1 L/ D2 |6 v) l& P! _2 Y# Z   gen ddy240g=ddy240*(dy240max-dy240min)/(ddy240max-ddy240min)( j* m. e: V, {3 u5 m" [- P/ N. {
   
& x7 c; ?9 q$ [, f1 E   sum ddy240g. Z( |: H; g) w" |7 P) R
   
4 {) h9 g/ I" \6 E, o1 ?   gen yxis3=r(min) in 1( {3 x+ T! b& f4 }& C
   5 r2 o) `0 j& R: I. ]
   gen yxis4=0 in 1
* z, U+ Z0 o' m7 v) q! H# r6 S  : d& [3 G( \; \! E0 d
  *ddy240g
0 {# K( ~0 o' |( w/ [6 O( o   ! O/ @  X( {6 p. |& X+ O4 `* m
   $ w! r2 B9 n3 v- j' I; y
  preserve
7 T! o6 t/ f- C1 k  
7 t" p9 x& W& i, C  sum v5 [aw =avol]. @. @" ]5 Q- o
  
9 X9 I: r! w7 K! f" M+ _# {7 D  keep if dx240<r(mean)
8 {* ?! g, b3 _  ]! l3 n! t  $ v/ |0 x' C$ G3 Q$ U3 X
  sum ddy2406 M- t, W8 g5 L' k
  6 N' x- @8 t  _, e/ }: ~3 T+ }
  if r(min)<0 {
/ M5 z' J8 [9 \/ w- x8 V5 i/ ?        
: Y7 }. I: S; o1 Y6 y                keep if ddy240<=0
# b  D& b  y8 T5 K5 Y5 ~                6 u  O: j- j! [5 ~" O' L
                count
! g6 ~2 y. y- N$ o  V               
9 u7 w7 Y/ P  c- w0 O9 V                if r(N)>2 {
+ T2 j: g& G$ X5 y. M4 u- H                 
& D2 [* C4 f: p$ X, N* u$ Z                 pkexamine dx240 dy240* A; r! _$ ?) ~4 \$ P
               
% |2 x+ s7 j2 @& N3 u4 u                local tempminp=r(tomc)/ t! U' C# X$ N' `
                restore ( s$ @5 I) ?* n* \; K
                 }
. {8 F8 Z1 J! M% i& _2 M, J: r                 2 u; }1 ?/ k8 m0 A% `
        else {
9 G0 |( n* l# c; Z- l               
4 I2 W5 m7 }  c# r                 di "cannot find minp"
( ~; l- J% e$ c                 ; v. ?5 a  x4 P
                restore   ]9 P- U$ h9 C8 N; O8 @6 a
                 sum dx2401 K+ R6 r1 w' @5 @# }
                 local tempminp=r(mean)
2 M' d! }# B$ P! g' N( B                 . x6 U- I' i! t6 z' b4 k  p
                 }
! H3 m+ K# J0 A, z0 _                }
+ w4 E' }: T+ L2 Z( Y, K3 C   else {
" b. v# l* Z& R$ ~                 
% |# [1 J# X0 G/ p6 G- P+ S                 keep if ddy240<=r(min)+ E0 k" T2 Z0 Z7 w8 i7 V2 v
                 
; j1 t: d+ G. L                 sum dx2400 B! |0 L* D- }# \, X# m% ]
                 0 k3 F, q. X6 G: p% W9 x4 G
                 local tempminp=r(min)+ X9 R  G: k: |  ]* H' \) y
                 restore " h; W) }& ?4 \3 t% B
                 }0 X2 @" c% S& g  H  j0 U
. t3 [1 `9 {! z
0 E: }. [1 [1 _# v* P  t7 w( ~0 j

% g3 I/ ~! S) }$ ?   gen minp=`tempminp' in 1
3 w8 T$ ?2 {* |" M: d9 l   *240 minp8 V; X" v; |4 x) T

5 Z* b* W7 X& T+ D+ Q" m9 R' h: C3 s" u4 h6 N6 P: R+ `7 @
   , R% f9 k" n% B. A- \3 U/ X1 }* a( B
   preserve 9 A7 Q& C7 I& t! d% R* ^* S
   ' t3 [7 L! v' g/ _) _. v9 U
   sum v5 [aw =avol]6 N- }0 S3 K% z. [
     Y: n2 D' @% a' i. l
   keep if dx240>r(mean)7 c0 `$ X0 G  b* _! N4 Y
   
( O. Z6 ^1 Z5 p2 ~* t0 M, l3 z' ]   sum ddy240+ w4 y9 k6 P2 w1 I, j( u
   
5 \( [3 b6 H5 i* Z1 G$ P   if r(max)>0 {
* J+ O1 P2 a9 J: S0 n, n                ) O7 @3 L* D# R" k
                keep if ddy240>=0
0 W/ L( L+ h! a9 r, v8 ?( Y9 J               
1 Z9 M' j/ e4 |: |$ J: C( h                count. }% x8 @4 f- s9 X- M
                - [+ X3 d( B* R& P
                if r(N)>2 {
+ g* {: L" W9 Y& {. q                 
4 A& q- F9 N* y- A                 pkexamine dx240 dy240
7 q8 n( H( ]0 C, X  i6 Q0 f6 R               
5 m0 ~, Y) [$ E) y8 W$ f3 B" w" a                local tempmaxp=r(tomc)
% J, J' d7 p1 x- [5 S                restore / _. G6 D# b9 t8 s% @$ P/ L" g
                 }
! s1 m, Y4 R/ f  {: z' U                 # a8 R: D- F( z' ?5 b: G
                 / n6 |" w8 I: H% E
        else {/ n* r6 g. I9 W1 W6 o4 u% S0 `
                restore * v8 H4 g; V0 l# S
                 di "cannot find maxp"2 U8 Z7 Q2 z; Y* s/ K
                5 s( \  N  R3 f- j- C
                : v  x. ?) p0 T; H& p' V2 L
                 sum dx240# H5 ]$ x% o" i
                 local tempmaxp=r(mean)
3 K5 s! F; ?) d" F/ D! |                 7 [& M2 {0 C1 j1 |
                 }7 b. G2 N- T* X3 H  g6 j9 w
                 
' v% F. Z; M7 W& y                 }7 L: P* [2 k4 H
                 
  o* W9 c& l* m6 i    else {$ o' {1 C8 R) a$ H8 _. @
        ! _( f' r, _! n2 o5 U. }% B; v
           keep if ddy240>=r(max)
$ \; s1 V% ]( O" b: J# x          
  J9 u0 H( b7 X5 ^: l+ j6 s9 S* r& Z           sum dx240
: Y9 ~9 w8 E  a6 O          
* L! I  C' }2 Q7 X* |( l$ i1 L8 h           local tempmaxp=r(max)
# F; j& V  l1 R4 [           restore
4 h/ e; s8 P: T0 c           }
* Z1 k7 {, k8 k        9 d3 E: A, |( w  ^: J' v2 h- [" Z

8 z& Y+ k/ [  I8 f  ' H8 W* G+ a  s4 S

8 Y( t: r7 `. ~  O) ~1 [7 O$ }   gen maxp=`tempmaxp' in 1
& y) d) H! v2 N6 N2 U- U- ]   
! v+ i: C, t6 Y; n   *240maxp
8 }* U, {6 {, c. a) i1 |# q9 C1 M   
) s! o& ?5 l* y- q% [% n9 c8 L   
$ N5 J7 [- ?8 L, m! M   *-------------ddy240pminp左侧高峰值-----! t9 Q  v& Z9 e& r/ Q
   + D# y5 H. T5 m8 U
    preserve
3 G, `: u& O- ~, x' c! t9 T   
/ {! O* I; A# _$ }. F5 m   keep if dx240<`tempminp'3 e* V. C1 ~4 _. b( q; n" n* r4 p7 y! V
   
: ^4 a& E4 ]3 v& b  s% N: Q$ @   keep if ddy240>0
6 k1 S1 M3 I4 s2 ]/ ~   
' \3 d, A1 G' F   count
3 C' R/ B% q: S* o, d. H               
% N+ D' k3 ^- V                if r(N)>2 {# v! M9 b8 n1 g" N" h
                 
, ~# B: f+ l) u+ A                pkexamine dx240 ddy240) W! X$ s, [) y% U
               
, c, X7 F7 K" F. l: Q  J1 V$ {                local tempminphddy240=r(tomc)
1 e( z( \, U& T, F                restore' m6 D( L/ U1 G
                 }
2 x2 M% ?5 t* Z7 k                 # O* I1 B5 b  D5 i
        else {
- ^5 U% {/ z2 [: Q$ l* f) y! `                restore
; F* {0 T9 K' v+ g                 di "cannot find pminphddy240"
, a, W, q3 O. w8 s8 Q8 r7 g4 @! y                 
2 y4 l$ b  a8 ~  Z/ @% B: S( Q( t% P               
. `+ r/ S3 ~% c* K6 n0 v5 V                 sum dx2404 G& X4 n" R4 q, G7 J; x
                 local tempminphddy240=r(mean)   ^1 A  x. W7 n+ C
                " D% [3 v4 y8 C7 I' \
                 , [8 m7 F7 o. \4 r/ M
                 }
) ~. w9 O* m1 G/ S                 # O* l2 [. y0 h" B* ?  U4 x$ k5 H& }5 G
   + E4 i4 \& t& d# w& v
   
9 F, [) {1 C! V% K, w- k/ C   
# H' P: a) W( L& Z2 p   - u6 H6 J0 A; h+ u# A4 U) W
   
: X7 z. [2 J5 Y4 G* S' ~. X, X        gen pminphddy240=`tempminphddy240' in 1
9 m0 M: l2 x- v  P        1 `9 G! k& Z5 R, J% a
        ) S6 x. O* [% Z
        *-------------ddy240pminp右侧低峰值 -----------------/ Z2 {9 c4 E$ o7 s5 S! B( L& Q: B9 F
    preserve
7 O$ x/ D: c  E0 ^! y ! j! Y" D% b3 v: R3 @" h/ h- {. d. }) V3 x
   keep if dx240>`tempminp'
6 N  j7 A' V& x3 ^( S   4 d' U' v: x# f
   keep if dx240<`tempmaxp'! M* D: y; O( a
   ; Q8 K; a; m. @  T) h9 k$ O
   keep if ddy240<01 ~4 y5 w( o  Q  [# N- k7 P& C
   , k: Z2 w) F/ k
   gen temddy240=-ddy240# v2 M, K+ B+ w5 w8 y
   
0 |3 P' X0 \( Y& [$ W8 a2 [. w! Z    count6 e4 l, f7 Q- a! _! P" z
                # \  N1 i0 Q6 O" `- ~
                if r(N)>2 {
; I6 P4 {3 m# D9 S3 Q) Z3 q" r2 S                 
# ~3 q; B1 g/ D2 R2 a! r5 n                 pkexamine dx240 temddy240
/ L  @6 l9 _' b. v1 n- d   8 I; M. S0 F; Q) R: ]( Y
  local tempminplddy240=r(tomc)
9 g. t. Q- y. g  N+ a4 m( i                restore4 {/ i+ a. v& c0 _9 F7 T& b' }
                 }
, ?( `1 n7 k" s9 u& |1 Y' e                 ) U: a$ M+ k" h. [3 P
        else {
( U+ V/ h" A/ E6 }% u7 j               
) I1 ?: ^+ G5 ^) o% m% g- _                 di "cannot find pminplddy240"
1 P  O' F/ T  Z2 K; {6 q0 Q9 i                restore3 {6 f. p1 j# M  r, c
                 
4 ]) q$ o) m4 t! x                  sum dx240
3 [% I( n! _5 ]$ a( r                 local tempminplddy240=r(mean)
4 ]4 I, b( W& u7 F6 n4 N+ z5 N                 
" X+ }+ i- X5 X/ A% l! V- d" L1 B. F% ~                 7 @# Y' ?  I6 z$ x
                 }
$ T1 P' B0 t7 i. ?   
' w7 A- C# W) e1 [7 e3 P   
& H5 L/ t6 p$ N5 M  v! V   " K# Z, c0 |5 j4 L* M) f+ ?- A
   " \2 ]3 r2 {" E+ ^# ~
   
/ @* m8 H5 _: a; u$ k        gen pminplddy240=`tempminplddy240' in 1$ L9 e0 k; |" H. ^: `; j" ^
        : R# L2 m% T# L$ J
        *-------------ddy240pmaxp左侧高峰值 -------------------
1 a3 @$ ^* D  G0 e        : t3 \) _* u: }8 r& v: z
         preserve 4 J( C, C, i6 |) M1 K
   
# C$ @! c1 E+ ~3 T1 s7 J   keep if dx240>`tempminp'
8 {% V; \# k" y   0 L( H6 G. E& ^) l7 g* g; k
   keep if dx240<`tempmaxp'
% b! Z' I/ x- x" z   , x. F' h3 n( ^' `; y# c$ c
   keep if ddy240>0
3 x5 R/ I8 ^; V% H- x   count  F# G( C* p/ N- \, a; G0 m, W0 b
               
; t; E$ v: ]* {3 y* e                if r(N)>2 {
5 c; b1 B# E: c" i; q                 
1 r+ h5 Y. K8 K6 n7 u7 Q                 pkexamine dx240 ddy2407 _# y" W  G, x4 ]) j
   
0 x. I: ?; N4 r4 ~$ H' g   local tempmaxphddy240=r(tomc)
% _6 J0 B9 E$ p2 a# Y) j$ V( y' _   ) z9 [! O) I8 [, v" O
   restore
7 r% f7 N6 w3 D/ q                 }0 q' q' T* G9 s& ~, T
                 9 Q8 b' j# {1 D9 V; h
        else {
+ D, f3 s3 b" z( U8 g" l* \. _               
9 T. o, w6 T0 j                 di "cannot find pmaxphddy240"" t4 ?2 p6 L" J! j8 ^
                 restore' N" B$ w' ^3 g* g4 A2 V
               
4 q& `; C6 i! E& B# b& a' Y                 sum dx240
0 w) U/ T3 w- A9 g& _$ C) C! B2 B+ M                 local tempmaxphddy240=r(mean) : }$ }% [; E' R* k: ?% L" T
                 " b# x$ i: j  ^2 ^
                 
, ^. f/ w$ ]7 H0 v# e                 }
* N+ ?2 }; ]: V8 i- f8 |% d   % w1 u7 t5 ^* ^) X! m3 _
   & Y% Z: r' E* w( H$ d- [
    1 X4 i  c5 B- N$ D) s7 t. Y- U+ h
   
: w4 z5 |; [/ ~   
0 O9 f! ~8 }, `: S+ i   
5 W: z9 @2 i$ Y4 j        gen pmaxphddy240=`tempmaxphddy240' in 12 L2 d" h. I7 R
       
5 G' a2 V+ y" H0 B1 Q( X4 z$ |        ' j& ^! b- D3 Q, r% i
        *-------------ddy240pmaxp右侧低峰值 -------------------
1 o3 n* \- M: j% s: F        0 c3 T- \( _7 O. T
         preserve
! d+ ~/ Q% `0 a! i# I0 \  ' B* l" ^  }6 s1 e* m- t
   keep if dx240>`tempmaxp'3 s. \5 C3 p# r
   
( o/ `. e8 L) G8 l4 z8 w( c   gen temddy240=-ddy240
+ \- m3 p& o' Q. }8 u   
5 H* N! B# B6 g0 c- R" X4 o' y   keep if temddy240>0
& @+ o6 T/ b/ l" S& J) |# h   
/ u2 L- [6 H" _2 Q: U   count
7 ]& C& r' x! D6 ?                * P) l$ K& |3 @% ]
                if r(N)>2 {  r$ z- E) v/ P+ }+ f& o) Q4 K
                 2 @3 G. X' s! w
                pkexamine dx240 temddy240% v$ H8 o5 x: D/ ]
   0 o7 ~' |3 i* w& w
   local tempmaxplddy240=r(tomc)
) r( U# q% s0 w2 U( Q6 Y* x   restore. }& s) s8 y: W& @) E. h
                 }6 N$ L% O' T$ |/ S
                 " `- B  w" I' \- o6 R
        else {# ?) m* Y* m2 |4 ^' C
                restore* i$ X3 R9 W0 U1 T8 G$ x
                 di "cannot find pmaxlhddy240"
. I, s+ ^& s1 J6 l                 # h% J3 A, }" ~9 }
               
7 G0 |+ t. v5 \6 |& w. [* B                           sum dx240+ G- Y3 k) S% ?7 d; {
                 local tempmaxplddy240=r(mean) in 1) O  L! u" B; [3 L/ F* H  k' h6 M
                5 W8 Z7 u( P3 M" M1 F: s* }
                 7 }9 a( B3 D0 I
                 }/ r5 A7 [8 _2 O  r& ]* y1 O# p( q
   
* U/ c& @7 W0 L  \* w   
& h1 z! A/ v5 u' q* J1 n    1 I9 {9 B$ o9 R3 o. [8 A$ K8 Z& q9 p. }
   
( t' J# t& x% }( Q9 @   
% P% w6 L: Q, B0 ]   
! L/ |& U9 A8 e8 S5 D( u        gen pmaxplddy240=`tempmaxphddy240' in 1( J( M& T( c, ~& ^. l" c
        ( R, |0 ~+ R% G  K( Y$ s/ X
        *-------------------------------------; s% e1 f! A) D' s3 S3 t
     ~$ I! L" I& f/ }  p5 _4 i
   gen price5d=v5 in 1/20
8 k9 ?: Z/ q. t1 q% f& I      
" A0 {$ t$ r9 k( `   gen price5yy=_n in 1/20
) Q* f. V- b: {   ( \; s5 C4 N; i! k
   gen price5y=price5yy*(dy240max-dy240min)/20
$ K$ K! Y& [& P# t2 D4 U   
5 l  a  j7 p/ h9 ?8 t1 c   *price5y &price5d1 z/ d) X5 @* K$ {1 c7 M
   5 m2 r0 D+ {6 L2 D. g8 l
   gen priceny=price5y in 1( U. F/ }! d# f: s3 X
   
6 ?% M! {6 q( A- o$ ?: ?1 d   gen pricen=v5 in 19 [7 Z9 L  F$ h8 ~

6 b( Q2 e0 ]; Z4 {( ]- q* A6 |     $ j6 `( Y# N$ k# v* O' a& i+ F( q, A
   *priceny &pricen
$ O6 E7 p/ N6 @* ]   
8 v7 u6 _/ [) v# o/ ]0 p/ U   
" d8 x5 ^) ]8 E   *-------------------------graph------------------. R: e7 G, J/ L4 V3 C9 _+ x  M
  + q. |5 W( D0 A' E$ y& T* V  I9 t
  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 z; l; d  c9 ~( T. g( Y1 q( Z: Y6 ]% ?- w1 @5 P' t. P
* ---------可选项目----------------------$ r7 d# k, R9 E% y+ o1 u
*(spike yxis amean,lc(blue))(scatter yxis2 amean, lc(blue) msymbol(+) mlabel(amean))
2 K9 ]2 X- \0 `: {1 h$ v6 j+ C}& M. V) H) v- `% J
end
# J6 `+ U- S7 _# }2 r' f

该用户从未签到

66#
发表于 2013-2-7 00:03:44 | 只看该作者
awer 发表于 2013-2-5 14:40 4 r1 F  Y5 n( Z' C- G3 ~# m+ [' i5 \
抱歉,最近太忙了
* U) D6 A- C4 b7 x/ y# l9 M7 d
1 i5 q+ U: {- Q6 z300236 我用下面的程序试过,没问题
! Y* [8 a& l) j+ j. h5 g
哇,谢谢,我仔细看看,这些字母数字代码晕了! y5 ~+ [/ M5 p6 D# |( C6 M

该用户从未签到

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 小时前
6 p  U8 i- R/ l, i5 @- x! D" {

8 h4 l9 |7 O! N7 r2 i7 w' f" U: ^这东西是开源的?知道有个统计软件叫stata,不过要收钱。

点评

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

    [LV.3]辟谷

    69#
    发表于 2013-4-17 17:14:44 | 只看该作者
    准备试一试
    & x" q! G( e% x& s先找Stata软件
  • TA的每日心情
    郁闷
    2018-10-21 12:19
  • 签到天数: 7 天

    [LV.3]辟谷

    70#
    发表于 2013-4-17 22:21:02 | 只看该作者
    本帖最后由 汉水云潇 于 2013-4-17 22:27 编辑 + O2 e2 O7 T- l1 O9 e

    2 {8 c7 r/ u7 D( t/ b6 ?* C晕呀2 j. K& m$ Q- R1 O# w& s" m. g  `
    论坛复制程序代码3 S  t+ o. {8 z' n8 _7 u' S
    乱码夹杂在其中9 p* E: j" C+ Y) h) r
    很烦
    5 d+ @; I  g5 u; F  R" f对了两次7 J, s# N  p2 n8 j7 P. n+ X! x
    以为没问题了
    ! D. n, i) }7 x3 a- D
    3 i+ @( H( ?8 h2 |0 O- z结果
    7 R. p+ \! K0 v, E3 O& A8 B: ?/ m执行后
    / Q* G. |$ X# _7 s还是出现
    4 b; E- ~/ ]0 ]; z6 I+ Rr 199; b  W' T. @; Y1 s* ~6 @
    的错误
    0 u1 }, Y) o- J! m; G1 \$ M5 r% [0 `* r
  • TA的每日心情
    郁闷
    2018-10-21 12:19
  • 签到天数: 7 天

    [LV.3]辟谷

    71#
    发表于 2013-4-18 07:50:56 | 只看该作者
    试验成功,下面是三一重工的图$ T0 z! H7 C0 L3 `

    0 U5 O* H1 l% E& Q, `% C& K

    点评

    我的怎么没有红点? 三一上市以来的成本才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:178 v' [6 x* }" J& d( Q8 J
    程序写的不错.: G4 U% L1 Y$ p4 [
    不过有一点要注意.通达信导出的数据,只对价格复权,并没有对成交量复权.所以数据需要手工处理 ...
    # d6 O7 R8 u2 ]# y, T" T
    老哥,也是山寨这篇文章找不到了,不知为何?

    点评

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

    [LV.9]渡劫

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

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

    GMT+8, 2026-2-9 03:29 , Processed in 0.068727 second(s), 21 queries , Gzip On.

    Powered by Discuz! X3.2

    © 2001-2013 Comsenz Inc.

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