Self numbers: Difference between revisions
Content added Content deleted
(→{{header|Phix}}: replaced with translation of AppleScript) |
No edit summary |
||
Line 352: | Line 352: | ||
Overall took 7.0237244s</pre> |
Overall took 7.0237244s</pre> |
||
=={{header|Elixir}}== |
|||
<lang elixir> |
|||
defmodule SelfNums do |
|||
def digAndSum(number) when is_number(number) do |
|||
Integer.digits(number) |> |
|||
Enum.reduce( 0, fn(num, acc) -> num + acc end ) |> |
|||
(fn(x) -> x + number end).() |
|||
end |
|||
def selfFilter(list, firstNth) do |
|||
numRange = Enum.to_list 1..firstNth |
|||
numRange -- list |
|||
end |
|||
end |
|||
defmodule SelfTest do |
|||
import SelfNums |
|||
stop = 50 |
|||
Enum.to_list 1..stop |> |
|||
Enum.map(&digAndSum/1) |> |
|||
SelfNums.selfFilter(stop) |> |
|||
IO.inspect |
|||
end |
|||
</lang> |
|||
{{out}} |
|||
[1, 3, 5, 7, 9, 20, 31, 42, 53, 64, 75, 86, 97, 108, 110, 121, 132, 143, 154, |
|||
165, 176, 187, 198, 209, 211, 222, 233, 244, 255, 266, 277, 288, 299, 310, 312, |
|||
323, 334, 345, 356, 367, 378, 389, 400, 411, 413, 424, 435, 446, 457, 468] |
|||
=={{header|F_Sharp|F#}}== |
=={{header|F_Sharp|F#}}== |