I'm getting an error trying to do the if statement within the loop for statement. Is it possible to put an if statement here?
(princ "Enter a number: ")
(setq number(read))
(setq number (- number 1))
(setq primechecker nil)
(loop for x from 2 to number
do ((if (> x 5)(princ 5)(princ x))))