classify.Rの呼び出しまで作成