ppTiming[n_] := With[{comp = Timing@primitivePythag@(10^n)},{HoldForm[10^n], comp[[2]], Round@comp[[1]]}]; {{"n", "Primitives", "Timing(s)"}}~Join~(ppTiming /@ Range@9) // Grid