more Happy Numbers

R