Skip to content

Instantly share code, notes, and snippets.

@gghatano
gghatano / npbシーズン打撃成績.csv
Last active September 13, 2023 15:39
1950年から2015年までのシーズン打撃成績.csvです。番号, 名前、年齢、......というデータです。
We can't make this file beautiful and searchable because it's too large.
Rk,Name,Age,G,PA,AB,R,H,2B,3B,HR,RBI,SB,CS,BB,SO,BA,OBP,SLG,OPS,TB,GDP,HBP,SH,SF,IBB,Team,Year,PlayerID
1,Tokuzo Harada*,30,137,622,565,94,173,34,12,13,79,30,9,50,35,0.306,0.365,0.478,0.843,270,6,2,5,NA,NA,Chunichi Dragons,1950,harada000tok
2,Tsuguhiro Hattori,30,63,126,120,21,33,4,0,0,18,9,0,6,10,0.275,0.31,0.308,0.618,37,4,0,0,NA,NA,Chunichi Dragons,1950,hattor000tsu
3,Itsuro Honda*,19,4,2,2,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,NA,NA,Chunichi Dragons,1950,honda-000its
4,Jiro Hoshida,30,19,33,30,4,4,1,0,0,1,0,0,1,2,0.133,0.161,0.167,0.328,5,0,0,2,NA,NA,Chunichi Dragons,1950,hoshid000jir
5,Akiro Kato,19,2,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,NA,NA,Chunichi Dragons,1950,kato--000aki
6,Susumu Kato,26,76,189,160,26,33,6,3,5,21,2,5,25,23,0.206,0.321,0.375,0.696,60,5,2,2,NA,NA,Chunichi Dragons,1950,kato--000sus
7,Teiji Kojima*,23,6,5,5,1,0,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,NA,NA,Chunichi Dragons,1950,kojima000tei
8,Sadao Kondo,24,26,62,58,11,21,4,1,0,8,2,0,4,3,0.362,0.403,0.466,0.869,27,0,0,0,NA,NA,Chunichi Dragon
@gghatano
gghatano / 2015年打席結果.csv
Last active November 13, 2015 23:35
2015年打席結果.csv: 試合ID, チーム名, ホームかアウェイか, イニング, 選手名, 打席結果というデータです。
We can't make this file beautiful and searchable because it's too large.
試合ID,チーム,ホーム_アウェイ,回,選手,結果
2015032701,巨人,home,1,坂本 勇人,左安
2015032701,巨人,home,1,井端 弘和,遊ゴロ
2015032701,巨人,home,1,長野 久義,中2
2015032701,巨人,home,1,阿部 慎之助,捕邪飛
2015032701,巨人,home,1,村田 修一,中飛
2015032701,巨人,home,2,坂本 勇人,右飛
2015032701,巨人,home,2,井端 弘和,遊併打
2015032701,巨人,home,2,高橋 由伸,四球
2015032701,巨人,home,2,亀井 善行,右本
@gghatano
gghatano / test2.ora
Created October 25, 2015 10:03
create database
CREATE DATABASE orcl
USER SYS IDENTIFIED BY oracle_4U
USER SYSTEM IDENTIFIED BY oracle_4U
LOGFILE GROUP 1 ('log1A',
'/disk1/log1B'
'/disk2/log1C') SIZE 10M
GROUP 2 ('log2B',
'/disk1/log2B'
'/disk2/log2C') SIZE 10M
@gghatano
gghatano / test.ora
Created October 25, 2015 10:02
test.ora
-- まずはpfileからspfileをつくること
-- ログインして,
-- create spfile from pfile='場所'
-- initorcl.ora
-- /oracle_home/dbs/initorcl.ora
-- 既存システムのPFILEを見る
-- SPFILEを作る
-- 必要なら, NLSパラメータを見る(select * from nls_parameters)
@gghatano
gghatano / jump_data.csv
Created July 26, 2015 08:34
ジャンプの掲載順位データ
year volume name place
1999 52 ONE PIECE 2
1999 52 世紀末リーダー伝 たけし! 3
1999 52 ヒカルの碁 1
1999 52 HUNTER×HUNTER 14
1999 52 遊☆戯☆王 7
1999 52 ライジング インパクト 12
1999 52 テニスの王子様 5
1999 52 NARUTO -ナルト- 6
1999 52 花さか天使テンテンくん 4
dummiesでダミー変数を作る
========================================================
```{r}
library(data.table)
library(dplyr)
library(dummies)
dat = fread("data.csv")
@gghatano
gghatano / gist:cb867bbc14f1de327ddc
Last active August 29, 2015 14:23
ロト6の、974回分の結果データ。左から順に、回数、当選番号(6個+ボーナス数字1個)、1等当選者数、1等賞金、2等当選者数、2等賞金、3等賞金、4等賞金、キャリーオーバー額
num,result,first_hit,first,second_hit,second,third,fourth,over
974,02 03 29 30 32 43 26,0,0,5,21359800,678000,12700,118666833
973,01 05 06 12 30 31 24,2,49737200,13,6886600,217400,5300,0
972,02 07 17 18 21 40 29,1,117796500,13,8155000,691400,11100,0
971,02 03 04 12 22 29 11,4,25715300,18,5143000,302600,6100,0
970,02 04 18 23 31 38 01,2,55926200,6,16777700,419400,7200,0
969,03 09 19 22 23 40 10,1,113134300,13,7832300,515500,9200,0
968,06 10 15 20 23 26 17,1,110911400,9,11091000,460700,8300,0
967,01 11 26 30 32 40 08,1,123100400,4,27697300,942800,13600,0
966,10 22 31 34 36 43 30,1,133072000,1,119763800,1072500,16600,0
@gghatano
gghatano / dat_v4
Created May 18, 2015 13:24
スタメン4番打者としての起用回数
大阪,2009,ローズ81試合、 ラロッカ34試合、 カブレラ21試合、 フェルナンデス5試合、 後藤 光尊3試合、
大阪,2010,カブレラ112試合、 T-岡田15試合、 北川 博敏10試合、 ラロッカ7試合、
大阪,2011,T-岡田124試合、 後藤 光尊8試合、 李 承燁6試合、 竹原 直隆3試合、 カラバイヨ2試合、 北川 博敏1試合、
大阪,2012,李 大浩144試合、
大阪,2013,李 大浩141試合、 T-岡田2試合、 バルディリス1試合、
大阪,2014,ペーニャ82試合、 糸井 嘉男50試合、 T-岡田6試合、 竹原 直隆3試合、 ベタンコート2試合、 ヘルマン1試合、
大阪,2015,カラバイヨ19試合、 中島 裕之13試合、 T-岡田9試合、 竹原 直隆1試合、
広島,2009,栗原 健太138試合、 シーボル6試合、
広島,2010,栗原 健太104試合、 嶋 重宣23試合、 ヒューバー16試合、 廣瀬 純1試合、
広島,2011,栗原 健太104試合、 トレーシー39試合、 岩本 貴裕1試合、
#!/bin/bash
cat ./all2013.csv |
mselstr f=BAT_EVENT_FL v=T |
mcal c='if(${OUTS_CT}<2 && $s{BASE3_RUN_ID}!="", 1, 0)' a="SUPER_CHANCE" |
mcal c='if(${OUTS_CT}<2 && $s{BASE3_RUN_ID}!="" && regexs($s{EVENT_TX}, "3-H"),1, 0)' \
a="SUPER_CHANCE_SCORED" |
mcut f=BAT_ID,SUPER_CHANCE,SUPER_CHANCE_SCORED |
msum k=BAT_ID f=SUPER_CHANCE,SUPER_CHANCE_SCORED |
mcal c='${SUPER_CHANCE_SCORED}/${SUPER_CHANCE}' a="SUPER_CHANCE_SCORED_RATE" |
@gghatano
gghatano / hit_ranking.bash
Created November 23, 2014 13:42
mコマンドで集計の練習
#!/bin/bash
## hit ranking
cat ./batting_data.csv |
mcut f=BAT_ID,H_FL,AB_FL |
mselstr f=AB_FL v=T |
mchgstr f=AB_FL c=T:1 |
mcal c='if(${H_FL}>0, 1, 0)' a=HIT_FL |
mcut f=BAT_ID,HIT_FL,AB_FL |
msum k=BAT_ID f=HIT_FL:HIT,AB_FL:ATBAT |
mselnum f=ATBAT c='[1,]' |