My Clojure Practice

want to get closer to high salary Clojure and Functional Programming

<List>

• Sequence Processing (->> reduce apply) (2023.09.26)
• Filtering Even Numbers (2023.09.22)

Sequence Processing (->> reduce apply) (2023.09.26)

• Practice to deal sequences with ->> reduce apply

• Run by Clojure CLI version 1.11.1.1200 in Replit

• Codes and Output

  Codes : sequence-practice.clj

  (ns sequence-practice.ns
    (:require [clojure.string :as str]))

  (defn odd-sum
    "Calculate the sum of odd numbers in a sequence."
    [numbers]
    (->>
      numbers
      (filter odd?)
      (reduce +)))
  
  (defn even-sum
    "Calculate the sum of even numbers in a sequence."
    [numbers]
    (reduce +
      (filter even? numbers)))
  
  (defn concatenate
    "Concatenate multiple strings with spaces in between."
    [& text]
    (apply str/join " " text))

  (def num-sequence (range 1 11))
  (def str-sequence ["Live" "for" "your" "smile" "and" "die" "for" "your" "kiss"])

  (defn -main
    "Main function to demonstrate sequence processing."
    []
    (println (odd-sum num-sequence))
    (println (even-sum num-sequence))
    (println (concatenate str-sequence)))
  
  (-main)

  Output

  25
  30
  Live for your smile and die for your kiss

Filtering Even Numbers (2023.09.22)

• This was my first Clojure code, but not even a warm-up. I need something more legit!

  (println "Hello World!")

• Written by ChatGPT

• Run by Clojure CLI version 1.11.1.1200 in Replit

• Codes and Output

  Codes : EvenNums.clj

  ; Define a function to filter even numbers
  (defn filter-even [nums]
    ; Use the even? function to filter only even numbers
    (filter even? nums))
  
  ; Define the input list of numbers
  (def numbers [1 2 3 4 5 6 7 8 9 10])
  
  ; Use the filter-even function to filter even numbers
  (def even-numbers (filter-even numbers))
  
  ; Print the result
  (println "Even numbers in the list:")
  (println even-numbers)

  Output

  (2 4 6 8 10)