RosettaCodeData/Task/Happy-numbers/R/happy-numbers-3.r
Ingy döt Net db842d013d A-M baby
2013-04-10 21:29:02 -07:00

2 lines
76 B
R

#Find happy numbers between 1 and 50
which(apply(rbind(1:50), 2, is.happy))