From a384ea13100c6fd477542708d16cfa6b542deb09 Mon Sep 17 00:00:00 2001 From: Jan Krňávek Date: Sun, 21 Jan 2024 21:13:21 +0100 Subject: solution week 252-1 - Julia --- challenge-252/wambash/julia/ch-1.jl | 18 ++++++++++++++++++ 1 file changed, 18 insertions(+) create mode 100644 challenge-252/wambash/julia/ch-1.jl (limited to 'challenge-252') diff --git a/challenge-252/wambash/julia/ch-1.jl b/challenge-252/wambash/julia/ch-1.jl new file mode 100644 index 0000000000..849c07a864 --- /dev/null +++ b/challenge-252/wambash/julia/ch-1.jl @@ -0,0 +1,18 @@ +using Lazy +using Primes + +special_numbers(ints) = @>> begin + ints + length + divisors + getindex(ints) + x -> x.^2 + sum +end + + +using Test +@testset "special numbers" begin + @test special_numbers([1,2,3,4]) == 21 + @test special_numbers([2, 7, 1, 19, 18, 3]) == 63 +end -- cgit