Htmlize test

def print_w_better(x):
    print(str(x) + ' ' '(better)')
    
for i in range(0,10):
    print_w_better(i)

print_w_better = function(x)
    print(string(x,  " ", "(better)"))
end
    
for i in collect(1:1:10)
    print_w_better(i)
end

print_w_better <- function(x) {
    print(paste0(x,  " ", "(better)"))
}

for (i in seq_len(10)) {
    print_w_better(i)
}

(defun print_w_better (number)
  (message "%d" number)
  )
(dotimes (i 10) (print_w_better i))