jabuci

jabuci

I’m new to Elixir (started yesterday) and as a first little program, I wanted to solve the Münchausen numbers problem.

“A Münchausen number is a number equal to the sum of its digits raised to each digit’s power. For instance, 3435 is a Münchausen number because 3^3+4^4+3^3+5^5 = 3435. The largest Münchausen number is less than 440 million.”

The problem is that my program eats up all my RAM (16 GB) and the OS kills the process. And I don’t understand what goes on with the garbage collector.

Here is my solution:

#!/usr/bin/env elixir

defmodule Munchausen do
  @cache [0] ++ for n <- 1..9, do: n ** n

  def get_cache(), do: @cache

  def explode(n), do: explode(n, [])

  # int, acc -> list[int]
  def explode(n, acc) when n == 0, do: acc

  def explode(n, acc) do
    digit = rem(n, 10)
    explode(div(n, 10), [digit | acc])
  end

  # int -> bool
  def is_munchausen(n) do
    digits = explode(n)
    li = for x <- digits, do: Enum.at(@cache, x)
    n == Enum.sum(li)
  end
end

defmodule Main do
  # @max 10_000
  @max 440_000_000

  def main() do
    # Munchausen.get_cache() |> IO.inspect
    for n <- 0..@max do
      # :erlang.garbage_collect()
      if rem(n, 1_000_000) == 0 do
        IO.puts("# #{n}")
      end
      if Munchausen.is_munchausen(n) do
        IO.puts(n)
      end
    end
  end
end

Main.main()

I know that it’s not optimal and slow. I’ll work on it.

Now the question is: why does it consume all my memory and how to prevent that? Thanks.

Showing Posts 1 to 4

al2o3cr

al2o3cr

A for loop like this will return a list containing the results of every evaluation of the do block:

for n <- 0..10 do
  IO.puts(n)
end

Running this in iex produces:

iex(1)> for n <- 0..10 do
...(1)>   IO.puts(n)
...(1)> end
0
1
2
3
4
5
6
7
8
9
10
[:ok, :ok, :ok, :ok, :ok, :ok, :ok, :ok, :ok, :ok, :ok]

Your Main.main function is building up a 440 million element list of :ok and nil, which it then discards when it exits.

jabuci

jabuci OP

Thanks. Right, the same thing happens in Python too:

$ python3
Python 3.10.4 (main, Mar 23 2022, 23:05:40) [GCC 11.2.0] on linux
>>> a = list(range(0, 440_000_000))
[1]    216403 killed     python3

So what’s the solution? How to iterate over the numbers from 0 until 440 million?

Update: I found the answer to my question:

Enum.each(0..@max, fn n ->
  if rem(n, 1_000_000) == 0 do
    IO.puts("# #{n}")
  end
  if Munchausen.is_munchausen(n) do
    IO.puts(n)
  end
end)
kokolegorille

kokolegorille

You might use stream to process the list lazily…

tj0

tj0

Also, check out Memoize — memoize v1.4.5 , it makes the caching step trivial. For fibonnaci example:

defmodule Fib do
  use Memoize
  defmemo fibs(0), do: 0
  defmemo fibs(1), do: 1
  defmemo fibs(n), do: fibs(n - 1) + fibs(n - 2)
end
— All posts loaded —

Where Next? Top

Trending in Questions Top

RSP87
I’m working on a project that simulates the bumbl example in the programming phoenix book. It acts almost like an email client. We have a...
New
kszambelanczyk
Hello! Could someone please give me a help/sample code, how to delete a file from s3 using waffle/waffle_ecto from Phoenix app. I creat...
New
RemyXRenard
I’m seeing that a list inside a Kino.DataTable will be interpreted as a charlist, even if the Kino.configure() is set to charlists: :as_l...
New
velrest
So my question is quite simple and i have found no conclusive answer on forum, google or AI. Should we use :erlang.float for Integer to ...
New
samoloth
Hi, I’ve just set up an application with ash_authentication. There is only magic link strategy for now, so there is no confirmation add o...
New
FlyingNoodle
If a change or preparation module uses Ash.Changeset.get_argument/2 or Ash.Query.get_argument/2 (or any of the other get_argument functio...
New
ryanwinchester
apply_graft/2 doesn’t rewrite an add_many sub-workflow’s deps on an add step. Grafted jobs cancel with “upstream job was deleted” Version...
New

Other Trending Topics Top

mudasobwa
I am happy to introduce the very α version of the new programming language compiled to BEAM. Welcome Cure. It has literally three kille...
New
marciok
Hi there! We created Gust: A task orchestrator inspired by Airflow. For those who have never heard about Aiflow, it’s a Python-based wor...
New
jimsynz
Beam Bots (or just BB for short) is a framework for building fault-tolerant robotics applications in Elixir using familiar OTP patterns. ...
New
Dmk
Xamal is a deployment tool for Elixir apps that deploys native releases to bare metal servers over SSH. It’s a port of GitHub - basecamp/...
New
Damirados
Hello everyone. After busy few months I am happy to announce v0.1.0 of Emerge &amp; Solve. They are GUI (Emerge) and State management (S...
New
netoum
Corex is an accessible, unstyled UI component library for Phoenix that integrates Zag.js state machines using Vanilla JavaScript and Live...
New

We're in Beta

About us Mission Statement

Options

Thread Display Mode




Thread Preview

Skip Thread Previews