第三題: 請建立一函數 isPrime,並撰寫一 R 程式,列出前 50 個質數(第一個質數為 2)。【25 分】