convert list to another list

please help how to convert this list

(setq a'("1 2.33 6.45 8.46" "2 8.98 4.78 1.58" "3 4.51 7.12 2.35" "4 6.95 5.64 7.82"))

to this list

(setq a '((1 2.33 6.45 8.46)(2 8.98 4.78 1.58)(3 4.51 7.12 2.35)(4 6.95 5.64 7.82)))

You use this:

(mapcar '(lambda(x) (read (strcat "(" x ")"))) a)

Thank you very much

Another .

(defun 2->list (l)
 (if l (setq l (cons (read (strcat "(" (car l) ")")) (2->list (cdr l)))))
)

You are welcome motee-z.

@Tharwat :

Thanks for the alternative, but in this case I think using mapcar is easier to understand than recursive.

@Tharwat :

Thanks for the alternative, but in this case I think using mapcar is easier to understand than recursive.

I do agree with you .

(defun 2->list (l)
 (if l (setq l (cons (read (strcat "(" (car l) ")")) (2->list (cdr l)))))
)

Note that there is no need for the setq expression to redefine the variable 'l' -

The list will be constructed and returned as a consequence of the cons expression being the last expression evaluated.

Note that there is no need for the setq expression to redefine the variable 'l' -

The list will be constructed and returned as a consequence of the cons expression being the last expression evaluated.

You are right , thank you Lee for taking the time to correct me .

You're welcome

You use this:

(mapcar '(lambda(x) (read (strcat "(" x ")"))) a)

7o7. i noted your idea as good tips, thanks

i didn't notice it was string list by OP, luckily gurus are always here

Tharwat alternative idea & Lee simple yet useful advise. Thank you guys

7o7. i noted your idea as good tips, thanks

i didn't notice it was string list by OP, luckily gurus are always here

Tharwat alternative idea & Lee simple yet useful advise. Thank you guys

You are guru too, my friend