貿易統計をHSコード上２桁で調べてみました。
2015 年の輸出統計を少し調べてみました。
HSコードの上２桁で、01 １類です。
生体ですね。生きている動物の輸出です。
生体輸出の総額
まず、総額を出します。スクリプトは下記です。
3452730(単位１０００円）で、３４．５億円
年間この金額ですので、それほど多くないですね。
使用データ
2015_export_all.dat
country.csv
T=2015_export_all.dat # 対象となるデータ
C=01 # hs2 hscode ２桁
B=7 # 上位どこまで選ぶか mbest で使用
# hs2 hscode 2桁の集計 まず全額
mcut f=Value-Year:v,hs2 i=${T} | # 価格
mselstr f=hs2 v=${C} | #hs2 コードを指定してデータを抽出
msum f=v | # 価格(v) で集計
mcut f=v # 項目を価格だけに絞る
国別ランキング
では国別のランキング出してみましょう。上位７位までで、割合を出しています。
なんと、英国がトップ
34.06,英国,205
24.63,オーストラリア,601
14.71,大韓民国,103
10.37,アメリカ合衆国,304
7.07,香港,108
6.80,中華人民共和国,105
2.36,オランダ,207
スクリプト
T=2015_export_all.dat # 対象となるデータ
C=01 # hs2 hscode ２桁
B=7 # 上位どこまで選ぶか mbest で使用
mcut f=Value-Year:v,hs2,Country i=${T} | # 価格の項目名を v にする
mselstr f=hs2 v=${C} | # hs2 コードを指定してデータを抽出
msum f=v k=Country | # 国別で集計
mbest s=v%nr size=${B} | # 価格（集計ずみ）で、B で指定した上位を抽出
mjoin k=Country K=country_code m=country.csv f=country_name | # 国名を追加
mshare f=v:share | # 割合を作成
mcal c='format(${share}*100,"%5.2f")' a=s | # 割合を％表示
mcut f=s,country_name,Country | # 国名、割合に限定
mbest s=s%nr size=${B} # 順番が変わったので、もう一度並び替える
英国への輸出を詳しく見ると
HSコード 01012100 は、純粋種の馬 競馬用の種馬のようです。
金額は、約６．７億円です。
調べてみると、アイルランド人が経営する北海道のパカパカファーム が輸出しているようです。
670770,−− 純粋種の繁殖用のもの,010121000
332440,−− その他のもの,010129000
59163,−− その他のもの,010619000
3000,−− 霊長類,010611000
使用データ
2015_export_all.dat
country.csv
hs9
T=2015_export_all.dat # 対象となるデータ
C1=01 # hscode 上２桁
C2=205 # 国コード 205 は英国
B=7 # 上位どこまで選ぶか mbest で使用
# hscode 9 桁 の順位
mcut f=Value-Year:v,Country,hs2,hscode i=${T} | # 価格の項目名を v にする
mselstr f=hs2 v=${C1} | # hscode 上2桁で抽出
mselstr f=Country v=${C2} | # Country で特定の国のデータを抽出
msum f=v k=hscode | # hscode 9桁で、集計
mbest s=v%nr size=${B} | # 価格（集計ずみ）で、B で指定した上位を抽出
mjoin k=hscode K=hs9 m=hs9.csv f=hs9_name | # hscode の名前を追加
mcut f=v,hs9_name,hscode | # hscode、合計金額に限定
mbest s=v%nr size=${B} # 順番が変わったので、もう一度並び替える