Update summaryInfoPrimary.R

change licarrdo to liccardo