Total[Select[Table[i, {i, 1000000}], PrimeQ]]