Rを使って星野写真に星の名前や天体名を記入する(関数化)