read n; seq $n | factor | awk 'NF==2{t+=$2}END{print t}'