diff --git a/R/treatment.R b/R/treatment.R
index c59c7db..d33a6d3 100644
--- a/R/treatment.R
+++ b/R/treatment.R
@@ -42,7 +42,6 @@ treatment.first <- function (n, base=1, intercept=FALSE, contrasts=TRUE, sparse=
 treatment.last <- function (n, intercept=FALSE, contrasts=TRUE, sparse=FALSE) {
     base <- if (is.numeric(n) && length(n) == 1L) n else length(n)
     cont <- contr.treatment(n, base=base, contrasts=contrasts, sparse=sparse)
-    levels <- as.character(seq_len(base))
     colnames(cont) <- paste(n[-base], n[base], sep="-")
     if(intercept) (cont <- cbind(Int=1,cont))
     cont