彗星の非重力要因による軌道変化の数値シミュレーションと地球接近・衝突可能性の評価