[racket] plot w/non-standard ticks

Anyone know how to make a plot using 'lines' with ticks that are of my
own divising instead of the existing? The closest I've been able to
come is the below, which has ticks along the top that I don't want and
the pre-existing ticks interfering along the bottom, which I'd also
like to get rid of.

tia,
Robby

#lang racket
(require plot)
(plot
 (list
  (x-ticks (for/list ([i (in-range 1 1000)]
                      #:when (zero? (modulo i 111)))
             (tick i #t (format "!~a!" i))))
  (lines (for/list ([i (in-range 1 1000)])
           (vector i (random (* i i)))))))