Update prime.r