島しょは別

島しょ地域は，
・距離がずいぶん離れている（集積性を出すので）
・傾向が違っているだろうと思われる
ので，別途解析するとして，以下のように，最後の番号は外しておこう

lines = nc = 0
sec = 
open("sec13.csv") {|file|
  while l = file.gets
    sec[lines] = l.split(',')
    lines += 1
    nc = l.split(',').size
  end
}

ii = 0
out = 
for i in 0...(lines-1)
  for j in  1...nc
    if (sec[i][j]=="")||(sec[i][j]=="\n")
      #do nothing
    else
      out[ii] = []
      out[ii][0] = sec[i][0].to_i
      out[ii][1] = sec[i][j].to_i
      #foo.puts "#{sec[i][j]},#{sec[i][0]}"
      ii += 1
    end
  end
end
p ii
out2 = out.sort
#without island
foo = File.open("trans13_sort_sec_wi.csv",'w')
for i in 0...ii
  foo.puts "#{out2[i][0]},#{out2[i][1]}"
end
foo.close

out3 = out.sort { |a,b|
a[1] <=> b[1]
}

foo = File.open("trans13_sort_city_wi.csv",'w')
for i in 0...ii
  foo.puts "#{out3[i][0]},#{out3[i][1]}"
end
foo.close