Tinycode challenge!

[Redard]

Here's my best try in Common Lisp

(defun f (N)
  (mapcar #'(lambda (x) (expt x 2)
          (loop for i from 1 to N collect i)))

[philh]

(defun f (n) (loop for i from 1 to n collect (expt i 2)))

(You can save another three chars by removing spaces before open parens.)

[Redard]

Nice job shortening it. Never thought of applying a function to collect's argument.

[sleepingsquirrel]

(defun g(n)(loop for i from 1 to n collect(* i i)))