dc "-e1d`factor|fmt -0|uniq -c|awk '$2=!/:/*$2%4-1?0:"d+1+*"'`r-p"