PrimeQ/@Table[n^2 - n + 41, {n, 1, 40}]