Create list such that the min is separated from the list recursively in scheme?

Question

i need to create a list such that the min is always at the outside in a list.

Example

input (1 2 3)

output (1 (2 3))

Here is my code, assuming that the numbers are in descending order, which i wish to extent later to a general case.

I am getting an unexpected output of (3 2 1 0 -1 -2 -3 ()).

How do I achieve this in scheme any ideas?'

(define (find-min-rest L) (if (null? (cdr L)) (let ( (x (car L))) (cons x '( ()))) (let* ((ret-ans (find-min-rest (cdr L))) (cur-elem (car L)) (mini (car ret-ans)) (rem-list (cdr ret-ans))) (cond ((> cur-elem mini) (cons cur-elem (cons mini rem-list)))))))

Please post the code you've written so far, pointing the exact part where you're having trouble — Óscar López
– Óscar López, Commented Mar 14, 2017 at 21:51
the code is (define (find-min-rest L) (if (null? (cdr L)) (let ( (x (car L))) (cons x '( ()))) (let* ((ret-ans (find-min-rest (cdr L))) (cur-elem (car L)) (mini (car ret-ans)) (rem-list (cdr ret-ans))) (cond ((> cur-elem mini) (cons cur-elem (cons mini rem-list))))))) — user1922
– user1922, Commented Mar 14, 2017 at 21:51

Óscar López · Accepted Answer · 2017-03-14 21:56:17Z

0

It'll be simpler if you use built-in procedures, and split the problem in parts. Notice that the following assumes that there's a single minimum, adjust as necessary:

(define (find-min-rest L)
  (let* ((the-min  (apply min L))
         (the-rest (remove the-min L)))
    (list the-min the-rest)))

(find-min-rest '(1 2 3))
=> '(1 (2 3))

answered Mar 14, 2017 at 21:56

Óscar López

237k38 gold badges321 silver badges391 bronze badges

Sign up to request clarification or add additional context in comments.

Comments

user1922 · Accepted Answer · 2017-03-14 21:51:51Z

0

The code

(define (find-min-rest L)
    (if (null? (cdr L)) (let ( (x (car L))) (cons x '( ())))
        (let* ((ret-ans (find-min-rest (cdr L))) (cur-elem (car L)) (mini (car ret-ans)) (rem-list (cdr ret-ans)))
          (cond ((> cur-elem mini)  (cons cur-elem (cons mini rem-list)))))))

answered Mar 14, 2017 at 21:51

user1922

515 bronze badges

Collectives™ on Stack Overflow

Create list such that the min is separated from the list recursively in scheme?

2 Answers 2

Comments

Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

2 Answers 2

Comments

Comments

Your Answer

Sign up or log in

Post as a guest

Related