SU/CAR-ST-APi-cells

悪を告発する真面目で時におバカな独り言ブログ

自作DSLで株シストレ
Esgrsdnl

ある詐欺グループとの戦い
Sort Uniq / C Awk R Sed Tcl/Tk
Shell Unix (percentile) Compile Assembly Run
Stock Trading APi cells
ローマは一日にしてならず R,C

53歳限界プログラマの憂鬱
mix of AB


にほんブログ村 株ブログ 株 自動売買へ
にほんブログ村 株ブログ 株 デイトレードへ
にほんブログ村 先物取引ブログ 日経225先物へ

来訪ありがとうございます
←クリックいただくと励みになります
(先物でも詐欺業者見つけたので)
このブログのコメントについて

2019/4~
運用資金250万
カラクリあり

怪しいブログwatch

ミッションは2019/4/7午前0時に発動しました
しばらく少しでも多くの人が詐欺に気づくよう努力してみます
マサユキくんはバーチャルトレーダーです
ドログバさんもバーチャルトレーダーです
かぶさん引っ越しkabuさんになりました
美咲さんもバーチャルトレーダーです
kabuさんもバーチャルトレーダーです
株式市場(システムに改名)という業者が詐欺である証拠

↑グラフ書き換えてきました
  業者名もシステムに変えてきました

個別株に加えてFX・日経先物の業者もありますね 闇深すぎorz

逆張り暫定2号投入

にほんブログ村 株ブログ 株 自動売買へ

逆張り暫定1号のルール(R言語ソース)を適当に弄ってみたら、結構いい結果が返ってきたので

f:id:sucar:20160605110044p:plain

早速来週より投入

#暫定2号
#75日移動平均乖離率が小さい順の下から0.1%
s$h75<-hei75(s)
ans<-tapply(s$h75,s$j,quantile,0.001)
ans0<-hei(ans,10)

q <- subset(s ,
#M575
s5m(sp0m)+5*s75m(sp0m)<10 &
#
h75<ans0[j+1]&
h75< (-25)&
dai>100000000&

TRUE )

#ソートしていないので猿ダーツ
index<-tapply(-q$dai,q$j,order)
ans<-NULL
for (i in 1:length(index)) {
ans<-c(ans,indexi)
}
q$ord<-ans
p<-subset(q,ord<=10)

こんなやつ

ほぼ「逆張り暫定1号の25日移動平均を75日移動平均に置き換えた」だけのルール

こんな感じで派生ルールが発掘できれば楽だけど、はてさてどうなる?

 

f:id:sucar:20150414192227p:plain

CとRでス・パ・カー・エス・ティー
高級アセンブラC言語と統計分析R言語を
駆使して生まれたその名は、ス・パ・カー・エス・ティー!

f:id:sucar:20150414193802p:plain