The problem is that you are reversing the string a few times. The following will do: (defun base8 (n) (let ((t8 (truncate n 8)) (m8 (mod n 8))) (if (= t8 0) (list m8) (append (base8 t8) (list m8))))) EDIT Here's a solution without append, using a helper function.
So, the average weight for a healthy, human kidney is 0.26-0.30 pounds. (approx.) The average weight for a healthy, human kidney is 120-140 grams. 1 pound= 453.59237 grams. So, the average weight for a healthy, human kidney is 0.26-0.30 pounds. (approx.) The average weight for a healthy, human kidney is 120-140 grams. 1 pound= 453.59237 grams. So, the average weight for a healthy, human kidney is 0.26-0.30 pounds.
The right kidney is slightly lower than the left one. Each kidney weighs 113 to 170 g (4 to 6 oz), and each is about 11.4 cm (4 1 2 in) long, 5 to 7.5 cm (2 to 3 in) broad, and 2.5 cm (1 in) thick. The kidneys in the newborn are about three times as large in proportion to body weight as they are in the adult.ach kidney weighs 113 to 170 g (4 to 6 oz), and each is about 11.4 cm (4 1 2 in) long, 5 to 7.5 cm (2 to 3 in) broad, and 2.5 cm (1 in) thick. The kidneys in the newborn are about three times as large in proportion to body weight as they are in the adult.