Select[Range[0,700],PrimeQ[1032148488143+#]&]