Data commit
This commit is contained in:
parent
7387c8f97b
commit
cb5bb5e222
199093 changed files with 3378972 additions and 0 deletions
26
Task/Self-numbers/Elixir/self-numbers.elixir
Normal file
26
Task/Self-numbers/Elixir/self-numbers.elixir
Normal file
|
|
@ -0,0 +1,26 @@
|
|||
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 = 1000
|
||||
Enum.to_list 1..stop |>
|
||||
Enum.map(&digAndSum/1) |>
|
||||
SelfNums.selfFilter(stop) |>
|
||||
Enum.take(50) |>
|
||||
IO.inspect
|
||||
|
||||
end
|
||||
Loading…
Add table
Add a link
Reference in a new issue