Narcissistic decimal number: Difference between revisions
m
→{{header|R}}: Syntax highlighting.
m (→{{header|Pascal}}: moved from Own_digits_power_sum) |
ReeceGoding (talk | contribs) m (→{{header|R}}: Syntax highlighting.) |
||
Line 4,001:
===For loop solution===
This is a slow method and it needed above 5 minutes on a i3 machine.
<lang
j <- nchar(u)
set2 <- c()
Line 4,047:
*As we are using format anyway, we take the chance to make the output look nicer.
<lang
{
resultCount<-i<-0
| |||