Update R/directsummary.R

Get rid of parallel.