="sourceCode r"><code class="sourceCode r"><span class="kw">set.seed</span>(<span class="dv">13</span>)
testObservations =<span class="st"> </span><span class="kw">sample</span>(<span class="kw">nrow</span>(covertype), <span class="dv">10</span>^<span class="dv">4</span>)
testSet =<span class="st"> </span>covertype[testObservations,]
X =<span class="st"> </span>covertype[-<span class="kw">c</span>(testObservations),<span class="dv">2</span>:<span class="kw">ncol</span>(covertype)]
y =<span class="st"> </spa